Запись в файл на FTP сервер

Автор: SUnteXx

    // Сначала просимся в Интернет
    HINTERNET hInternetFile = 0;
    HINTERNET hInternet = InternetOpen (TEXT("YOUR_PROGRAM_NAME"), // <- Имя программы, которой выходите в инет...
                                                                   // Можите написать Ослика IE
                         INTERNET_OPEN_TYPE_DIRECT,
                         NULL, 0, 0);
 
    if (!hInternet)
    {
        MessageBox(0,"Connect to internet, plzzz","Error",MB_ICONSTOP);
        return 0;
    }
 
    // Коннектимся к серваку
    hInternetFile = InternetConnect(hInternet,
                         YOUR_FTP_HERE,                // <- FTP Адрес
                         INTERNET_DEFAULT_FTP_PORT,    // <- FTP порт
                         LOGIN,                        // <- Логин
                         PASSWORD,                     // <- Пароль
                         INTERNET_SERVICE_FTP,
                         0,
                         (DWORD)0);
 
    char sz[] = "Этот текст будет на FTP";
    DWORD d;
 
    if(hInternetFile)
    {
        // Открываем СУЩЕСТВУЮЩИЙ файл
        hInternetFile = FtpOpenFile(hInternetFile,
                    "/web/downloads/somefile.txt", // Папка + имя файла, в которую закачиваем
                    GENERIC_WRITE,
                    FTP_TRANSFER_TYPE_BINARY,
                    INTERNET_FLAG_RELOAD);
 
 
        if(!hInternetFile)
        {
            MessageBox(0,"Can't open the file",0,MB_ICONSTROP);
        }
        else
        {
            // Записываем файл
            if (InternetWriteFile(hInternetFile,sz,strlen(sz),&d) && d == strlen(sz))
                MessageBox(0,"All is allright","OK",MB_ICONINFORMATION);
            else
                MessageBox(0,"Can't write the file",0,MB_ICONSTROP);
        }
 
    }
    else
        MessageBox(0,"Can't connect to server",0,MB_ICONSTOP);
 
 
    InternetCloseHandle(hInternetFile);
 
faq/c_c_/writing_the_file_to_ftp.txt · Последние изменения: 2006/05/10 14:18 (внешнее изменение)
 
Recent changes RSS feed Donate Powered by PHP Valid XHTML 1.0 Valid CSS Driven by DokuWiki