https://github.com/romulo-meirelles/captcha-generate-vb.net

Captcha Generate VB.NET
https://github.com/romulo-meirelles/captcha-generate-vb.net

Last synced: 19 days ago
JSON representation

Captcha Generate VB.NET

• Host: GitHub
• URL: https://github.com/romulo-meirelles/captcha-generate-vb.net
• Owner: Romulo-Meirelles
• License: gpl-3.0
• Created: 2019-07-09T16:08:19.000Z (over 5 years ago)
• Default Branch: master
• Last Pushed: 2021-04-30T02:31:18.000Z (over 3 years ago)
• Last Synced: 2024-07-23T11:49:30.251Z (6 months ago)
• Language: Visual Basic .NET
• Size: 6.12 MB
• Stars: 0
• Watchers: 0
• Forks: 1
• Open Issues: 0
• Metadata Files:
  • Readme: README.md
  • License: LICENSE

Awesome Lists containing this project

README

        
# DLL Gerador de Captcha. Varias aplicações.

Captcha Generate VB.NET

This app is an idea I had to make to authenticate a user to know if it was a robot or not. This project is free for modifications, ideas and distributions. Make good use!





### Prerequisites

What things you need to install the software and how to install them

```

.NET FRAMEWORK 4.0

```










### Exemples

```

'IMPORT THE CAPTCHA DLL FIRST

Imports System.CAPTCHA

Public Class Form1

    'DECLARE CAP AS GENERATE

    Private CAP As GENERATE

    'RESULT WILL OBTAIN THE RESULT

    Private RESULT As String = Nothing

    Private Sub Call_Captcha()

        'HERE YOU DECLARE A NEW AND POE THE SOURCE, SIZE AND HOW MANY CHARACTERS YOU WANT

        CAP = New GENERATE

        RESULT = CAP.GENERATE_IMAGE(PictureBox1, Width:=140, Height:=80, FontSize:=15, HowCaracters:=6)

    End Sub

    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load

        'CALL OUR RELOAD CAPTCHA

        Call Call_Captcha()

    End Sub

    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

        'HERE YOU MAKE THE VALIDATION OF THE CAPTCHA

        If TextBox1.Text = RESULT Then

            MsgBox("VALIDATE")

            'RELOAD CAPTCHA

            Call Call_Captcha()

        Else

            MsgBox("WRONG CAPTCHA")

            'RELOAD CAPTCHA

            Call Call_Captcha()

        End If

    End Sub

End Class

```