本文整理匯總了VB.NET中System.Net.FileWebResponse.Headers屬性的典型用法代碼示例。如果您正苦於以下問題：VB.NET FileWebResponse.Headers屬性的具體用法？VB.NET FileWebResponse.Headers怎麽用？VB.NET FileWebResponse.Headers使用的例子？那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。
在下文中一共展示了FileWebResponse.Headers屬性的1個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: GetPage
Public Shared Sub GetPage(url As [String])
Try
Dim fileUrl As New Uri("file://" + url)
' Create a 'FileWebrequest' object with the specified Uri.
Dim myFileWebRequest As FileWebRequest = CType(WebRequest.Create(fileUrl), FileWebRequest)
' Send the 'fileWebRequest' and wait for response.
Dim myFileWebResponse As FileWebResponse = CType(myFileWebRequest.GetResponse(), FileWebResponse)
' Display all Headers present in the response received from the Uri.
Console.WriteLine(ControlChars.Lf + ControlChars.Cr + "The following headers were received in the response: ")
' Headers property is a WebHeaderCollection. Using it's properties to traverse the collection and display each header.
Dim i As Integer
While i < myFileWebResponse.Headers.Count
Console.WriteLine(ControlChars.Cr + "Header Name:{0}, Header value :{1}", myFileWebResponse.Headers.Keys(i), myFileWebResponse.Headers(i))
i = i + 1
End While
myFileWebResponse.Close()
Catch e As WebException
Console.WriteLine(ControlChars.Lf + ControlChars.Cr + "The Reason for failure is : {0}", e.Status)
Catch e As Exception
Console.WriteLine(ControlChars.Cr + "The following exception was raised : {0}", e.Message)
End Try