Форум АНТИЧАТ - Delphi (TWebBrowser)

Delphi (TWebBrowser)

24.11.2009, 22:31

Kandi

Познающий

Регистрация: 18.11.2009

Сообщений: 44

Провел на форуме:
134032

Репутация: 3

Отправить сообщение для Kandi с помощью ICQ

Delphi (TWebBrowser)

Hello всем...
Я недавно сделал себе левенький спамер ВКонтакте с TWebBrowser сделал поиск, потом сделал парс страницы ну и собственно вытаскивал на парсе такой код:
из

Код:

<li><a href="mail.php?act=write&amp;to=13555100">Сообщение</a>

Вытаскиваем это:

Код:

mail.php?act=write&amp;to=13555100

ну и собственно сохраняем....затем просто подставляем в ссылку http://vkontakte.ru/ ну и получается собственно http://vkontakte.ru/mail.php?act=write&to=58723152

Сообщения отправлял таким образом...:

Код:

Web.OleObject.document.getElementById('title').Value :=title.text;
Web.OleObject.document.getElementById('message').Value :=TEXT.Text;
......
  ........ 
       ........
 try
win.ExecScript('javascript:send_message()', Olelanguage);

Честно сказать украл этот код..особо в нём не разбирался....ну понял что работает как копи->паст->send...
(на точки не обращайте внимания...)

И вот у меня возник такой вопрос...
Я хочу написать самый простой VKInviter так же через TWebBrowser.....но тут возникает первый вопрос как?

Код на Инвайт в группу такой:

Код:

<a href="#invite" onclick="inviteMemberToGroup(IDGROUP , IDUSER); return false;">Выслать приглашение</a>

Здесь задействован JavaScript...сюда собственно и обращаюсь за помощью, мб кто нить может помочь, что нить придумать?

Я просто даже не могу понять...что к чему...!?!?

Прошу помощи....

З.Ы. delphi особо не знаю....

Последний раз редактировалось Kandi; 24.11.2009 в 22:37..