[CODIGO FUENTE - VB.NET] CONEXION A DARKORBIT

Para esto necesitamos:

* Webbrowser
* 2 Textbox
* 1 Boton

Para comenzar van a Form1.vb y como una clase public

Código:

Dim didWeNavigated? As Boolean = False
Dim gottheserver? As Boolean = False
Public Property ScriptErrorsSuppressed As Boolean

Creas un boton y añades la funcion Click

Código:

WebBrowser1.Navigate("http://www.darkorbit.com")
didWeNavigated = True
End Sub

Ahora creas un Webbrowser y le haces click para que aparezca la funcion DocumentCompleted en la codigo

Código:

If didWeNavigated = False Then
Exit Sub
End If
If didWeNavigated = True Then didWeNavigated = False
Dim username As String = TextBox1.Text
Dim password As String = TextBox2.Text WebBrowser1.Document.GetElementById("loginForm_default_username").SetAttribute("Value", username) WebBrowser1.Document.GetElementById("loginForm_default_password").SetAttribute("Value", password) WebBrowser1.Document.GetElementById("loginForm_default_loginButton").Focus()
WebBrowser1.Document.GetElementById("loginForm_default_loginButton").InvokeMember("click")
Dim htmlel As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("input")
Dim el1 As HtmlElement
End Sub

En el proxima programación pondre un post con Webrequest y auto seleccionador de servidor