Post a pagine web

sabato 17 marzo 2007 - 17.43

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

seven.7 Profilo | Junior Member

127 messaggi | Data Invio: sab 17 mar 2007 - 17:43

Vorrei postare ad un sito diverse pagine, cioè in sostanza prendere informazioni da un sito con account: prima di prendere ciò che mi serve in questo caso devo fare il login... come eseguo una serie di post prima di arrivare alla pag che mi occorre?

Finora io ho usato questo:

'Crea una richiesta per un link
Dim httprequest As WebRequest = HttpWebRequest.Create("http://wap.vizrea.com/signin.aspx")
'Se richiesta dal server setta i credenziali d'accesso e post dei dati
httprequest.Credentials = CredentialCache.DefaultCredentials
httprequest.Method = "POST"
httprequest.ContentType = "application/x-www-form-urlencoded"
Dim encoding As New System.Text.ASCIIEncoding
Dim postData As String = "txtUserName=" & Me.username.Text & "&txtPassword=" & Me.password.Text & "&btnSubmit=Sign+In"
'
'INIZIO PARTE DA CAPIRE...
'
Dim arByte As Byte() = encoding.GetBytes(postData)
httprequest.ContentLength = arByte.Length
Dim newStream As IO.Stream = httprequest.GetRequestStream
newStream.Write(arByte, 0, arByte.Length)
newStream.Close()
'
'FINE PARTE DA CAPIRE
'
'Prendi la risposta
Dim risposta As HttpWebResponse = CType(httprequest.GetResponse(), HttpWebResponse)
'Prendi lo stream contenente gli oggetti mandati dal server
Dim datastream As Stream = risposta.GetResponseStream
'Apri un stream usando uno StreamReader for facilità d'accesso
Dim lettura As New StreamReader(datastream)
'Leggi il contenuto
Dim letturahtml As String = lettura.ReadToEnd
'Chiudi gli stream lettura, datastream, risposta
lettura.Close()
datastream.Close()
risposta.Close()

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 !