Copy .xls betwen local disk and https:// location

A

avardaneg

I'm trying to find a way to copy files back and forth between my local disk
and a https:// network location that requires ID an password. After some
research through this forum I was able to find some pieces of code that
allowed me to save a file to the network via "Save As". The problem is that
I'd like to keep the same time stamp between the local file and its copy in
the network... I've tried FileCopy, Copyfile, etc... nothing seems to work
when I try to copy the file instead of doing "Save As". Any suggestions? Beow
you'll find the code I have so far:

Sub test2()

Dim source As String
Dim destination As String

Set ie = CreateObject("InternetExplorer.Application")
With ie
.Visible = False
.Navigate "https://myprotectedsite.com/"
Do Until .ReadyState = 4
DoEvents
Loop
Set ipf = .Document.all.Item("_ctl1:email")
If ipf Is Nothing Then GoTo skiplogin:
ipf.Value = "(e-mail address removed)"
Set ipf = .Document.all.Item("_ctl1:password")
ipf.Value = "mypwd"
Set ipf = .Document.all.Item("_ctl1:SigninBtn")
Do Until .ReadyState = 4
DoEvents
Loop
ipf.Click
Do Until .ReadyState = 4
DoEvents
Loop
End With
skiplogin:
source = "C:\Mylocalfolder\test.xls"
destination = "https://myprotectedsite.com/test.xls"

FileCopy source, destination ' ->>> Run time error 52 - Bad file name or
number

ie.Quit

End Sub
 
J

jaf

Hi,
I don't think you can do a copy or filecopy to a http server. FTP maybe.
Windows does have a "web folders" add-on. I think it was an Office add-on.
You would need to be accessing the web server as a remote drive.

John
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top