Показать сообщение отдельно

Delphi (TWebBrowser)
  #1  
Старый 24.11.2009, 22:31
Kandi
Познающий
Регистрация: 18.11.2009
Сообщений: 44
С нами: 8673383

Репутация: 3
Question 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..
 
Ответить с цитированием