Gracias por responder ahora no tengo tiempo de mirarlo pero cuando pueda muestro como lo hice gracias!
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúDim cab As String = "Passport1.4 OrgVerb=GET,OrgURL=http%3A%2F %2Fmessenger%2Emsn%2Ecom,sign-in=" + usr + ",pwd=" + pwd + "," + cookie + "\r\n"
Dim request As WebRequest = WebRequest.Create("https://login.passport.com/login2.srf")
request.Headers.Add("Authorization", cab)
Dim response As HttpWebResponse = request.GetResponse()
Dim ticket As String = Convert.ToString(response.Headers)
response.Close()