本文整理匯總了VB.NET中System.Net.HttpWebRequest.Referer屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET HttpWebRequest.Referer屬性的具體用法？VB.NET HttpWebRequest.Referer怎麽用？VB.NET HttpWebRequest.Referer使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。
在下文中一共展示了HttpWebRequest.Referer屬性的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: readBuffer
' Create a 'HttpWebRequest' object.
Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create(myUri), HttpWebRequest)
' Referer property is set to http://www.microsoft.com
myHttpWebRequest.Referer = "http://www.microsoft.com"
' The response object of 'HttpWebRequest' is assigned to a 'HttpWebResponse' variable.
Dim myHttpWebResponse As HttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)
' Displaying the contents of the page to the console
Dim streamResponse As Stream = myHttpWebResponse.GetResponseStream()
Dim streamRead As New StreamReader(streamResponse)
Dim readBuffer(256) As [Char]
Dim count As Integer = streamRead.Read(readBuffer, 0, 256)
Console.WriteLine(ControlChars.Cr + "The contents of HTML page are.......")
While count > 0
Dim outputData As New [String](readBuffer, 0, count)
Console.Write(outputData)
count = streamRead.Read(readBuffer, 0, 256)
End While
Console.WriteLine(ControlChars.Cr + "HTTP Request Headers :" + ControlChars.Cr + ControlChars.Cr + "{0}", myHttpWebRequest.Headers)
Console.WriteLine(ControlChars.Cr + "HTTP Response Headers :" + ControlChars.Cr + ControlChars.Cr + "{0}", myHttpWebResponse.Headers)
' Release the response object resources.
streamRead.Close()
streamResponse.Close()
myHttpWebResponse.Close()
Console.WriteLine("Referer to the site is:{0}", myHttpWebRequest.Referer)