请问如何获得网页的源代码?
我要在我的网页中获得:http:www.baidu.com/这个网页的源代码来进行分析,如何从网上获得他的源代码?
------解决方案--------------------set x=server.createObject("Microsoft.XMLHTTP")
x.open "get","http://www.baidu.com",false
x.send
dim str
str = x.responseText
------解决方案--------------------   function bin2str(bin)
       dim tmp,ustr
       tmp=""
       for i=1 to LenB(bin)-1
           ustr=AscB(MidB(bin,i,1))
           if ustr>127 then
               i=i+1
               tmp=tmp&chr(ustr*256+AscB(MidB(bin,i,1)))
           else
               tmp=tmp&chr(ustr)
           end if
       next
       bin2str=tmp
   end function  
   set x=server.createObject("Microsoft.XMLHTTP")
   x.open "get","http://www.webjx.com",false
   x.send
   str=bin2str(x.responseBody)
   response.write "<xmp>"&str&"</xmp>"
   set x=nothing  
这样可以获取中文
------解决方案--------------------看你要用什么方式了,用ASP,PHP,JSP,ASP。NET,都可以。这里给你PHP的代码吧。
@$fp = fsockopen("hk.finance.yahoo.com",80, $errno, $errstr,60);  
if (!$fp) {  
 //echo "$errstr ($errno)<br/>\n";  
} else {  
 $out = "GET /q?s=0348.HK HTTP/1.1\r\n";  
 $out .= "Host: hk.finance.yahoo.com \r\n";  
 $out .= "Connection: Close \r\n\r\n";    
 @fputs($fp, $out);  
 while (!feof($fp)) {  
 	$line = fgets ($fp, 1024);
	echo $line."<br>";
	break;  
	}  
 }  
 fclose($fp);