Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
IE object model
Message
 
To
02/02/2000 15:40:50
General information
Forum:
Visual FoxPro
Category:
Internet applications
Title:
Miscellaneous
Thread ID:
00325938
Message ID:
00326448
Views:
29
>I wrote exactly this, but my code looks similar to yours, so I was wondering what's going wrong with yours. I just used the All collection to record the index of each item, and its innertext and innerhtml properties.
>
>CREATE CURSOR PageItems (ItemIndex I, InnerText M, InnerHTML M)
>
>FOR i = 0 TO oIE.Document.Body.All.Length -1
>	oItem = oIE.Document.Body.All(i)
>	IF TYPE("oItem.InnerText") = "C" AND !EMPTY(oItem.InnerText)
>		m.ItemIndex = i
>		m.InnerText = oItem.InnerText
>		m.InnerHTML = oItem.InnerHTML
>		INSERT INTO PageItems FROM MEMVAR
>	ENDIF
>ENDFOR
>
It's not that my code isn't working, it just doesn't pull everything I want, particularly if the page has frames. I'll keep plugging along.
John Harvey
Shelbynet.com

"I'm addicted to placebos. I could quit, but it wouldn't matter." Stephen Wright
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform