webbrowser daki html kodunu nasıl alabilirim?

Katılım
7 Nisan 2007
Mesajlar
124
Excel Vers. ve Dili
office 2003
iyi çalışmalar
benim webbrowser ile ilgili bir sorum olacaktı.
bu sorumda google yi örnek aldım ancak. normalde şifreli bir site.
daha sonra kendime uyarlayacağım.
şimdi sorum şu.

webbrowser ile açmış olduğum google nin html kodlarını hernagi bir ( A1 hücresigibi) hücreye yazdırabilir miyim.

öneğin webbrowser açılımını tamamladıktan sonra a1 hücresinde aynen şu kodlar olsun istiyorum.
bunu nasıl yapabilirim acaba?

Kod:
<html><head><meta http-equiv="content-type" content="text/html; charset=UTF-8"><title>Google</title><script>window.google={kEI:"D5U3SpiDM47MjAfp_6SfDQ",kEXPI:"17259,18169",kHL:"tr"};
window.google.sn="webhp";window.google.timers={load:{t:{start:(new Date).getTime()}}};try{window.google.pt=window.gtbExternal&&window.gtbExternal.pageT()||window.external&&window.external.pageT}catch(b){}
window.google.jsrt_kill=1;
var _gjwl=location;function _gjuc(){var b=_gjwl.href.indexOf("#");if(b>=0){var a=_gjwl.href.substring(b+1);if(/(^|&)q=/.test(a)&&a.indexOf("#")==-1&&!/(^|&)cad=h($|&)/.test(a)){_gjwl.replace("/search?"+a.replace(/(^|&)fp=[^&]*/g,"")+"&cad=h");return 1}}return 0}function _gjp(){!(window._gjwl.hash&&window._gjuc())&&setTimeout(_gjp,500)};
window._gjp && _gjp();</script><style>body,td,a,p,.h{font-family:arial,sans-serif}.h{color:#36c;font-size:20px}.q{color:#00c}.ts td{padding:0}.ts{border-collapse:collapse}#gbar{height:22px;padding-left:0px}.gbh,.gbd{border-top:1px solid #c9d7f1;font-size:1px}.gbh{height:0;position:absolute;top:24px;width:100%}#gbi,#gbs{background:#fff;left:0;position:absolute;top:24px;visibility:hidden;z-index:1000}#gbi{border:1px solid;border-color:#c9d7f1 #36c #36c #a2bae7;z-index:1001}#guser{padding-bottom:7px !important;text-align:right}#gbar,#guser{font-size:13px;padding-top:1px !important}@media all{.gb1,.gb3{height:22px;margin-right:.5em;vertical-align:top}#gbar{float:left}}.gb2{display:block;padding:.2em .5em}a.gb1,a.gb2,a.gb3{color:#00c !important}.gb2,.gb3{text-decoration:none}a.gb2:hover{background:#36c;color:#fff !important}</style><script>google.y={};google.x=function(e,g){google.y[e.id]=[e,g];return false};window.clk=function(b,c,d,e,f,g,h){if(document.images){var a=encodeURIComponent||escape;(new Image).src=["/url?sa=T",c?"&oi="+a(c):"",d?"&cad="+a(d):"","&ct=",a(e||"res"),"&cd=",a(f),b?"&url="+a(b.replace(/#.*/,"")).replace(/\+/g,"%2B"):"","&ei=","D5U3SpiDM47MjAfp_6SfDQ",g].join("")}return true};
window.gbar={qs:function(){},tg:function(e){var o={id:'gbar'};for(i in e)o[i]=e[i];google.x(o,function(){gbar.tg(o)})}};</script></head><body bgcolor=#ffffff text=#000000 link=#0000cc vlink=#551a8b alink=#ff0000 onload="document.f.q.focus();if(document.images)new Image().src='/images/nav_logo4.png'" topmargin=3 marginheight=3><textarea id=csi style=display:none></textarea><div id=gbar><nobr><b class=gb1>Web</b> <a href="http://images.google.com.tr/imghp?hl=tr&tab=wi" onclick=gbar.qs(this) class=gb1>Görseller</a> <a href="http://news.google.com.tr/nwshp?hl=tr&tab=wn" onclick=gbar.qs(this) class=gb1>Haberler</a> <a href="http://groups.google.com.tr/grphp?hl=tr&tab=wg" onclick=gbar.qs(this) class=gb1>Gruplar</a> <a href="http://blogsearch.google.com.tr/?hl=tr&tab=wb" onclick=gbar.qs(this) class=gb1>Bloglar</a> <a href="http://translate.google.com.tr/?hl=tr&tab=wT" onclick=gbar.qs(this) class=gb1>Çeviri</a> <a href="http://mail.google.com/mail/?hl=tr&tab=wm" class=gb1>Gmail</a> <a href="http://www.google.com.tr/intl/tr/options/" onclick="this.blur();gbar.tg(event);return !1" aria-haspopup=true class=gb3><u>diğer</u> <small>▼</small></a><div id=gbi><a href="http://www.google.com/calendar/render?hl=tr&tab=wc" class=gb2>Takvim</a> <a href="http://picasaweb.google.com.tr/home?hl=tr&tab=wq" onclick=gbar.qs(this) class=gb2>Fotoğraflar</a> <a href="http://docs.google.com/?hl=tr&tab=wo" class=gb2>Dokümanlar</a> <a href="http://www.google.com.tr/reader/view/?hl=tr&tab=wy" class=gb2>Reader</a> <a href="http://sites.google.com/?hl=tr&tab=w3" class=gb2>Sites</a> <div class=gb2><div class=gbd></div></div><a href="http://www.google.com.tr/intl/tr/options/" class=gb2>daha fazlası »</a> </div></nobr></div><div id=guser width=100%><nobr><a href="/url?sa=p&pref=ig&pval=3&q=http://www.google.com.tr/ig%3Fhl%3Dtr%26source%3Diglk&usg=AFQjCNGtb2M6j0lwBUY2Y_lwPqEGgzQdTw">iGoogle</a> | <a href="https://www.google.com/accounts/Login?hl=tr&continue=http://www.google.com.tr/">Oturum açın</a></nobr></div><div class=gbh style=left:0></div><div class=gbh style=right:0></div><center><style>.pmoabs{position:absolute;right:0;top:24;}.pmoflt{float:right}#pmocntr{behavior:url(#default#userdata)}#pmocntr table{font-size:80%}#pmolnk,#pmolnk div{background:url(/images/modules/buttons/g-button-chocobo-basic-1.gif)}#pmolnk{width:170px}#pmolnk div{background-position:100% -400}#pmolnk div div{background-position:0 100%}#pmolnk a{white-space:nowrap;background:url(/images/modules/buttons/g-button-chocobo-basic-2.gif) 100% 100% no-repeat;color:#fff;display:block;padding:5px 15px 12px 10px;text-decoration:none}</style><div id=pmocntr class=pmoabs style="width:260px"><table><tr><td colspan=2><img border=0 src="/images/close_sm.gif" style="float:right" onclick="cpc()"><tr><td rowspan=2><img src="/images/chrome_48.gif"><td align=center><b>Web'de daha hızlı gezinin </b><tr><td align=center><div id=pmolnk><div><div><a href="/aclk?sa=L&ai=CCrwApJQ3Svb5KMWU-gbl7eWhC9u31oABofWy9gvv-_3lJxABIMFUULq45-kHYJkGqgQJT9C6nV4kPOdl&num=1&sig=AGiWqtwAoLv5OFQ1w6EnYUeRX3gG_00YGw&q=http://www.google.com/chrome/index.html%3Fhl%3Dtr%26brand%3DCHNG%26utm_source%3Dtr-hpp%26utm_medium%3Dhpp%26utm_campaign%3Dtr"><b>Google Chrome'u Kurun </b></a></div></div></table></div><script>(function(){var b='pmocntr',a=document.getElementById(b),c='d',d='i',e;function p(){a.style.display='none'}try{a.load(b);e=a.getAttribute(d)||0;if(a.getAttribute(c)||e>25){p()}else{a.setAttribute(d,++e);a.save(b)}}catch(z){}window.cpc=function(){p();try{a.setAttribute(c,1);a.save(b)}catch(z){}};window.onresize=function(){if(a.offsetWidth*2+document.getElementById('logo').offsetWidth>document.body.clientWidth){a.className='pmoflt'}else{a.className='pmoabs'}};window.lol=function(){window.onresize()}}())</script><br clear=all id=lgpd><div align=left style="background:url(/intl/en_com/images/logo_plain.png) no-repeat;height:110px;width:276px" title="Google" id=logo onload="window.lol&&lol()"><div nowrap style="color:#666;font-size:16px;font-weight:bold;left:208px;position:relative;top:78px">Türkiye</div></div><br><form action="/search" name=f><table cellpadding=0 cellspacing=0><tr valign=top><td width=25%> </td><td align=center nowrap><input name=hl type=hidden value=tr><input autocomplete="off" maxlength=2048 name=q size=55 title="Google'da Ara" value=""><br><input name=btnG type=submit value="Google'da Ara"><input name=btnI type=submit value="Şansımı Denemek İstiyorum"></td><td nowrap width=25% align=left><font size=-2>  <a href=/advanced_search?hl=tr>Gelişmiş Arama</a><br>  <a href=/preferences?hl=tr>Tercihler</a><br>  <a href=/language_tools?hl=tr>Dil Araçları</a></font></td></tr><tr><td align=center colspan=3><font size=-1><span style="text-align:left">Ara: <input id=all type=radio name=meta value="" checked><label for=all> Web </label> <input id=lgr type=radio name=meta value="lr=lang_tr"><label for=lgr> Türkçe sayfalar </label> <input id=cty type=radio name=meta value="cr=countryTR"><label for=cty> Türkiye'den sayfalar </label> </span></font></td></tr></table></form><br><br><font size=-1><a href="/intl/tr/ads/">Reklam Programlarımız</a> - <a href="/services/">İşletme Çözümleri</a> - <a href="/intl/tr/about.html">Google Hakkında</a> - <a href=http://www.google.com/ncr>Google.com in English</a><p id=shf0 style=display:none;behavior:url(#default#homePage)><font size=-1><a href="/aclk?sa=L&ai=CPCqSkY43SomBH5qBjAfc3pXJCsX4n3yFxKjHCs2tk5cREAEgwVRQvpyhyfj_____AWCZBqoECU_Q7irUTCro-g&num=1&sig=AGiWqtwsjPCXa9wv1NmN5N0IPo3ot9ocMA&q=/mgyhp.html" onclick=xz()>Google'ı ana sayfam yap</a></p><script>(function(){var a=document.getElementById("shf0"),b="http://www.google.com.tr/";try{a.isHomePage(b)||(a.style.display="block")}catch(z){}window.xz=function(){try{a.setHomePage(b);var c=new Image;c.src="/gen_204?mgmhp=shf0&ct=c&cd="+a.isHomePage(b);window.wy=c}catch(z){}}})();</script></font><p><font size=-2>©2009 - <a href="/intl/tr/privacy.html">Gizlilik</a></font></p></center><div id=xjsd></div><div id=xjsi><script>if(google.y)google.y.first=[];if(google.y)google.y.first=[];google.dstr=[];google.rein=[];window.setTimeout(function(){var a=document.createElement("script");a.src="/extern_js/f/CgJ0chICdHIrMAo4GywrMA44BSwrMBY4DCwrMBc4AywrMBg4BCwrMCU4yYgBLCswJjgELCswJzgALA/SQEXkeBrqgY.js";(document.getElementById("xjsd")||document.body).appendChild(a)},0);
;google.y.first.push(function(){google.ac.i(document.f,document.f.q,'','')});google.xjs&&google.j&&google.j.xi&&google.j.xi()</script></div><script>(function(){
function a(){google.timers.load.t.ol=(new Date).getTime();google.report&&google.report(google.timers.load,{ei:google.kEI,e:google.kEXPI})}if(window.addEventListener)window.addEventListener("load",a,false);else if(window.attachEvent)window.attachEvent("onload",a);google.timers.load.t.prt=(new Date).getTime();
})();
</script>
 

Ekli dosyalar

veyselemre

Özel Üye
Katılım
9 Mart 2005
Mesajlar
3,653
Excel Vers. ve Dili
Pro Plus 2021
Body kısmını aşağıdaki şekilde alabilirsin.
Kod:
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
    [a1] = WebBrowser1.Document.body.innerhtml
End Sub
 
Üst