OP 19 October, 2019 - 08:45 PM
(This post was last modified: 19 October, 2019 - 08:46 PM by chj2934.)
Code:
Public Sub Login()
Using req As New HttpRequest
req.UserAgent = Http.ChromeUserAgent
req.Cookies = New CookieDictionary(False)
req.Proxy = Nothing
req.IgnoreProtocolErrors = True
req.AddParam("email", tmail.Text)
req.AddParam("password", Tpass.Text)
Dim respo As String = req.Post("https://paragonmenu.com/index.php?login/login").ToString
If respo.Contains("Forum list") Then
MsgBox("Login Done!")
Else
MsgBox("Login Or Password Incorrect")
End If
End Using
End Sub
this is also a part and i have everything i need imported
(keep in mind this is a test before i make combo function for this) :fuck: :fuck:

