VB Seafight Login auf Server ???

03/22/2012 18:45 Sebi201195#1
Hallo ich habe ien problem ich würde mich gerne auf seafight de4 einloggen durch mein programm und dann später mehr daraus machen aber als erstes mal den login

So hier mal mein code

Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
WebBrowser1.Navigate(TextBox1.Text)
Application.DoEvents()
Do While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
Loop
WebBrowser1.Refresh()

WebBrowser1.Document.GetElementById("loginForm_def ault_input_username").InnerText = "XxXSeboraXxX"
WebBrowser1.Document.GetElementById("loginForm_def ault_label_password_container").InnerText = "Sebastian"
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
WebBrowser1.Document.GetElementById("loginForm_def ault_input_username").InnerText = "Visualbasic"
WebBrowser1.Document.GetElementById("loginForm_def ault_input_password").InnerText = "Test"
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
WebBrowser1.Document.GetElementById("loginForm_def ault_login_submit").Focus()
SendKeys.Send(" ")
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
WebBrowser1.Document.Forms(0).InvokeMember("instan ceLink_605")
End Sub
End Class



aber der schluss mit button 4 funzt nich weil ich die item id nich richtig finde anscheinend bitte helft mir ich bin verzweifelt ich checks einfach ned such schon seit tagen in foren und checks ned oder finde nichts


Danke für eure Hilfe

Achja ihr könnt das gerne testen mit dem test account den ich mit eingefügt habe


und ich entschuldige mich für keine komma setzung punkt oder fehler SORRY

aber ich kanns nich anders
03/22/2012 19:18 Kraizy​#2
Versuch mal was hier von
Quote:
<div id="loginForm_default_loginButton_container">
<input type="submit" value="Login" id="loginForm_default_loginButton" class="loginForm_default_button" name="loginForm_default_login_submit" onclick="Login.doLogin(); return false;; return false;" />
</div>
03/22/2012 19:30 Sebi201195#3
kannst du mir das evtl in meinen code schon miteinbinden und den code dann nochmal posten wäre sehr nett kann damit leider gerade nichts anfangen sry bin anfänger in vb
03/22/2012 19:51 Kraizy​#4
Versuch mal diesen Button anzuklicken
Quote:
loginForm_default_loginButton
anstatt
Quote:
instan ceLink_605
03/22/2012 20:00 Sebi201195#5
der code geht leider nich denn bei button 3 mach ich ja login aber dann kommt eine große server auswahl kannst dir ja selber mal anschauen und auf seafight.de gehn und die login daten eingeben ich wollte mich dann auf den server einloggen den ich bestimme also zb de4 und nich einfach login zu drücken denn dann bin ich ja noch immer nich auf der übersicht
danke für deine hilfe
und danke das ihr mir helft :D
03/22/2012 21:51 Diablo_#6
Den Login habe ich mal gerade selbst gemacht.

Code:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        WebBrowser1.Document.GetElementById("loginForm_default_input_username").InnerText = TextBox1.Text

        WebBrowser1.Document.GetElementById("loginForm_default_input_password").InnerText = TextBox2.Text

        WebBrowser1.Document.GetElementById("loginForm_default_loginButton").Focus()

        SendKeys.SendWait(" ")

    End Sub
Das der Button fokussiert wird und per Leertaste gedrückt wird ist nicht die feine englische Art, aber macht im Endeffekt hier auch keinen Unterschied.

Wie man den Server auswählt gucke ich mal.

/Edit: Ah, so geht das. Ich hab's, allerdings ist das eine Menge Schreibarbeit. :>
03/23/2012 09:39 Sebi201195#7
lieber diabolo würdest du mir bitte den aufschreiben ?
03/23/2012 18:47 Diablo_#8
Sobald die Serverauswahl angezeigt wird (zum Prüfen vieleicht den Quelltext verwenden) lässt du den Browser auf den Server navigieren.

Deutschland 4 = http://de4.seafight.bigpoint.com/GameAPI.php?req=YTo1OntzOjY6ImFjdGlvbiI7czoyMToicG 9ydGFsLmxvZ2luQnlDcnlwdElkIjtzOjEyOiJsb2dpbkNyeXB0 SWQiO3M6MzI6ImYxYTQ1MjRhMWUyMzFlODg2MWYyMTM2NmMxOD hmMDY0IjtzOjY6ImdhbWVJZCI7aTo2MDU7czo2OiJsb2NhbGUi O3M6MjoiZGUiO3M6OToiYm9udXNDb2RlIjtOO30%3D&sign=48 e558e77c72d9a53aea501acc449e17

Da musst du halt gucken mit welchem Steuerelement du das verbindest.

Der Befehl lautet natürlich:

Code:
Webbrowser1.Navigate("Die Deutschland 4 Adresse oder eine andere")
03/23/2012 21:12 Sebi201195#9
Leider geht das nich denn dann steht da das ein unerwarteter fehler aufgetreten ist ...
aber egal dann leg ich das vorerst mal auf eis
danke an alle die mir geholfen haben bzw es versucht haben :D
Vote for Close