heute plagt mich folgendes problem:
ich möchte einen dateidownload aus dem internet durchführen.
mit folgendem script von hans funktionierts auch prächtig
Private Declare Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" ( _
ByVal pCaller As Long, _
ByVal szURL$, _
ByVal szFileName$, _
ByVal dwReserved As Long, _
ByVal lpfnCB As Long) As Long
Sub Downl()
Dim lResult As Long
Dim sURL$, sLocalFile$
sURL = "http://www.excel-cd.de/downloads/xlBasics.zip"
sLocalFile = "c:\xlbasics.zip"
lResult = URLDownloadToFile(0, sURL, sLocalFile, 0, 0)
End Sub
unser proxy verlangt aber normalerweise von den usern ein passwort für den zugang: das möchte ich umgehen.
und zwar haben wir einen proxy-port zb 8080, bei dem das passwort nicht abgefragt wird. wie kann ich den port über den der download erfolgen soll im script festlegen??
danke für die hilfe