Information générale
Catégorie:
Applications Internet
I have reserached. There is something called pDisp Perhaps, this makes sense to you? Code snippets? But how to translate to VFP???
1. This one in VB suggest that pDisp is something separate that can be call.
if(pDisp Is Is WebBrowser1.Object) Then
strhtml = pDisp.Document.body.innerhtml
set doc1 = pDisp.frames(0).Document
End If
2. This next one has me stumped but deals with DoeumentComplete and frames.
Private Sub aDocumentComplete(ByVal pDisp as Object, URL As Variant)
If instr(1, URL, "frame2") > 0 then
myHtml = pdisp.Document.body.innerhtml
End If
End sub
I think one could be used in lieu of if ReadyState <>4 but I don't know how to translate it to VFP, might you??
Thanks so much
STeve
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement