Before posting an Internet request you should check that the user has entered a valid Internet address. You can do this with a parsing routine, or use the following routine based on the IE5 library: |
Click here to copy the following block | Private Declare Function IsValidURL Lib "urlmon" (ByVal pBC As Long, _ url As Byte, ByVal dwReserved As Long) As Long Dim url As String Dim b() As Byte
url = "http://www.vb2themax.com/default.asp"
b = url & vbNullChar
If IsValidURL(0, b(0), 0) = 0 Then Else End If |
|