VB.net 2010 Gaia login.
Enjoy~
Public Function GaiaonlineLogin(ByVal username As String, ByVal password As String) As Boolean
Dim strHTML As String
Dim strPostData As String
strHTML = wrapper.GetWrapper("www.gaiaonline.com/auth/")
strHTML = Replace(strHTML, """", "'")
strPostData = "token=" & _
GetStringBetween(strHTML, "<input name='token' type='hidden' value='", "' />") & "&sid=" & _
GetStringBetween(strHTML, "<input name='sid' type='hidden' value='", "' />") & "&redirect=" & _
GetStringBetween(strHTML, "<input type='hidden' name='redirect' value='", "' />") & "&username=" & _
(username) & "&password=" & _
"" & "&signInButton=Log+In&chap=" & MD5(MD5(password) + GetStringBetween(strHTML, "<input name='token' type='hidden' value='", "' />"))
strHTML = wrapper.PostWrapper("www.gaiaonline.com/auth/login/", strPostData)
If strHTML.Contains("<span id=""gold_amt"">") = True Then
GaiaonlineLogin = True
Else
GaiaonlineLogin = False
End If
End Function ' Gaia Auth