как выполнить клик по google?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
theal
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 148
Зарегистрирован: 03.05.2009 (Вс) 16:12

как выполнить клик по google?

Сообщение theal » 13.01.2013 (Вс) 19:35

вот код страницы с рекламой
Код: Выделить всё
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
    "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ru">
<head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
    <meta http-equiv="X-UA-Compatible" content="IE=EmulateIE7" />
   <title>
   Главная /


   Porsche Cayenne
   </title>
   <link rel="stylesheet" type="text/css" href="/usercss/users/informers.css" />
   <meta name="keywords" content="Главная" />
   <meta name="description" content="Главная" />

   <link rel="stylesheet" type="text/css" href="/usercss/users/theme/commerce.css" />
   <link rel="stylesheet" type="text/css" href="/usercss/b-narod-toolbar.css" />
   <!--[if lte IE 8]><link rel="stylesheet" type="text/css" href="/usercss/b-narod-toolbar.ie.css" /><![endif]-->
   <!--[if lte IE 8]><link rel="stylesheet" type="text/css" href="/usercss/users/ie.css" /><![endif]-->
       <link rel="stylesheet" type="text/css" class="userCss" href="/usercss/users/color/bw.css" />
   <!--[if lte IE 8]><link rel="stylesheet" type="text/css" class="userCss" href="/usercss/users/color/bw-ie.css" /><![endif]-->

   
   <script type="text/javascript" src="//yandex.st/jquery/1.4.2/jquery.min.js"></script>
   
   <script type="text/javascript" src="/userjs/jquery.placeholder.js"></script>
   <script type="text/javascript" src="/userjs/jquery.galleria.js"></script>
   <script type="text/javascript" src="/userjs/counter.js"></script>
   <script type="text/javascript" src="//yandex.st/share/share.js" charset="utf-8"></script>
   <link rel="stylesheet" type="text/css" href="/css/user.css" />   
   <link rel="shortcut icon" href="/favicon.ico"/>
</head>
<body class="body-background"><i style="background:url(//www.tns-counter.ru/V13a****yandex_ru/ru/CP1251/tmsec=narod_total/0)"></i>
<!-- Yandex.Metrika counter -->
<script src="//mc.yandex.ru/metrika/watch.js" type="text/javascript"></script>
<script type="text/javascript">
try { var yaCounter12663031 = new Ya.Metrika({id:12663031});}
catch(e) { }
</script>
<noscript><div><img src="//mc.yandex.ru/watch/12663031" style="position:absolute; left:-9999px;" alt="" /></div></noscript>
<!-- /Yandex.Metrika counter -->


    <div class="b-body">
        <table class="layout">
       <col width="15%"></col><col width="25%"></col><col width="60%"></col>
          <tr>
                <td style="width: 15%;">
                    <div class="holster">
<div class="block_container s3 b-counter b-widget" id="e_13306923524">
<!-- AddThis Button BEGIN -->
<div class="addthis_toolbox addthis_default_style addthis_32x32_style">
<a class="addthis_button_preferred_1"></a>
<a class="addthis_button_preferred_2"></a>
<a class="addthis_button_preferred_3"></a>
<a class="addthis_button_compact"></a>
<a class="addthis_counter addthis_bubble_style"></a>
</div>
<script type="text/javascript" src="http://s7.addthis.com/js/250/addthis_widget.js#pubid=xa-4f4372d021efea2e"></script>
<!-- AddThis Button END -->
</div><div class="block_container s3 b-image txt-center " id="e_132939087325">
<span><img src="/porsche_logo_8.jpg" alt="" /></span>

</div><div class="block_container s3 b-counter b-widget " id="e_132939499647">
<html>
<head>



</head>
<body>

<table border="0">
<tr>
<td align="center"><font face="Arial"><strong>Вы находитесь на сайте уже:</strong></font></td>
<td align="center"><form name="d">
<p><input type="text" size="8" name="d2"></p>
</form>
</td>
<td align="center"><font face="Arial"><strong>секунд!</strong></font></td>
</tr>
</table>
<script>
<!--
/*By George Chiang. (WA's ultimate JavaScript tutorial and free JavaScripts site!)
http://www.wsabstract.com
Credit MUST stay intact for use*/
var milisec=0
var seconds=0
document.d.d2.value='0'
function display(){
if (milisec>=9){
milisec=0
seconds+=1
}
else
milisec+=1
document.d.d2.value=seconds+"."+milisec
setTimeout("display()",100)
}
display()
//-->
</script>


</body>
</head>
</html>
</div>
                    </div>
                </td>
                <td>
                    <div class="holster">
<div class="block_container s3 b-image txt-center " id="e_1329391593322">
<span><img src="/normal_2.jpg" alt="" /></span>

</div>
                    </div>
                </td>
                <td>
                    <div class="holster">
<div class="block_container s3 b-counter b-widget" id="e_133754578544">
<script type="text/javascript"><!--
google_ad_client = "ca-pub-7481866188445527";
/* сверху справа */
google_ad_slot = "3682958945";
google_ad_width = 336;
google_ad_height = 280;
//-->
</script>
<script type="text/javascript"
src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script>
</div>
                    </div>
                </td>
            </tr>
        </table>
        <table class="layout">
         <col width="20%"></col><col width="80%"></col>
            <tr>
                <td style="width: 20%;">
                   <div class="holster">
<div class="block_container s3 b-menu b-menu_marker " id="e_1329395486830">
<ul><li class="active"><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><b>Главная</b></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/istoriya_porsche_cayenne/'>История Porsche Cayenne</a></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/komplektatsiya_porsche_cayenne/'>Комплектация Porsche Cayenne</a><ul></ul></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/osnovnie_tehnicheskie_harakteristiki_porsche_cayenne/'>Основные технические характеристики Porsche Cayenne</a><ul></ul></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/stoimost_porsche_cayenne/'>Стоимость Porsche Cayenne</a></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/foto_porsche_cayenne/'>Фото Porsche Cayenne</a><ul></ul></li> <li><i class="b-menu-mark g-png"><img alt=">>" src="/inc/bullet.jpg?rnd=116972473134164" /></i><a class='link' href='/video_porsche_cayenne/'>Видео Porsche Cayenne</a></li> </ul>
</div><div class="block_container s3 b-counter b-widget " id="e_132939658552">
<script type="text/javascript" src="http://jj.revolvermaps.com/r.js"></script><script type="text/javascript">rm_f1st('6','220','false','false','000000','90ugbn3sg8h','false','ff0000');</script><noscript><applet codebase="http://rj.revolvermaps.com/j" code="core.RE" width="220" height="220" archive="g.jar"><param name="cabbase" value="g.cab" /><param name="r" value="false" /><param name="n" value="false" /><param name="i" value="90ugbn3sg8h" /><param name="m" value="6" /><param name="s" value="220" /><param name="c" value="ff0000" /><param name="v" value="false" /><param name="b" value="000000" /><param name="rfc" value="true" /></applet></noscript>
</div><div class="block_container s3 b-text b-static-text" id="e_13298219361">
<p><img src="http://www.rykunovdesign.com/porsche/new3/2010-porsche-cayenne-turbo-a2z.jpg" alt="2010 Porsche Cayenne Turbo"></p><div class="_pm_clear_img" style="clear: both;"></div>
</div>
                   </div>
                </td>
                <td>
               <div class="holster b-main">
<div class="block_container s3 b-text b-static-text " id="e_13293917718">
<h1><strong>Porsche Cayenne&nbsp;</strong><strong><strong>создан для тех, кто привык выбирать для себя все самое лучшее!&nbsp;</strong></strong><strong>Porsche Cayenne&nbsp;</strong><strong><strong>– настоящий «автомобиль будущего!</strong></strong></h1><div class="_pm_clear_img" style="clear: both;"></div>
</div><div class="block_container s3 b-image txt-center " id="e_132939151436">
<span><img src="/normal_1.jpg" alt="" /></span>

</div><div class="block_container s3 b-text b-static-text " id="e_132939173775">
<h1><strong>Porsche Cayenne – идеальное сочетание прекрасных внедорожных качеств и&nbsp;отличной динамики.</strong></h1><div class="_pm_clear_img" style="clear: both;"></div>
</div>
               </div>
                </td>
            </tr>
        </table>
       
        <table class="layout">
         <col width="33%"></col><col width="34%"></col><col width="33%"></col>
            <tr>
                <td style="width: 33%">
                    <div class="holster">
<div class="block_container s3 b-counter b-widget" id="e_132939216435">
<!-- hit.ua -->
<a href='http://hit.ua/?x=34499' target='_blank'>
<script language="javascript" type="text/javascript"><!--
Cd=document;Cr="&"+Math.random();Cp="&s=1";
Cd.cookie="b=b";if(Cd.cookie)Cp+="&c=1";
Cp+="&t="+(new Date()).getTimezoneOffset();
if(self!=top)Cp+="&f=1";
//--></script>
<script language="javascript1.1" type="text/javascript"><!--
if(navigator.javaEnabled())Cp+="&j=1";
//--></script>
<script language="javascript1.2" type="text/javascript"><!--
if(typeof(screen)!='undefined')Cp+="&w="+screen.width+"&h="+
screen.height+"&d="+(screen.colorDepth?screen.colorDepth:screen.pixelDepth);
//--></script>
<script language="javascript" type="text/javascript"><!--
Cd.write("<img src='http://c.hit.ua/hit?i=34499&g=0&x=5"+Cp+Cr+
"&r="+escape(Cd.referrer)+"&u="+escape(window.location.href)+
"' border='0' width='88' height='31' "+
"alt='hit.ua: посетителей и просмотров за сегодня' title='hit.ua: посетителей и просмотров за сегодня'/>");
//--></script>
<noscript>
<img src='http://c.hit.ua/hit?i=34499&g=0&x=5' border='0' width='88' height='31' alt='hit.ua: посетителей и просмотров за сегодня' title='hit.ua: посетителей и просмотров за сегодня'/>
</noscript></a>
<!-- / hit.ua -->

</div>
                    </div>
                </td>
                <td>
                    <div class="holster">
<div class="block_container s3 b-text b-static-text txt-center " id="e_122892182474">
© Porsche Cayenne Auto<div class="_pm_clear_img" style="clear: both;"></div>
</div><div class="block_container s3 b-image txt-center" id="e_1329391013165">
<span><img src="/Porsche-Logo.jpg" alt="" /></span>

</div>
                    </div>
                </td>
                <td style="width: 33%">
                    <div class="holster">
                    </div>
                </td>
            </tr>
        </table>
    </div>
   
</body>
</html>

Использовал код клика по testlink.href
Код: Выделить всё
Private Sub Command4_Click()
While WebBrowser1.ReadyState <> READYSTATE_COMPLETE
        DoEvents
    Wend
    For Each TestLink In WebBrowser2.Document.links
    If InStr(1, TestLink.href, "www.googleadservices.com/pagead/aclik?sa=", vbTextCompare) Then
        List1.AddItem TestLink.innerText
        Text3 = Text3 + WebBrowser2.LocationURL + Chr(13) + Chr(10)
         TestLink.Click
            Exit For
        End If
               Next TestLink
End Sub
Результата нет

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 13.01.2013 (Вс) 20:57

theal писал(а):
Код: Выделить всё
While WebBrowser1.ReadyState <> READYSTATE_COMPLETE
        DoEvents
Wend

Зачем это? Во-первых, можно обрабатывать Document_Complete. Во вторых, плохой стиль писать While-Wend, есть Do-Loop.

И вообще, кончай плодить одинаковые темы. И начинай сначала проверять, а потом спрашивать. На твоей странице нет такой ссылки!

theal
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 148
Зарегистрирован: 03.05.2009 (Вс) 16:12

Re: как выполнить клик по google?

Сообщение theal » 13.01.2013 (Вс) 21:01

там есть рекламный блок от гугла. http://porschecayenneauto.narod.ru/ посмотри.но он закодирован.Прогой htmlspy просмотреть не возможно. Как узнать куда кликнуть?
fiddler выдаёт вот это после клика в блок
Код: Выделить всё
GET /aclk?sa=L&ai=CkHNPXcnyUNKKIIa-yAOg0oD4CeD4yZwDkKaUz0XAjbcBEAEg-ZWXKigEUIGPxdkGYISV7IXcHcgBAakCrRa4ddOzYT6oAwHIA98EqgSTAU_QO5-GUGI1WtBHtundCUZ9ihUOW70KVqsom1He_m5yX_F8Yi1X4BZzPLTTwSsYYwBpssNn0NJ2vcgt929EmyvTOCvnGqKFPz3YEjwxGsAct29D7tIde7VrXB2EPUAJTzvp4jpTnr6ez588YAjPqw4hSWj3PMtLx70QNmlC7oT4sNKuGayMI7IjBfKBlc00wzgLX4AHmJaaIg&num=1&sig=AOD64_14R996ihIB7vD1nmBfKJ6BUCStdg&client=ca-pub-7481866188445527&adurl=http://www.nemdom.ru/special-offers/special-sale/176&nm=38&nx=55&ny=10&mb=1&nb=0&clkt=125&jca=1398&bg=!A0LPqcQLcYmXqEQWqO7MwYov5AIAAAVQUgAAAI0qAIuYWblSzDNKM3OrPRhqLNO8YeDxjj6mt1O-9XeftRAOFpkmQphVe8sbTRjgJcxbAPTSGNtZN79QUGpXfNhuIrzEsxYJnobXEnmbzESl8kZK5rvtLYmYMEqXvoXuRx9NfVZ0QyAj_u5I35OokUGpsq4Tv7-d7aJk-wvN8htQNNbRvoIZXYqhpGp8xMhF HTTP/1.1
Accept: */*
Referer: http://googleads.g.doubleclick.net/pagead/ads?client=ca-pub-7481866188445527&output=html&h=280&slotname=3682958945&w=336&lmt=1358088540&flash=10.1.85.3&url=http%3A%2F%2Fporschecayenneauto.narod.ru%2Fistoriya_porsche_cayenne%2F&dt=1358088540343&bpp=32&shv=r20130102&jsv=r20121214&correlator=1358088540546&frm=20&adk=1656017953&ga_vid=1710244142.1358088541&ga_sid=1358088541&ga_hid=888689769&ga_fc=0&u_tz=180&u_his=2&u_java=1&u_h=768&u_w=1024&u_ah=738&u_aw=1024&u_cd=32&u_nplug=0&u_nmime=0&dff=arial&dfs=0&adx=-2&ady=-2&biw=1004&bih=584&oid=3&ref=http%3A%2F%2Fporschecayenneauto.narod.ru%2F&docm=8&fu=0&ifi=1&dtd=453&xpc=2AVSsr4Y4X&p=http%3A//porschecayenneauto.narod.ru
Accept-Language: ru
User-Agent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 5.1; Trident/4.0; .NET CLR 2.0.50727; .NET CLR 3.0.4506.2152; .NET CLR 3.5.30729)
Accept-Encoding: gzip, deflate
Host: googleads.g.doubleclick.net
Connection: Keep-Alive
Cookie: _drt_=NO_DATA; id=220a9baf6b010070||t=1358088435|et=730|cs=002213fd48becf1fdaad8962b4

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Re: как выполнить клик по google?

Сообщение Хакер » 13.01.2013 (Вс) 21:05

Theal, если ты продолжишь вести себя в подобном духе, ты будешь наказан.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 75

    TopList