Sfida ai programmatori (HttpWebRequest & WebException)

lunedì 09 aprile 2007 - 12.34

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

seven.7 Profilo | Junior Member

127 messaggi | Data Invio: lun 9 apr 2007 - 12:34

Stò utilizzando questo codice per prelevare una pagina web dopo aver fatto il login. Ho problema però non riesco a gestire il timeout dell'ultima risposta... io stò da stamattina alle 6.00 ma non ho trovato soluzione... consigli???

Private Sub FormLoginGet(ByVal loginUri As String, ByVal loginData As String, ByVal requestUri As String)
Dim cookieContainer As New CookieContainer()
Dim req As HttpWebRequest = DirectCast(HttpWebRequest.Create(loginUri), HttpWebRequest)
req.CookieContainer = cookieContainer
req.Method = "POST"
req.ContentType = "application/x-www-form-urlencoded"
req.Timeout = 5000
Dim encoding As New ASCIIEncoding()
Dim loginDataBytes As Byte() = encoding.GetBytes(loginData)
req.ContentLength = loginDataBytes.Length
Dim stream As Stream
stream = req.GetRequestStream()
stream.Write(loginDataBytes, 0, loginDataBytes.Length)
stream.Close()
MsgBox("invio richiesta1")
Dim res As HttpWebResponse = DirectCast(req.GetResponse(), HttpWebResponse)
MsgBox("fine richiesta1")
req = DirectCast(HttpWebRequest.Create(requestUri), HttpWebRequest)
req.CookieContainer = cookieContainer
req.Method = "GET"
MsgBox("invio richiesta2")
Try
res = DirectCast(req.GetResponse(), HttpWebResponse)
Catch ex As WebException
If ex.Status = WebExceptionStatus.Timeout Then
'''' code
End If
End Try
MsgBox("fine richiesta2")
Dim sr As New StreamReader(res.GetResponseStream())
PageWebTemp = sr.ReadToEnd()
End Sub

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !