o.HTTPPing(lnTimeout,lcUrl)
lcUrl
A fully qualified URL that you want to check.
Examples:
http://www.west-wind.com
https://www.west-wind.com:443/default.aspx
lcServer and lcLink
For backwards compatibility the lcUrl and lcLink parameters can be used to pass a server name and server relative page path.
Example:
Http.HttpPing(5,"www.west-wind.com","/default.asp")
oIP = CREATEOBJECT("wwHttp")
*** Optionally - set any oIP Connection options
oIP.cUsername = "ricks"
oIP.cPassword = "supersecret"
IF !oIP.HTTPPing(5,"http://www.west-wind.com/somepage.htm")
MessageBox("No Connection")
RETURN
ENDIF