Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Public Class Form2
- Dim wClient As New System.Net.WebClient
- Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
- Dim result As String = wClient.DownloadString("newsite2018.rf.gd/login/handler.php?action=login&username=" + TextBox1.Text + "&password=" + TextBox2.Text)
- If result = "1" Then
- MessageBox.Show("Welcome to PWGhost Builder, Enjoy!")
- Me.Hide()
- Form1.Show()
- ElseIf result = "0" Then
- MessageBox.Show("Invalid Credentials, Copy/Paste the User/Pass provided to You when You purchased from rocketr.net")
- End If
- End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- Application.Exit()
- End Sub
- End Class
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement