string respHTML=reader .ReadToEnd (); this.txtHtmlSource .Text =respHTML ; }Dim url As String = "http://www.baidu.com/s?wd=abc" Dim httpReq As System.Net.HttpWebRequest Dim httpResp As System.Net.HttpWebResponse Dim httpURL As New System.Uri(url) httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest) httpReq.Method = "GET" httpResp = CType(httpReq.GetResponse(), HttpWebResponse) httpReq.KeepAlive = False Dim reader As StreamReader = _ New StreamReader(httpResp.GetResponseStream, System.Text.Encoding.GetEncoding("gb2312")) Dim respHTML As String = reader.ReadToEnd() Me.txtHtmlSource.Text = respHTML
System.Net.WebRequest request = System.Net.WebRequest.Create(PageUrl);
System.Net.WebResponse response = request.GetResponse();
System.IO.Stream resStream = response.GetResponseStream();
System.IO.StreamReader sr = new System.IO.StreamReader(resStream, System.Text.Encoding.Default);
string str= sr.ReadToEnd();
string str=wc.DownloadString("http://www.xxx.com");
protected void btnGetHtmlSource_Click(object sender, EventArgs e)
{
string url = "http://www.baidu.com/s?wd=abc";
HttpWebRequest httpReq;
HttpWebResponse httpResp;
Uri httpURL=new Uri(url);
httpReq = (HttpWebRequest)WebRequest.Create(httpURL);
httpReq .Method ="GET";
httpResp = (HttpWebResponse)httpReq.GetResponse();
httpReq .KeepAlive =false ;
Stream resStream = httpResp.GetResponseStream();
StreamReader reader = new StreamReader(resStream, Encoding.Default,false);
//StreamReader reader = new StreamReader(resStream, Encoding.GetEncoding("gb2312"), false);
string respHTML=reader .ReadToEnd ();
this.txtHtmlSource .Text =respHTML ;
}Dim url As String = "http://www.baidu.com/s?wd=abc"
Dim httpReq As System.Net.HttpWebRequest
Dim httpResp As System.Net.HttpWebResponse
Dim httpURL As New System.Uri(url)
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpReq.Method = "GET"
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
httpReq.KeepAlive = False Dim reader As StreamReader = _
New StreamReader(httpResp.GetResponseStream, System.Text.Encoding.GetEncoding("gb2312"))
Dim respHTML As String = reader.ReadToEnd()
Me.txtHtmlSource.Text = respHTML