| |
|
|
Georg Hovenbitzer | ¡Hola zusammen, Yo necesidad eure Ayuda en una OCX Problema. Gibt lo una Möglichkeit el URL uno Bildes de el Ver código fuente uno Webseite auszulesen? Folgender Code liest me el Page ID y el Page Titel (Überschrift Forumsbeitrag) de. KompilierenMarcaSeparaciónwindow 780,400
$H Windows.ph
$H ocx3a.ph
$I ocx3a.inc
Declare Element&
Declare Text$
Declare Inhalt$
Declare PageID$
Declare PosID&
Declare PageTitel$
Declare WebControl&
ocxInit()
var File$="Test.htm"
var WebObject&=ocxCreate(File$,0,0,0,0,0,0,addr(WebControl&))
var Document&=ocxGet(WebObject&,"Document")
var Collection&=ocxGet(Document&,"links")
WhileLoop 0,ocxGet(Collection&,"length")-1
Element&=ocxMethod(Collection&,"item",&loop,0)
If PageID$ = ""
Text$ = Trim$(ocxGet(Element&,"id"))
If Text$ = "skipToContent"
Inhalt$ = ocxGet(Element&,"href")
PosID& = InStr("threadID", Inhalt$)
PageID$ = Mid$(Inhalt$,(PosID& + 9),(Len(Inhalt$) - (PosID& + 9)))
Text$ = ""
EndIf
EndIf
If (PageID$ <> "") And (PageTitel$ = "")
Text$ = ocxGet(Element&,"href")
If Right$(Text$,Len("Thread&threadID=" + PageID$)) = "Thread&threadID=" + PageID$
PageTitel$ = ocxGet(Element&,"innerText")
EndIf
EndIf
ocxRelease(Element&)
EndWhile
Print PageID$
Print PageTitel$
sleep 1000
WaitInput
DestroyWindow(WebControl&)
ocxDeInit()
f='./../../function-references/XProfan/end/'>End
Auch si yo me todos Einträge el Yo bajo 'links' abrufen kann ansehe, Es el URL des Bildes no esta, weder en el Element id, name, innerText oder href.
Kann me hierbei alguien helfen? Gibt lo una halbwegs bien verständliche Anleitung a OCX?
Viele Grüße Georg |
|
|
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 28.05.2013 ▲ |
|
|
|
|
| Bild? Müsste doch SRC ser, ya danach geschaut? |
|
|
| |
|
|
|
| Hilf me de tiempo Por favor,,
en me stürzt lo de - vlt. kannst veces Su HTML y el Inc en una Paket packen.
Grundsätzlich musst sólo el IMGs enumerieren y el haben el src-Attribut. |
|
|
| |
|
|
|
| Hab Paket por PN obtener y qué gefunden!
So klappts: (sólo geänderter Zona) KompilierenMarcaSeparación...
ocxInit()
var File$="file:///c:/dev/p/Test5.htm"
var WebControl&=create("htmlwin",%hwnd,file$,0,0,0,400,400)
while HTMLWin("GetBusy", WebControl&)
sleep 200
endwhile
var WebObject&=HTMLWin("QueryInterface",WebControl&)
'var WebObject&=ocxCreate(File$,0,0,0,0,0,0,addr(WebControl&))
var Document&=ocxGet(WebObject&,"Document")
var Collection&=ocxGet(Document&,"images")
WhileLoop 0,ocxGet(Collection&,"length")-1
Element&=ocxMethod(Collection&,"item",&loop,0)
Text$ = Trim$(ocxGet(Element&,"src"))
print text$
continue
|
|
|
| |
|
|
|
Georg Hovenbitzer | Super IF, lo klappt - qué como alles auslesen kann! Hast du irgendwo una Doku gefunden welche Schlüsselworte uno einsetzen kann y welcher Kombination? En 'image' funktioniert id, title, alt, width, height y src. Schwierig es con esta Informationen el Hauptbild (af2iofrr.jpg) para encontrar y el ganzen Avatare, Icons usw. a descartar.
Viele Grüße Georg |
|
|
| Viele Grüsse, Georg Hovenbitzer(Windows XP Pro, XProfan 11.2, Profan2Cpp 1.6a) | 02.06.2013 ▲ |
|
|
|
|
| Lo son sólo el "document"-Objeto y lo son document.images, el Imagen-Collection el hier angezapft se.
Unterobjekte:
node all anchors applets forms images layers links
Siehe auch: [...]
Hier Images: [...]
Tal vez kannst Usted el de Usted deseado Bilder anhand de ocxGet(Element&,"width") erkennen. |
|
|
| |
|
|