Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
10.10.2009, 21:57
|
|
Познающий
Регистрация: 16.04.2009
Сообщений: 83
Провел на форуме:
967037
Репутация:
16
|
|
ftp в Delphi 7
сабж: требуется передать файл на фтп сервер..
это дело должно быть на api или с использованием wininet..
дайте линк на статью по этому поводу или код подобный..
|
|
|
10.10.2009, 23:43
|
|
Участник форума
Регистрация: 17.05.2008
Сообщений: 102
Провел на форуме:
1054394
Репутация:
74
|
|
http://www.cracklab.ru/pro/faq.php?pg=2302
этого должно быть достаточно что бы разобраться.
Последний раз редактировалось xa-xa89; 10.10.2009 в 23:46..
|
|
|
|
10.10.2009, 23:49
|
|
Участник форума
Регистрация: 09.03.2009
Сообщений: 178
Провел на форуме:
1605524
Репутация:
523
|
|
юзай компонент IdFTP
|
|
|
|
10.10.2009, 23:52
|
|
Участник форума
Регистрация: 17.05.2008
Сообщений: 102
Провел на форуме:
1054394
Репутация:
74
|
|
2AquaKlaster
это дело должно быть на api или с использованием wininet..
|
|
|
|
10.10.2009, 23:56
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241
Репутация:
3349
|
|
примерная последовательность действий
Код:
hNet := InternetOpen('FTPCLIENT', INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0);
hFTP := InternetConnect (hNet, pchar(ftp), INTERNET_DEFAULT_FTP_PORT, pchar(login), pchar(pass), INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
FtpPutFile(hFTP, 'c:\file.txt', 'file.txt', FTP_TRANSFER_TYPE_BINARY, 0);
InternetCloseHandle(hFTP);
InternetCloseHandle(hNet );
|
|
|
|
11.10.2009, 22:20
|
|
Познающий
Регистрация: 16.04.2009
Сообщений: 83
Провел на форуме:
967037
Репутация:
16
|
|
Сообщение от slesh
примерная последовательность действий
Код:
hNet := InternetOpen('FTPCLIENT', INTERNET_OPEN_TYPE_DIRECT, nil, nil, 0);
hFTP := InternetConnect (hNet, pchar(ftp), INTERNET_DEFAULT_FTP_PORT, pchar(login), pchar(pass), INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
FtpPutFile(hFTP, 'c:\file.txt', 'file.txt', FTP_TRANSFER_TYPE_BINARY, 0);
InternetCloseHandle(hFTP);
InternetCloseHandle(hNet );
спс) я уже именно так и сделал 
|
|
|
|
|
|
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
Литература Delphi
|
Sams |
С/С++, C#, Delphi, .NET, Asm |
2 |
19.03.2010 19:46 |
|
Delphi for FTP
|
Stil Free |
С/С++, C#, Delphi, .NET, Asm |
1 |
15.02.2009 12:04 |
|
FTP сервер на Delphi
|
Ch3ck |
С/С++, C#, Delphi, .NET, Asm |
1 |
15.12.2006 20:04 |
|
Общие сведения о Ftp уязвимостях.
|
ReVOLVeR |
Чужие Статьи |
0 |
15.09.2006 19:27 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Линейный вид
