Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Imports System.Net
- Public Class myBB
- Inherits Forum
- Public Sub New(ByVal url As String, ByVal username As String, ByVal password As String)
- MyBase.New(url, url & "/member.php?action=login", username, "mybbuser", "", "username=" + username & "&password=" + password & "&submit=Login&action=do_login&url=")
- End Sub
- Public Overrides Function isLoggedIn(ByVal cookies As System.Net.CookieContainer) As Boolean
- If Not IsNothing(cookies.GetCookies(New Uri(url)).Item(defaultCookieName)) Then
- Return True
- End If
- Return False
- End Function
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement