FTP Upload
Verfasst: 05.08.2007 18:26
Hallo PB-Forum
Hab ein kleines Problem. Ich hab eine Homepage und möchte über ein PB Programm eine Datei uploaden.
Funktioniert mit dem vorgefertigten Programm aus dem Archiv wunderbar! Hier nochmal der CODE:
Ich möchte nur die Datei in ein bestimmtes Verzeichnis kopieren. z.B.
ftp://www.homepage.de/uploads/
Könnt Ihr mir evtl. helfen.
Danke schon im Voraus!
Hab ein kleines Problem. Ich hab eine Homepage und möchte über ein PB Programm eine Datei uploaden.
Funktioniert mit dem vorgefertigten Programm aus dem Archiv wunderbar! Hier nochmal der CODE:
Code: Alles auswählen
#INTERNET_SERVICE_FTP=1
#INTERNET_OPEN_TYPE_DIRECT=1
#FTP_PORT=21
#FTP_TRANSFER_ASCII=1
#FTP_TRANSFER_BINARY=2
Proxy.s=""
ProxyBypass.s=""
ServerName.s="www.homepage.de"
UserName.s="user"
Password.s="passw"
localfile.s="loc.html"
remotefile.s="rem.html"
hInternet=InternetOpen_("FTP",#INTERNET_OPEN_TYPE_DIRECT,Proxy,ProxyBypass,0)
If hInternet
hConnect=InternetConnect_(hInternet,ServerName,#FTP_PORT,UserName,Password,#INTERNET_SERVICE_FTP,0,0)
If hConnect
If FtpPutFile_(hConnect,localfile,remotefile,#FTP_TRANSFER_ASCII,0)
MessageRequester("","File has been sent",0)
Else
MessageRequester("Error", "Failure while sending file...",0)
EndIf
Else
MessageRequester("Error", "Couldn't get a connection to the server!",0)
EndIf
InternetCloseHandle_(hInternet)
Else
MessageRequester("Error", "Internet isn't reachable.",0)
EndIf
ftp://www.homepage.de/uploads/
Könnt Ihr mir evtl. helfen.
Danke schon im Voraus!
