Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Retrieve value from HTML Page
Message
From
09/05/2004 21:30:38
 
General information
Forum:
Visual FoxPro
Category:
Internet applications
Miscellaneous
Thread ID:
00902320
Message ID:
00902332
Views:
43
Hi Sergey,

It works for that URL, but in the follow, it doesn't, any chance to configure for that,
	clink="http://www.chip7.pt/pesquisa/pesquisa.php?chave="
	cFieldKey="c6656a"
	cFieldName="preco_chip7"
	oIE = createobject( "internetexplorer.application" )
	oIE.Visible = .t.

	lcUrl=cLink+cFieldKey

	oIE.Navigate( lcUrl )
	* Wait for page to load
	lnWait4browser = 15 		&&seconds
	lnStartSeconds = SECONDS()
	DO WHILE oIE.ReadyState <> 4 ;
		AND (SECONDS()-lnStartSeconds <= lnWait4browser )
		DOEVENTS
	ENDDO

	IF oIE.ReadyState = 4
	  cFieldValue = oIE.Document.all(cFieldName).Value
	 ELSE
	  ? "Time out!"
	ENDIF
	WAIT WINDOW cFieldValue
	oIE=.NULL.
João
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform