ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
29.03.2009, 09:09
|
|
Участник форума
Регистрация: 16.07.2008
Сообщений: 159
Провел на форуме:
1063538
Репутация:
240
|
|
Как залить на фтп, ну или на хост чтобы не вводить логин и пароль, папки и в них еще есть файлы?
|
|
|
29.03.2009, 10:33
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от Sin3v
Как залить на фтп, ну или на хост чтобы не вводить логин и пароль, папки и в них еще есть файлы?
Ты сам читал, что написал? Я ничего не понял, напиши по-русски.
|
|
|
|
29.03.2009, 10:35
|
|
Участник форума
Регистрация: 16.07.2008
Сообщений: 159
Провел на форуме:
1063538
Репутация:
240
|
|
Ну у меня папка в ней папки а в папках файлы мне надо залить все из той папки на фтп программно
|
|
|
|
29.03.2009, 10:54
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от Sin3v
Ну у меня папка в ней папки а в папках файлы мне надо залить все из той папки на фтп программно
А тебе нужно просто скажем просто чтоб кто-то скачал это всё? или чтоб именно доступ был через фтп?
. просто если только скачать надо, то лучше сначала зазиповать всю папку, затем залить на файлообменник)
нормальный фтп серв вот
http://www.filehoster.ru/
ещё есть вариант злоупотребить моим доступом к одному серверу, но это может быть только на короткие сроки( пока не пропалит администрация)..
P.s Изучай теорию сокетов и протоколов.
Последний раз редактировалось KaZ@NoVa; 29.03.2009 в 11:51..
|
|
|
|
29.03.2009, 12:00
|
|
Участник форума
Регистрация: 16.07.2008
Сообщений: 159
Провел на форуме:
1063538
Репутация:
240
|
|
Короче пишу троя он дожен перелить все папки с файлами отсюда куданить на хост или на фтп чтобы не вводить логин и пароль C:\Documents and Settings\*******\Application Data\Mra\real_sinev@mail.ru
|
|
|
|
29.03.2009, 12:20
|
|
Познающий
Регистрация: 28.03.2009
Сообщений: 30
Провел на форуме:
453605
Репутация:
1
|
|
Вот собсно начал изучать WinSock в делфях. Вроде все сделал опираясь на готовые примеры.
Код:
Код:
program winsock;
{$APPTYPE CONSOLE}
uses
sysutils, winsock, windows;
const
port = 1221;
var
D:WSAData;
S:TSocket;
A:sockaddr_in;
sendbuf:String;
ip:string;
begin
sendbuf:='Hello world!!!';
writeln('IP:');
Readln(ip);
if WSAStartup(makeword(1,1),D)<>0 then
begin
writeln('error..');
exit;
end;
S:=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);
A.sin_family:=AF_INET;
A.sin_addr.S_addr:=inet_addr(pchar(ip));
if S=INVALID_SOCKET then writeln('Socket error.');
A.sin_port:=htons(port);
if connect(S,A,sizeof(TSockAddr))=0 then
Writeln('Connect!!!!');
Send(S,sendbuf,Length(sendbuf),0);
WSACleanup;
readln; readln;
end.
Сервер сделал с помощью компонента TServerSocket.
Коннект к серваку идет, а сообщение не приходит. В чем может быть проблема?
Последний раз редактировалось gLuk!; 29.03.2009 в 12:29..
|
|
|
|
29.03.2009, 12:37
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от gLuk!
Вот собсно начал изучать WinSock в делфях. Вроде все сделал опираясь на готовые примеры.
Код:
Код:
program winsock;
{$APPTYPE CONSOLE}
uses
sysutils, winsock, windows;
const
port = 1221;
var
D:WSAData;
S:TSocket;
A:sockaddr_in;
sendbuf:String;
ip:string;
begin
sendbuf:='Hello world!!!';
writeln('IP:');
Readln(ip);
if WSAStartup(makeword(1,1),D)<>0 then
begin
writeln('error..');
exit;
end;
S:=socket(AF_INET,SOCK_STREAM,IPPROTO_TCP);
A.sin_family:=AF_INET;
A.sin_addr.S_addr:=inet_addr(pchar(ip));
if S=INVALID_SOCKET then writeln('Socket error.');
A.sin_port:=htons(port);
if connect(S,A,sizeof(TSockAddr))=0 then
Writeln('Connect!!!!');
Send(S,sendbuf,Length(sendbuf),0);
WSACleanup;
readln; readln;
end.
Сервер сделал с помощью компонента TServerSocket.
Коннект к серваку идет, а сообщение не приходит. В чем может быть проблема? Возможно дело в Наверное лучше просто вписать вместо него ноль и посмотреть что будет.
а ещё чтоб найти ошибку можно повыводить предварительные результаты( то есть то что возвращают нам функции на экран).
ещё можно попробовать вместо
|
|
|
|
29.03.2009, 12:44
|
|
Познающий
Регистрация: 28.03.2009
Сообщений: 30
Провел на форуме:
453605
Репутация:
1
|
|
Пробовал 0 ставить и Send на SendTo менял... компилит нормально, коннект идет а сообщение не отправляет.
|
|
|
|
29.03.2009, 12:50
|
|
Познавший АНТИЧАТ
Регистрация: 05.05.2008
Сообщений: 1,078
Провел на форуме:
10311449
Репутация:
1357
|
|
Можно ли на Делфи написать программу, которая бы открывала ярлык подключения интернета, вписывала туда пароль и жмякала на подключение?
//просто у меня ночью инет вырубается а сам переподключиться не может =/
|
|
|
|
29.03.2009, 13:14
|
|
Постоянный
Регистрация: 05.07.2008
Сообщений: 555
Провел на форуме:
3134311
Репутация:
1467
|
|
Сообщение от gLuk!
Пробовал 0 ставить и Send на SendTo менял... компилит нормально, коннект идет а сообщение не отправляет.
я вот тут поискал и нашёл хороший сайтик.
там довольно мало и кратко изложено, но в целом понятно.
http://forum.prologic.ws/lofiversion/index.php?t676....
к сожалению у себя протестировать всё это не могу( дульфи на виртуалке не установлен, а лазарус винсок не поддерживает как я понял)
Надеюсь эта страничка поможет.
ещё....сервер должен иметь функцию приёма пакета
она называется вроде recvfrom
|
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Комбинированный вид