Results 1 to 8 of 8
  1. #1
    Diehard cheatss's Avatar
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766
         User Info     Contact     Gamer ID
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766

    Default [VB.net] adding codeleakers login to your application

    add a class to your project, name it whatever you want

    put this code in it

    Code:
    Imports System.Security.Cryptography
    Imports System.Text
    Imports System.Net
    Imports System.IO
    Module vbloginsystem
        Public Function vbLogin(ByVal Username As String, ByVal Password As String)
            Password = MD5(Password)
            Dim valid As Boolean = False
            Dim data As String = "vb_login_username=" & Username & "&vb_login_password=&s=&do=login&vb_login_md5password=" & Password & "&vb_login_md5password_utf=" & Password
            Try
                Dim request As HttpWebRequest = WebRequest.Create("http://codeleakers.com/login.php?do=login")
                request.Method = WebRequestMethods.Http.Post
                request.ContentType = "application/x-www-form-urlencoded"
                request.UserAgent = "-- vBulletin Vaidation  --"
                request.ContentLength = data.Length
                Dim rStream As New StreamWriter(request.GetRequestStream)
                rStream.Write(data)
                rStream.Flush()
                rStream.Close()
                Dim response As HttpWebResponse = request.GetResponse
                Dim resReader As New StreamReader(response.GetResponseStream)
                Dim str As String = resReader.ReadToEnd
                If str.Contains("Thank you for logging in") Then
                    valid = True
                Else
                    valid = False
                End If
                response.Close()
            Catch ex As Exception
                MessageBox.Show(ex.Message, "Error YOURSITE.COM - Error", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End Try
            Return valid
        End Function
        Public Function MD5(ByVal number As String) As String
            Dim ASCIIenc As New ASCIIEncoding
            Dim strReturn As String = String.Empty
            Dim ByteSourceText() As Byte = ASCIIenc.GetBytes(number)
            Dim Md5Hash As New MD5CryptoServiceProvider
            Dim ByteHash() As Byte = MD5Hash.ComputeHash(ByteSourceText)
            For Each b As Byte In ByteHash
                strReturn &= b.ToString("x2")
            Next
            Return strReturn
        End Function
    End Module
    now add
    2 textbox's
    1 button
    1 label
    1 linklabel

    to your login form and put this code there

    Code:
    Public Class Form1
    
        Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Dim username As String = TextBox1.Text
            If vbLogin(TextBox1.Text, TextBox2.Text) Then
                MsgBox("Welcome " & username & ", it's nice to see you.", vbInformation + vbOKOnly, "Welcome")
                Me.Hide()
                Form2.Show()
            Else
                Label1.Visible = True
            End If
        End Sub
    
        Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
            System.Diagnostics.Process.Start("http://codeleakers.com/register.php")
        End Sub
    End Class
    how it looks:

    when you start the application


    when you login correct


    and when you use a wrong username or password


    => source

    0 Not allowed! Not allowed!

    ^^ awesome signature made by Demo ^^

  2. #2
    ($user_isGay == TRUE)? giveAids() : break; aids's Avatar

    Badge

    Join Date
    Jul 2008
    Location
    /dev/null
    Posts
    20,363
    Points
    27,194
         User Info     Contact     Gamer ID
    Join Date
    Jul 2008
    Location
    /dev/null
    Posts
    20,363
    Points
    27,194
    Gamer IDs

    PSN ID: TheOriginalVirus

    Contact info:

    Youtube Channel: http://www.youtube.com/riottape Kik Username: aids gtalk account: codeleakers.com@gmail.com

    Default Re: [VB.net] adding codeleakers login to your application

    Is this a login with cl credentials?

    0 Not allowed! Not allowed!
    BTC: 1AidsG8MHF4cEN6KpY1mhJPBhXtms65GVE

  3. #3
    Diehard cheatss's Avatar
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766
         User Info     Contact     Gamer ID
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766

    Default

    Quote Originally Posted by aids View Post
    Is this a login with cl credentials?
    Yes, it uses your cl username and password.

    0 Not allowed! Not allowed!

    ^^ awesome signature made by Demo ^^

  4. #4
    The Fire Within
    Winning!
    Notorious's Avatar
    Join Date
    May 2011
    Location
    Twilight Zone
    Posts
    2,053
    Points
    3,427
         User Info     Contact     Gamer ID
    Join Date
    May 2011
    Location
    Twilight Zone
    Posts
    2,053
    Points
    3,427
    Gamer IDs

    Gamertag: TehNotorious PSN ID: NOTORIOUS-ORTIZ

    Default Re: [VB.net] adding codeleakers login to your application

    So It's like how you use fb to sign into other shit? But with CL?? Interesting...

    0 Not allowed! Not allowed!


    ^Thanks Renji for the awesome sig^

  5. #5
    Thrive
    This isnt a car
    Creativity's Avatar
    Join Date
    Dec 2012
    Location
    On the Flipside
    Posts
    800
    Points
    773
         User Info     Contact     Gamer ID
    Join Date
    Dec 2012
    Location
    On the Flipside
    Posts
    800
    Points
    773
    Gamer IDs

    Gamertag: BearsNR5 Steam ID: Redemption

    Default

    This is interesting / weird. Never seen it before.

    0 Not allowed! Not allowed!
    U got kik?

  6. #6
    Diehard cheatss's Avatar
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766
         User Info     Contact     Gamer ID
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766

    Default

    Quote Originally Posted by Notorious View Post
    So It's like how you use fb to sign into other shit? But with CL?? Interesting...
    Yes, you can you use it for any vbulletin forum.

    0 Not allowed! Not allowed!

    ^^ awesome signature made by Demo ^^

  7. #7
    Banned
    Join Date
    Oct 2011
    Posts
    863
    Points
    1,141
         User Info     Contact     Gamer ID
    Join Date
    Oct 2011
    Posts
    863
    Points
    1,141
    Gamer IDs

    Steam ID: buttholemonger

    Contact info:

    Youtube Channel: youtube.com/triixsoldier

    Default [VB.net] adding codeleakers login to your application

    I like this style. Good job.

    0 Not allowed! Not allowed!

  8. #8
    Diehard cheatss's Avatar
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766
         User Info     Contact     Gamer ID
    Join Date
    Mar 2011
    Location
    Belgium
    Posts
    774
    Points
    1,766

    Default

    Quote Originally Posted by Skai View Post
    I like this style. Good job.
    I didn't do much, I just modified the source a little bit.

    0 Not allowed! Not allowed!

    ^^ awesome signature made by Demo ^^

Bookmarks

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
All times are GMT -10. The time now is 02:16 AM.
Powered by vBulletin®
Copyright © 2017 vBulletin Solutions, Inc. All rights reserved.