|
Hi,
you may try the following:
exists?: func [
{ Determines if a file or URL exists. Checks for invalid HTML pages. } target [file! url!] /local port comp ts ][ if error? try [ port: make port! target query port ] [return false] if not port/status [return false] if port/scheme = 'HTTP [ ts: to string! target if (to string! port/url) = ts [ return true ] comp: copy "http://" if port/host [append comp port/host] if comp = ts [ return true ] if (append copy comp #"/") = ts [ return true ] if port/path [append comp port/path] if comp = ts [ return true ] if port/target [append comp port/target] if comp = ts [ return true ] return false ] true ] Regards, Ladislav
|
Title: Catching Web Site Access Errors
- [REBOL] Catching Web Site Access Errors mprice
- lmecir
