Searching A Web Page

[Insane Killa]

Could some please tell me how to get my program to search a certain web page after a certain date for an update?


thanx

[vbsquare]

You need to use the Internet Transfer control to get the page's contents, and then parse the page for what you want. For the date, you will need to check when your program starts. Something like this for the date:

If Format(Now,"ddmmyy") = "230999" Then
'Check for update

Dim b() As byte
Dim strData as string
dim intCount as integer

b()=Inet1.openurl("myurl",icByteArray)
For intCount = 0 To UBound(b)-1
strData=strData & Chr(b(intCount))
next

if strData > GetSetting("MyApp","MySection","CurrentVer") Then
'download the new version
end if

------------------
"To the glory of God!"