Problem mit Httpwebrequest (Facebook)

[$ecure.x3]

Ich war dabei ein Facebook Account Creator zu coden und habe ein Problem.
Undzwar, wenn Ich auf den Button "Acc erstellen" klicke, bekomme Ich die Fehlermeldung "Fehler!" sprich, es wird kein Account erstellt.

So sieht mein Code derzeit aus:

Public Sub CreateAccount()
        With New Http
            Dim html As String = String.Empty
            Dim firstname As String = "Paul"
            Dim lastname As String = "Klaus"
            Dim reg_email As String = ""
            Dim reg_email_confirmation As String = ""
            Dim reg_passwd As String = "fawFWfw321"
            Dim *** As String = "1"
            Dim birthday_day As String = "1"
            Dim birthday_month As String = "1"
            Dim birthday_year As String = "1992"
            html = .GetResponse("https://www.facebook.com/ajax/register.php?lsd=AVqnxyB6", "firstname=" & firstname & "&lastname=" & lastname & "&reg_email__=" & reg_email & "&reg_email_confirmation__=" & reg_email_confirmation & "&reg_passwd=" & reg_passwd & "&***=" & *** & "&birthday_day=" & birthday_day & "&birthday_month=" & birthday_month & "&birthday_year=" & birthday_year)
            If html.Contains("Schritt") Then
                Dim aView As ListViewItem = Me.AccountsView.Items.Add(reg_email, 0)
                aView.SubItems.Add(reg_passwd)
            Else
                MsgBox("Fehler!")
            End If
        End With
    End Sub

Hoffe jemand kann mir helfen, bedanke mich im vorraus.

[snow]

Schon mal die Response ausgegeben? Evtl. ist der HTML-Content ja auf englisch
Und evtl. ist ja "lsd=AVqnxyB6" ein einmaliger Code? In diesem Fall musst du vorher einen GET-Request der Seite machen und diesen einmaligen Code aus dem HTML-Content der Response auslesen.

[$ecure.x3]

Originally Posted by snow911

Schon mal die Response ausgegeben? Evtl. ist der HTML-Content ja auf englisch
Und evtl. ist ja "lsd=AVqnxyB6" ein einmaliger Code? In diesem Fall musst du vorher einen GET-Request der Seite machen und diesen einmaligen Code aus dem HTML-Content der Response auslesen.

Wie mache Ich dieses denn? Wenn es geht, würde Ich auch per Nitrado Guthaben zahlen.

[snow]

Keine Ahnung, wie du die Reponse unter VB auslesen kannst (ich hab generell keine Ahnung von VB, also sieh das hier bitte nicht als perfekte Lösung an), zur Not kannst du das via MsgBox machen: MsgBox(html)

Für den GET-Request:

With New Http
Dim response As String = .GetResponse(Facebook.com oder wie auch immer, wo man sich halt registriert)
Dim code As String = (Funktion, die halt die Node, in der dieser lsd-Key steht, extrahiert)
CreateAccount(code) 'Hier dann die Funktion aufrufen und den Code übergeben

Dein Guthaben kannst du behalten, hier besteht freier Informationsaustausch.

[$ecure.x3]

Vielen Dank läuft 1A. Habe den Captcha vergessen ^.^

Die Accounts werden jetzt überprüft, das Problem wird nur sein, dass Sie nicht bestätigt sind. Ich muss also noch dazu machen, dass auch Emails erstellt werden.

Wie kriege ICh das jetzt hin ;o

[Ludder231]

Nimm Trashmail. da gehts bestimmt sehr einfach weil da glaube keine verschlüsselung undsowas ist. Wie z.b bei GMX oder Web.de....Machs so wie dus oben bbei FB gemacht hast

[Cyperghost]

ich würde arcor.de nehmen der login und das überprüfen der Mail´s ist sehr einfach da geht der login so

CookieContainer cookie = new CookieContainer();
string loginpostData = "user_name=" + Username + "&info=Online-Passwort&password=" + Passwort;
byte[] myPostData = Encoding.ASCII.GetBytes(loginpostData);
HttpWebRequest myRequest = (HttpWebRequest)WebRequest.Create("https://www.arcor.de/login/login.jsp");
myRequest.Method = "POST";
myRequest.UserAgent = "Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:21.0) Gecko/20130109 Firefox/21.0";
myRequest.CookieContainer = cookie ;
myRequest.KeepAlive = true;
myRequest.Timeout = 10000;
myRequest.ContentType = "application/x-www-form-urlencoded";
myRequest.ContentLength = myPostData.Length;
Stream requestStream = myRequest.GetRequestStream();
requestStream.Write(myPostData, 0, myPostData.Length);
requestStream.Close();
HttpWebResponse myRes = (HttpWebResponse)myRequest.GetResponse();
StreamReader sr = new StreamReader(myRes.GetResponseStream());
string Html = sr.ReadToEnd();

[unknwnx.]

Originally Posted by Ludder231

Nimm Trashmail. da gehts bestimmt sehr einfach weil da glaube keine verschlüsselung undsowas ist. Wie z.b bei GMX oder Web.de....Machs so wie dus oben bbei FB gemacht hast

Trashmail anbieter sind von Google sowie Facebook meines erachtens blockiert!

[tolio]

Originally Posted by kRAYNE :x

Trashmail anbieter sind von Google sowie Facebook meines erachtens blockiert!

da es hierbei um eine tatsache und nicht um eine meinung geht würd ich sagen ist das was du schriebst einfach falsch

selbst große trashmailer lassen sich bei beiden anbietern ohne konsequenzen nutzen

[roteisenklinge]

Originally Posted by $ecure.x3

Ich war dabei ein Facebook Account Creator zu coden und habe ein Problem.
Undzwar, wenn Ich auf den Button "Acc erstellen" klicke, bekomme Ich die Fehlermeldung "Fehler!" sprich, es wird kein Account erstellt.

So sieht mein Code derzeit aus:

Public Sub CreateAccount()
        With New Http
            Dim html As String = String.Empty
            Dim firstname As String = "Paul"
            Dim lastname As String = "Klaus"
            Dim reg_email As String = ""
            Dim reg_email_confirmation As String = ""
            Dim reg_passwd As String = "fawFWfw321"
            Dim sex As String = "1"
            Dim birthday_day As String = "1"
            Dim birthday_month As String = "1"
            Dim birthday_year As String = "1992"
            html = .GetResponse("https://www.facebook.com/ajax/register.php?lsd=AVqnxyB6", "firstname=" & firstname & "&lastname=" & lastname & "&reg_email__=" & reg_email & "&reg_email_confirmation__=" & reg_email_confirmation & "&reg_passwd=" & reg_passwd & "&sex=" & sex & "&birthday_day=" & birthday_day & "&birthday_month=" & birthday_month & "&birthday_year=" & birthday_year)
            If html.Contains("Schritt") Then
                Dim aView As ListViewItem = Me.AccountsView.Items.Add(reg_email, 0)
                aView.SubItems.Add(reg_passwd)
            Else
                MsgBox("Fehler!")
            End If
        End With
    End Sub

Hoffe jemand kann mir helfen, bedanke mich im vorraus.

Hallo,
lsd ändert sich immer. Du musst vorher eine Get Abfrage auf facebook.com/r.php machen und dort per Regex etc. den LSD Wert auslesen. Allerdings musst du noch viel mehr Werte auslesen als du es hier machst ....
Desweiteren wird nicht direkt HTML.Content= "Schritt" kommen, da man meistens nach einer Identifizung per Telefon verdammt wird.

Es gibt hier nur einen der das wirklich hinbekommen hat, und das ist tolio. Habe selbst daran gearbeitet und bin irgendwann daran gescheitert.
Guter Tipp Lass die Finger davon, das hat mich über drei Monate gekostet ohne Lösung.

lg Roteisen

*wenn du Fragen hast melde dich.

[Kraizy​]

Originally Posted by roteisenklinge

Es gibt hier nur einen der das wirklich hinbekommen hat, und das ist tolio. Habe selbst daran gearbeitet und bin irgendwann daran gescheitert.
Guter Tipp Lass die Finger davon, das hat mich über drei Monate gekostet ohne Lösung.

Die Registrierung an sich ist nicht schwer, nen Account Creator hat man in paar Minuten gebastelt. Wenn man dazu noch Proxys nutzt, kommt auch keine SMS-Verifizierung und die Accounts halten auch problemlos ohne gesperrt oder sonst was zu werden (eigene Erfahrung).

[roteisenklinge]

Originally Posted by Kraizy​

Die Registrierung an sich ist nicht schwer, nen Account Creator hat man in paar Minuten gebastelt. Wenn man dazu noch Proxys nutzt, kommt auch keine SMS-Verifizierung und die Accounts halten auch problemlos ohne gesperrt oder sonst was zu werden (eigene Erfahrung).

Hallo Kraizy,
dann hast du entweder gute Proxyies oder wie Tolio, das irgendwie gebypassed.
Bei mir ist es so, das bei 10 erstellten Accounts vllt 4 Stück ohne Verifizierung weiterkommen.

lg

[Cyperghost]

nee das liegt dann an den Proxy´s,denn man darf maximal pro IP einen(kann auch mehr sein bin mir nicht sicher) Account´s bei Facebook haben danach must du ihn Verifizierung