Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
Autor
Nachricht
Analegrande
Tutorial Leser
Tutorial Leser

Anmeldedatum: 01.05.2008
Beiträge: 69

Login mit mehreren Cookies
Verfasst am: 20.08.2008, 21:26

Ich habe mal mal etwas damit auseinandergesetzt und habe es geschafft mich damit auf eine Seite einzuloggen.
Nun wollte ich das mal mit einer anderen Seite machen, die aber "mehre cookies" bei einloggen speichert. (Ich glaube das Problem hängt damit zusammen)

Auf jeden Fall gibt mir die Seite eine Meldung das der Login nicht geklappt hat und ich es später versuchen soll.

Hier mal der Teil vom Code:
Visual Basic: [code]
Dim cc As New CookieContainer
Dim _cookie1 As New Cookie("__utmb", "116977536.2.10.1219260031", "/", ".wow-europe.com")
Dim _cookie2 As New Cookie("__utmc", "116977536", "/", ".wow-europe.com")
Dim _cookie3 As New Cookie("__utma", "116977536.1550xxx5236782000.1219260031.12xxx260031.1219260031.1", "/", ".wow-europe.com")
Dim _cookie4 As New Cookie("__utmz", "116977536.12xxx031.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none)", "/", ".wow-europe.com")
Dim _cookie5 As New Cookie("cookies", "true", "/de/", ".wow-europe.com")
Dim _cookie6 As New Cookie("recruitsplash", "1", "/de/", ".wow-europe.com")
Dim _cookie7 As New Cookie("menuCookie", "0%200%2xxxxx0%200%200%200", "/de/", "wow-europe.com")
Dim _cookie8 As New Cookie("JSESSIONID", "86D1783D8xxxxx45AF01D9DE97C29A.app11_06", "/de", "wow-europe.com")
Dim _cookie9 As New Cookie("JSESSIONID", "04344558E05xxxxx288ED8DDEBD121.app17_08", "/en", "www.wow-europe.com")
Dim _cookie10 As New Cookie("cookies", "true", "/account/", "www.wow-europe.com")
Dim _cookie11 As New Cookie("CASTGC", "TGC-3792597-BzR8tv2xxxx6LQPb0szaZp5yzmyPxCYAycceUgL6NDIjSjFj5", "/login", "www.wow-europe.com")
Dim _cookie12 As New Cookie("JSESSIONID", "7885F0xxxxxA20075B2CF617878DF9D.app04_08", "/login", "www.wow-europe.com")
Dim _cookie13 As New Cookie("JSESSIONID", "21F0549xxxxxB5EDE0636BED156CC.app03_01", "/account", "www.wow-europe.com")[/code]

Visual Basic: [code]
...
cc.Add(_cookie1)
cc.Add(_cookie2)
cc.Add(_cookie3)
cc.Add(_cookie4)
cc.Add(_cookie5)
cc.Add(_cookie6)
cc.Add(_cookie7)
cc.Add(_cookie8)
cc.Add(_cookie9)
cc.Add(_cookie10)
cc.Add(_cookie11)
cc.Add(_cookie12)
cc.Add(_cookie13)
req.CookieContainer = cc[/code]

Im Code seht ihr auch die Seite. Ich habe bei den cookies mal bischen was zensiert.. weiss ja nicht ob man damit was anstellen kann ^^

Gruss Anale
 
Analegrande
Tutorial Leser
Tutorial Leser

Anmeldedatum: 01.05.2008
Beiträge: 69


Verfasst am: 23.08.2008, 01:15

Ich geh mal davon aus, dass das Pushen nach 2-3 Tagen erlaubt ist^^
Hat echt niemand einen Rat ?
 
^^kev####
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 476
Wohnort: Haan


Verfasst am: 23.08.2008, 12:04

Ich würde sagen, dass es einmal dadran liegt, dass die SessionID nicht ewig gültig ist und das du die Domain immer anders hast :p

Dim cc As New CookieContainer
Dim _cookie1 As New Cookie("__utmb", "116977536.2.10.1219260031", "/", ".wow-europe.com")
Dim _cookie2 As New Cookie("__utmc", "116977536", "/", ".wow-europe.com")
Dim _cookie3 As New Cookie("__utma", "116977536.1550xxx5236782000.1219260031.12xxx260031.1219260031.1", "/", ".wow-europe.com")
Dim _cookie4 As New Cookie("__utmz", "116977536.12xxx031.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none)", "/", ".wow-europe.com")
Dim _cookie5 As New Cookie("cookies", "true", "/de/", ".wow-europe.com")
Dim _cookie6 As New Cookie("recruitsplash", "1", "/de/", ".wow-europe.com")
Dim _cookie7 As New Cookie("menuCookie", "0%200%2xxxxx0%200%200%200", "/de/", "wow-europe.com")
Dim _cookie8 As New Cookie("JSESSIONID", "86D1783D8xxxxx45AF01D9DE97C29A.app11_06", "/de", "wow-europe.com")
Dim _cookie9 As New Cookie("JSESSIONID", "04344558E05xxxxx288ED8DDEBD121.app17_08", "/en", "www.wow-europe.com")
Dim _cookie10 As New Cookie("cookies", "true", "/account/", "www.wow-europe.com")
Dim _cookie11 As New Cookie("CASTGC", "TGC-3792597-BzR8tv2xxxx6LQPb0szaZp5yzmyPxCYAycceUgL6NDIjSjFj5", "/login", "www.wow-europe.com")
Dim _cookie12 As New Cookie("JSESSIONID", "7885F0xxxxxA20075B2CF617878DF9D.app04_08", "/login", "www.wow-europe.com")
Dim _cookie13 As New Cookie("JSESSIONID", "21F0549xxxxxB5EDE0636BED156CC.app03_01", "/account", "www.wow-europe.com")


Ich würde sagen, dass du dich einfach mal per POST einloggst und dann einfach die Cookies speicherst, die du beim Login erhälst.

Ich kann dir auch das Plugin Tamper Data für Firefox empfehlen, dann siehst du genau, was er sendet und zurück bekommt Wink
 
Analegrande
Tutorial Leser
Tutorial Leser

Anmeldedatum: 01.05.2008
Beiträge: 69


Verfasst am: 24.08.2008, 01:48

Das ist jetzt vieleicht ein bischen dreist gefragt^^, aber du kannst mir nicht zufällig ein Beispiel machen wie ich die Cookies speichere nach dem Einloggen via POST ?^^ Oder vieleicht nur ne Informationsquelle ?[img]/ohmy.gif[/img]

Gruss Anale
 
^^kev####
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 476
Wohnort: Haan


Verfasst am: 24.08.2008, 11:25

Da Wink

Visual Basic: [code]Imports System.Net
Imports System.IO

Public Class Form1

Dim CookieC As New CookieContainer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Function GetSourceCode(ByVal url As String) As String
Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
req.Method = "GET"
req.ContentType = "application/x-www-form-urlencoded"
req.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.8.1.7) Gecko/20070914 Firefox/2.0.0.7"
req.CookieContainer = CookieC

Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
Dim str As New StreamReader(res.GetResponseStream)

Return str.ReadToEnd()
End Function

Private Function GetSourceCodePost(ByVal url As String, ByVal postdata As String) As String
Dim data() As Byte = System.Text.Encoding.ASCII.GetBytes(postdata)

Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
req.Method = "post"
req.ContentType = "application/x-www-form-urlencoded"
req.ContentLength = data.Length
req.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.8.1.7) Gecko/20070914 Firefox/2.0.0.7"
req.CookieContainer = CookieC

Dim dataStream As Stream = req.GetRequestStream()
dataStream.Write(data, 0, data.Length)

Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
Dim str As New StreamReader(res.GetResponseStream)

Return str.ReadToEnd()
End Function

End Class[/code]
 
^^kev####
Überflieger
Überflieger

Anmeldedatum: 01.05.2008
Beiträge: 476
Wohnort: Haan


Verfasst am: 24.08.2008, 11:26

Da Wink

Imports System.Net
Imports System.IO

Public Class Form1

Dim CookieC As New CookieContainer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Function GetSourceCode(ByVal url As String) As String
Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
req.Method = "GET"
req.ContentType = "application/x-www-form-urlencoded"
req.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.8.1.7) Gecko/20070914 Firefox/2.0.0.7"
req.CookieContainer = CookieC

Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
Dim str As New StreamReader(res.GetResponseStream)

Return str.ReadToEnd()
End Function

Private Function GetSourceCodePost(ByVal url As String, ByVal postdata As String) As String
Dim data() As Byte = System.Text.Encoding.ASCII.GetBytes(postdata)

Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
req.Method = "post"
req.ContentType = "application/x-www-form-urlencoded"
req.ContentLength = data.Length
req.UserAgent = "Mozilla/5.0 (Windows; U; Windows NT 5.1; de; rv:1.8.1.7) Gecko/20070914 Firefox/2.0.0.7"
req.CookieContainer = CookieC

Dim dataStream As Stream = req.GetRequestStream()
dataStream.Write(data, 0, data.Length)

Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse)
Dim str As New StreamReader(res.GetResponseStream)

Return str.ReadToEnd()
End Function

End Class

 
Analegrande
Tutorial Leser
Tutorial Leser

Anmeldedatum: 01.05.2008
Beiträge: 69


Verfasst am: 27.08.2008, 18:42

'Edit: Hat sich erledigt. War gar nicht nötig Smile
Gruss Anale

Eine andere Frage hierzu...^^

Wenn ich mich nun mit den Methoden auf einer Seite einlogge, der Login erfolgreich war und ich dann nochmal den Befehl gebe zum Login (ob die selben oder andere Logindaten) kommt ein Fehler.
Vermuteter Grund:
Ich bekomme den Quelltext der Seite die kommt wenn ich mich erfolgreich eingeloggt habe. Ich denke mal weil ich noch einige Cookies habe (vlt. SessionID...)

Kann man nach erfolgreichen Login oder wenn man den Button nochmal drückt die Cookies irgendwie löschen ?

Meine Funktionen sind die, die Kev gepostet hat.

Gruss Anale
 
Analegrande
Tutorial Leser
Tutorial Leser

Anmeldedatum: 01.05.2008
Beiträge: 69


Verfasst am: 30.08.2008, 00:46


Auch das hat sich schon wieder erledigt. Grund: Ich hatte den Cookiecontainer (CookieC) ausserhalb der Funktion deklariert.^^

'Edit: Sorry wegen Doppelpost. Falls es was ausmacht bitte zusammenfügen oder gar beide löschen weil ich die Probleme selbst gelöst habe^^.

Doppelposts sind nicht schlimm wenn sie nicht direkt automatisch zusammengefügt werden. Bitte schreibe jedoch dein Problem, sowie deine Lösung in den Thread, damit die User, die das selbe Problem haben hier nachschauen können.
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten

Tags: visual basic, cookies, cookie, login

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Wichtig: [Ebook] jetzt lerne ich Visual Basic 6 5067 02.06.2010, 13:55
Keine neuen Beiträge Miceosoft Visual Basic 6.0 Einsteiger Kurs? 1189 17.02.2007, 21:01
Keine neuen Beiträge SUCHE MICROSOFT VISUAL BASIC! 944 12.02.2007, 21:54
Keine neuen Beiträge Microsoft Visual Basic 1275 28.01.2007, 00:59
Keine neuen Beiträge Visual Basic.. Version?? 1230 22.01.2007, 18:23
 


[ Time: 0.1455s ][ Queries: 103 (0.0763s) ][ GZIP on - Debug on ]