PDA

View Full Version : Who can help me out with login source?



VitaminX
03-11-2014, 06:46 AM
Hello all, again :'D

What I need is, some info from the Neo login portal (neopets.com/login).
Preferred would be a person with 2 accounts (1 with a working password, and 1 with a working password + b-day verification). Since I have 0 accounts atm, I can't check myself.

What I want to know if there is a string of text in the source, that IS on the successfully logged in page as well as in the you need to enter a birthday page.
This string of code can NOT be on the wrong password page.

Kind of hard to explain, but yah, that's what I need lmao.

Cheers!

Reemer
03-11-2014, 09:08 PM
If InStr(1, strHTML, "badpassword") Then
check = False
lststatus.AddItem ("Account " & user & "had the wrong password.")
lblstatus.Caption = "Invalid Password/Username"
ElseIf InStr(1, strHTML, "This account has been") Then
check = False
lststatus.AddItem ("Account " & user & "has been frozen.")
lblstatus.Caption = "Sorry, This Account Has Been Frozen"
ElseIf InStr(1, strHTML, "Update Account") Then
check = False
lststatus.AddItem ("Account " & user & " needs to be updated.")
lblstatus.Caption = "Sorry, This Account Has Been Lawyerbotted"
ElseIf InStr(1, strHTML, "failed_bday") Then
check = True
lststatus.AddItem ("Account " & user & " needs to be Bday cracked.")
lblstatus.Caption = "Sorry, This Account Hasn't Been Logged in"
ElseIf InStr(1, strHTML, "petcentral") Then
check = True

j03
03-11-2014, 09:21 PM
Also for the successful login, if your http wrapper doesn't handle redirects then you are going to be checking the headers (check for this string "[Only registered and activated users can see links] 302 Found")

VitaminX
03-12-2014, 01:22 PM
Thanks a lot both, that was really helpful!