I need to check if a file with path "http://pmnet/113-FR-001.xls" exists
without opening it. I've tried using Dir(myPath) but I get an error 52 'Bad
file name or number'. I've also tried using the FileExists method in VB but
I'm not sure how to use it.

Thanks

Maybe this:
http://vbnet.mvps.org/code/fileapi/pathfileexists.htm

NickHK

"mcphc" <(E-Mail Removed)> wrote in message
news:F848F441-D196-43D8-9388-(E-Mail Removed)...
> I need to check if a file with path "http://pmnet/113-FR-001.xls" exists
> without opening it. I've tried using Dir(myPath) but I get an error 52
'Bad
> file name or number'. I've also tried using the FileExists method in VB
but
> I'm not sure how to use it.
>
> Thanks

http (hyper-text transfer protocol) is a transfer protocol and cannot be used
to check if a file exists. In some cases you can use File:// when generating
webpages.

the DIR command cannot be used directly to check for a file on internet.
One thing you can do is add a network drive in you window explorer. Go to
explorer and under tools "Map Netwrok drive". Assign a drive letter to
pmnet. Then you can use the drive letter and file name in the DIR command.

"mcphc" wrote:

> I need to check if a file with path "http://pmnet/113-FR-001.xls" exists
> without opening it. I've tried using Dir(myPath) but I get an error 52 'Bad
> file name or number'. I've also tried using the FileExists method in VB but
> I'm not sure how to use it.
>
> Thanks

Use xmlhttp and a "HEAD" request:

'***********************
Function HttpExists(sURL As String) As Boolean
Dim oXHTTP As Object
Set oXHTTP = CreateObject("MSXML2.XMLHTTP")
oXHTTP.Open "HEAD", sURL, False
oXHTTP.send
HttpExists = (oXHTTP.Status = 200)
End Function
'***********************

Tim


"mcphc" <(E-Mail Removed)> wrote in message
news:F848F441-D196-43D8-9388-(E-Mail Removed)...
>I need to check if a file with path "http://pmnet/113-FR-001.xls" exists
> without opening it. I've tried using Dir(myPath) but I get an error 52
> 'Bad
> file name or number'. I've also tried using the FileExists method in VB
> but
> I'm not sure how to use it.
>
> Thanks

That's it works perfectly! Thanks a lot.

"Tim Williams" wrote:

> Use xmlhttp and a "HEAD" request:
>
> '***********************
> Function HttpExists(sURL As String) As Boolean
> Dim oXHTTP As Object
> Set oXHTTP = CreateObject("MSXML2.XMLHTTP")
> oXHTTP.Open "HEAD", sURL, False
> oXHTTP.send
> HttpExists = (oXHTTP.Status = 200)
> End Function
> '***********************
>
> Tim
>
>
> "mcphc" <(E-Mail Removed)> wrote in message
> news:F848F441-D196-43D8-9388-(E-Mail Removed)...
> >I need to check if a file with path "http://pmnet/113-FR-001.xls" exists
> > without opening it. I've tried using Dir(myPath) but I get an error 52
> > 'Bad
> > file name or number'. I've also tried using the FileExists method in VB
> > but
> > I'm not sure how to use it.
> >
> > Thanks
>
>
>