'
' PathIsURL - Determines if a path conforms to valid URL format
'
' Author: Joe Strazzere
'
a$="c: est.exe"
ret=External("shlwapi.dll","PathIsURLA",a$)
msgbox(a$+" = "+Str$(ret),,"PathIsURL")
a$="http://www.wintask.com"
ret=External("shlwapi.dll","PathIsURLA",a$)
msgbox(a$+" = "+Str$(ret),,"PathIsURL")
