Hi, I am getting an error since I move my domain to another provider.
I am using the Tftp-client to upload files to my website in specific
folders.
If I upload them with the client, I see that the size is about 7 to 10 in
size smaller, however using the logging in the client shows me that the file
was uploaded successfully.
When I use for example totalcommander to upload, there is no problem, and
the full file is sent ok.
Difference is that this provider has a pureftp server for this, which is
different from my previous provider.
Log:
12:38:22:009 >|220-You are user number 2 of 500 allowed.|
12:38:22:014 >|220-Local time is now 03:38. Server port: 21.|
12:38:22:015 >|220-This is a private system - No anonymous login|
12:38:22:016 >|220 You will be disconnected after 3 minutes of inactivity.|
12:38:22:017 ! HighLevelAsync 0
12:38:22:021 04FF04B0 TriggerDataSent 908
12:38:22:186 >|331 User andre0214 OK. Password required|
12:38:22:192 ! HighLevelAsync 0
12:38:22:197 04FF04B0 TriggerDataSent 908
12:38:22:374 >|230-User andre0214 has group access to: 450 |
12:38:22:380 >|230 OK. Current directory is /|
12:38:22:384 ! HighLevelAsync 0
12:38:22:387 ! HighLevelAsync done
12:38:22:889 04FF04B0 TriggerDataSent 908
12:38:23:054 >|250 OK. Current directory is /folder1/test|
12:38:23:060 ! HighLevelAsync 0
12:38:23:066 04FF04B0 TriggerDataSent 908
12:38:23:226 >|200 PORT command successful|
12:38:23:230 ! HighLevelAsync 0
12:38:23:239 04FF04B0 TriggerDataSent 908
12:38:23:577 ! Data Session requested
12:38:23:583 04FF0C70 Socket accepted 936
12:38:23:587 04FF0C70 TCustomWSocket.Shutdown 1 932
12:38:23:589 ! Data Session opened
12:38:23:592 >|150 Connecting to port 61229|
12:38:23:593 04FF0C70 TriggerDataSent 936
12:38:23:594 DataSocketPutDataSent 688
12:38:23:595 04FF0C70 TriggerDataSent 936
12:38:23:597 DataSocketPutDataSent 0
12:38:23:598 04FF0C70 TCustomWSocket.Shutdown 1 936
12:38:23:766 ! Data Session closed
12:38:23:771 ! Next3PutAsync
12:38:23:780 04FF0C70 TCustomWSocket.Shutdown 1 936
12:38:24:513 >|226-File successfully transferred|
12:38:24:516 >|226 0.192 seconds (measured here), 3.48 Kbytes per second|
Code used:
//Username and password are hardcoded in the tftpclient..
ftp.Hostname := {website mentioned here};
ftp.HostDirName := uploaddir;
// go and upload the file here
ftp.LocalFileName := ExtractFilePath(Application.ExeName)+'kml\'+localfile;
ftp.HostFileName := customer +'.kmz';
ftp.Connect;
sleep(500);
ftp.Cwd;
done := false;
ftp.put;
ftp.Quit;
Any idea where I need to look??
Best regards,
Ruud Kerstens
--
To unsubscribe or change your settings for TWSocket mailing list
please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket
Visit our website at http://www.overbyte.be
