Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Imports System.Net
- Public Class phpBB2
- Inherits Forum
- Public Sub New(ByVal url As String, ByVal username As String, ByVal password As String)
- MyBase.New(url, url & "/login.php", username, "phpBB_WBB_data", "userid%22%3Bi%3A-1%3B%7D", "&username=" + _
- username + "&password=" + password + "&autologin=on&login=Log+in")
- End Sub
- Public Overrides Function isLoggedIn(ByVal cookies As System.Net.CookieContainer) As Boolean
- If Not cookies.GetCookies(New Uri(url)).Item(defaultCookieName).Value.Contains(defaultCookieSearch) Then
- Return True
- End If
- Return False
- End Function
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement