如何讀取http地址頁面內容,http地址有可能是夸網站
C#代碼
/// <summary>
/// 返回地址頁面的原始字串
/// </summary>
/// <param name="url">http地址</param>
/// <returns>返回地址頁面的原始字串</returns>
public string GetPageValue(string url)
{
System.Net.WebRequest request = System.Net.WebRequest.Create(url);
System.Net.WebResponse response = request.GetResponse();
System.IO.Stream stream = response.GetResponseStream();
System.IO.StreamReader reader = new System.IO.StreamReader(stream, System.Text.Encoding.Default);
System.Text.StringBuilder sbHtml = new System.Text.StringBuilder();
string line = "";
while ((line = reader.ReadLine()) != null)
{
sbHtml.Append(line);
}
return sbHtml.ToString();
}
VB.Net 代碼
''' <summary>
''' 返回地址頁面的原始字串
''' </summary>
''' <param name="url"></param>
''' <returns>http地址</returns>
''' <remarks>返回地址頁面的原始字串</remarks>
Public Function GetPageValue(ByVal url As String) As String
Dim request As System.Net.WebRequest = System.Net.WebRequest.Create(url)
Dim response As System.Net.WebResponse = request.GetResponse()
Dim stream As System.IO.Stream = response.GetResponseStream()
Dim reader As New System.IO.StreamReader(stream, System.Text.Encoding.Default)
Dim sbHtml As New System.Text.StringBuilder()
Dim line As String = ""
While (Not line Is Nothing)
line = reader.ReadLine()
sbHtml.Append(line)
End While
Return sbHtml.ToString()
End Function
ASP 代碼 :
/// <summary>
/// 返回地址頁面的原始字串
/// </summary>
/// <param name="url">http地址</param>
/// <returns>返回地址頁面的原始字串</returns>
public string GetPageValue(string url)
{
System.Net.WebRequest request = System.Net.WebRequest.Create(url);
System.Net.WebResponse response = request.GetResponse();
System.IO.Stream stream = response.GetResponseStream();
System.IO.StreamReader reader = new System.IO.StreamReader(stream, System.Text.Encoding.Default);
System.Text.StringBuilder sbHtml = new System.Text.StringBuilder();
string line = "";
while ((line = reader.ReadLine()) != null)
{
sbHtml.Append(line);
}
return sbHtml.ToString();
}
VB.Net 代碼
''' <summary>
''' 返回地址頁面的原始字串
''' </summary>
''' <param name="url"></param>
''' <returns>http地址</returns>
''' <remarks>返回地址頁面的原始字串</remarks>
Public Function GetPageValue(ByVal url As String) As String
Dim request As System.Net.WebRequest = System.Net.WebRequest.Create(url)
Dim response As System.Net.WebResponse = request.GetResponse()
Dim stream As System.IO.Stream = response.GetResponseStream()
Dim reader As New System.IO.StreamReader(stream, System.Text.Encoding.Default)
Dim sbHtml As New System.Text.StringBuilder()
Dim line As String = ""
While (Not line Is Nothing)
line = reader.ReadLine()
sbHtml.Append(line)
End While
Return sbHtml.ToString()
End Function
ASP 代碼 :
'請求的檢証地址
Set objSrvHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objSrvHTTP.open "GET",“https://max053/SSO.Authentication/CheckID.aspx”, False
objSrvHTTP.send
Response.ContentType = "text/html"
'經檢証後,返回的信息
Result = objSrvHTTP.responseText