Kandi
24.11.2009, 22:31
Hello всем...
Я недавно сделал себе левенький спамер ВКонтакте с TWebBrowser сделал поиск, потом сделал парс страницы ну и собственно вытаскивал на парсе такой код:
из
<li><a href="mail.php?act=write&to=13555100">Сообщение</a>
Вытаскиваем это:
mail.php?act=write&to=13555100
ну и собственно сохраняем....затем просто подставляем в ссылку http://vkontakte.ru/ ну и получается собственно http://vkontakte.ru/mail.php?act=write&to=58723152
Сообщения отправлял таким образом...:
Web.OleObject.document.getElementById('title').Val ue :=title.text;
Web.OleObject.document.getElementById('message').V alue :=TEXT.Text;
......
........
........
try
win.ExecScript('javascript:send_message()', Olelanguage);
Честно сказать украл этот код..особо в нём не разбирался....ну понял что работает как копи->паст->send...
(на точки не обращайте внимания...)
И вот у меня возник такой вопрос...
Я хочу написать самый простой VKInviter так же через TWebBrowser.....но тут возникает первый вопрос как? :eek:
Код на Инвайт в группу такой:
<a href="#invite" onclick="inviteMemberToGroup(IDGROUP , IDUSER); return false;">Выслать приглашение</a>
Здесь задействован JavaScript...сюда собственно и обращаюсь за помощью, мб кто нить может помочь, что нить придумать? :rolleyes:
Я просто даже не могу понять...что к чему...!?!? :confused:
Прошу помощи.... :(
З.Ы. delphi особо не знаю....
Я недавно сделал себе левенький спамер ВКонтакте с TWebBrowser сделал поиск, потом сделал парс страницы ну и собственно вытаскивал на парсе такой код:
из
<li><a href="mail.php?act=write&to=13555100">Сообщение</a>
Вытаскиваем это:
mail.php?act=write&to=13555100
ну и собственно сохраняем....затем просто подставляем в ссылку http://vkontakte.ru/ ну и получается собственно http://vkontakte.ru/mail.php?act=write&to=58723152
Сообщения отправлял таким образом...:
Web.OleObject.document.getElementById('title').Val ue :=title.text;
Web.OleObject.document.getElementById('message').V alue :=TEXT.Text;
......
........
........
try
win.ExecScript('javascript:send_message()', Olelanguage);
Честно сказать украл этот код..особо в нём не разбирался....ну понял что работает как копи->паст->send...
(на точки не обращайте внимания...)
И вот у меня возник такой вопрос...
Я хочу написать самый простой VKInviter так же через TWebBrowser.....но тут возникает первый вопрос как? :eek:
Код на Инвайт в группу такой:
<a href="#invite" onclick="inviteMemberToGroup(IDGROUP , IDUSER); return false;">Выслать приглашение</a>
Здесь задействован JavaScript...сюда собственно и обращаюсь за помощью, мб кто нить может помочь, что нить придумать? :rolleyes:
Я просто даже не могу понять...что к чему...!?!? :confused:
Прошу помощи.... :(
З.Ы. delphi особо не знаю....