Salut,
#include <Wininet.h>
HINTERNET hOpen = ::InternetOpen((LPCSTR)"agent", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0); if(hOpen) { HINTERNET hConnect = ::InternetConnect(hOpen, "address", (INTERNET_PORT)21, "login", "password", INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, NULL); if(hConnect) { HINTERNET hFile = ::FtpOpenFile(hConnect, "filename.txt", GENERIC_WRITE, FTP_TRANSFER_TYPE_ASCII|INTERNET_FLAG_NEED_FILE); if(hFile) { DWORD written; char* data = "Writes data to an open Internet file.";
if(::InternetWriteFile(hFile, (LPCVOID)data, strlen(data), &written)) { TRACE("OK !!!\n "); }
::InternetCloseHandle(hFile); } ::InternetCloseHandle(hConnect); } ::InternetCloseHandle(hOpen); }
|