check
All ISValidURL does is returns either a true or False response.
URL = "http://www.vb2themax.com"
if IsValidUrl(URL) = True then
'enter your code here
Else
msgbox("Invalid URL")
end if
"geebee" wrote:
hi,
i found the following:
' Validate a URL
' Example: MessageBox.Show(IsValidUrl("http://www.vb2themax.com"))
Function IsValidUrl(ByVal url As String) As Boolean
Return System.Text.RegularExpressions.Regex.IsMatch(url, _
"(http|ftp|https)://([\w-]+\.)+(/[\w- ./?%&=]*)?")
End Function
but im not sure how to use it or adapt it for my vba. can someone help?
thanks in advance,
geebee
|