And I'm trying to make it support downloading files into subdirectories. It collects the file from the right subdirectory on my webserver, but when it saves it, it gives me the old "file not found" routine.
This is my sub for downloading:
Code:
Public Function DownloadUpdates(srcFileName As String, targetFileName As String, SubDir As String)
Dim B() As Byte
Dim FID As Byte
B() = frmUpdate.Inet.OpenURL(Path & SubDir & srcFileName, icByteArray)
FID = FreeFile
targetFileName = SubDir & srcFileName
Open targetFileName For Binary Access Write As #FID
Put #FID, , B()
Close #FID
DoEvents
End Function
I get the file not found on this line here:
Code:
Open targetFileName For Binary Access Write As #FID
To answer any future questions, yes, this is mostly copied from a popular updater on pscode.com, and no, I don't really know what I'm doing here. I mean, i do. I can make it write the file in the root directory that the updater is in, but SubDir holds the target subdirectory, like \GFX\
Login
Register
FAQ
Search
Members
