本文整理匯總了VB.NET中System.Net.HttpWebRequest.HaveResponse屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET HttpWebRequest.HaveResponse屬性的具體用法?VB.NET HttpWebRequest.HaveResponse怎麽用?VB.NET HttpWebRequest.HaveResponse使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。
在下文中一共展示了HttpWebRequest.HaveResponse屬性的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: CType
' Create a new 'HttpWebRequest' Object.
Dim myHttpWebRequest As HttpWebRequest = CType(WebRequest.Create("http://www.contoso.com"), HttpWebRequest)
Dim myHttpWebResponse As HttpWebResponse
' Display the 'HaveResponse' property of the 'HttpWebRequest' object to the console.
Console.WriteLine(ControlChars.Cr + "The value of 'HaveResponse' property before a response object is obtained :{0}", myHttpWebRequest.HaveResponse)
' Assign the response object of 'HttpWebRequest' to a 'HttpWebResponse' variable.
myHttpWebResponse = CType(myHttpWebRequest.GetResponse(), HttpWebResponse)
If myHttpWebRequest.HaveResponse Then
Dim streamResponse As Stream = myHttpWebResponse.GetResponseStream()
Dim streamRead As New StreamReader(streamResponse)
Dim readBuff(256) As [Char]
Dim count As Integer = streamRead.Read(readBuff, 0, 256)
Console.WriteLine(ControlChars.Cr + "The contents of Html Page are : " + ControlChars.Cr)
While count > 0
Dim outputData As New [String](readBuff, 0, count)
Console.Write(outputData)
count = streamRead.Read(readBuff, 0, 256)
End While
' Close the Stream object.
streamResponse.Close()
streamRead.Close()
' Release the HttpWebResponse Resource.
myHttpWebResponse.Close()
Console.WriteLine(ControlChars.Cr + "Press 'Enter' key to continue..........")
Console.Read()
Else
Console.WriteLine(ControlChars.Cr + "The response is not received ")
End If