Validasi URL dengan VB.NET dan C#

Setelah beberapa hari yang lalu saya memposting tentang Penggunaan Array di VB.NET dan C#.

pada malam hari ini saya kan memposting tentang Validasi URL dengan VB.NET dan C#, sebernarnya langkah-langkahnya hampir sama dengan Validasi Email dengan VB.NET dan C# yang pernah saya bahas sebelumnya, yang membedakan hanya pola dari Regexnya saja.

Oke langsung saja

Langkah - langkah Membuat Validasi URL dengan VB.NET dan C#

1. Buatlah sebuah project pada visual studio yang anda punya

2. Tambahkan 1 buah textbox, button, dan label pada sebuah form, lalu desain form tersebut seperti gambar di bawah ini

3. Import sebuah namespace  System.Text.RegularExpressions dengan script dibawah ini

VB.NET

Imports System.Text.RegularExpressions

C#

Using Imports System.Text.RegularExpressions

4. Buatlah sebuah function dengan script dibawah ini

VB.NET

Private Function checkurl(ByVal strurl As String) As Boolean
        ' Menyiapkan string untuk menyimpan pola regex
        Dim pattern As String = "^(http|https|ftp|)\://|[a-zA-Z0-9\-\.]+\.[a-zA-Z](:[a-zA-Z0-9]*)?/?([a-zA-Z0-9\-\._\?\,\'/\\\+&%\$#\=~])*[^\.\,\)\(\s]$"

        If Regex.Match(strurl, pattern).Success Then ' Jika bernilai true
            ' Mengembailkan nilai false
            Return True
        Else
            ' Mengembailkan nilai false
            Return False
        End If
    End Function

C#

private Boolean checkurl(string strurl)
        {
            // Menyiapkan string untuk menyimpan pola regex
            string pattern = @"^(http|https|ftp|)\://|[a-zA-Z0-9\-\.]+\.[a-zA-Z](:[a-zA-Z0-9]*)?/?([a-zA-Z0-9\-\._\?\,\'/\\\+&%\$#\=~])*[^\.\,\)\(\s]$";
            
            if (Regex.Match(strurl,pattern).Success) // Jika bernilai true 
            {
                // Mengembalikan nilai true
                return true;
            }
            else
            {
                // Mengembalikan nilai false
                return false;
            }
        }

5. Pada event button1 click tambahkan script dibawah ini

VB.NET

Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
        If checkurl(textBox1.Text) = True Then
            'Menampilkan pesan url valid
            MessageBox.Show("URL valid", "Informasi", MessageBoxButtons.OK, MessageBoxIcon.Information)
        Else
            ' Menampilkan pesan url tidak valid
            MessageBox.Show("URL tidak valid", "Peringatan", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
        End If
    End Sub

C#

private void button1_Click(object sender, EventArgs e)
        {
            // Memanggil function checkurl
            if (checkurl(textBox1.Text) == true) // Jika menghasilkan nilai true
            {
                // Menampilkan pesan url valid
                MessageBox.Show("URL valid", "Informasi", MessageBoxButtons.OK, MessageBoxIcon.Information);
            }
            else
            {
                // Menampilkan pesan url tidak valid
                MessageBox.Show("URL tidak valid", "Peringatan", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
            }
        }

6. Jalankan program tersebut dengan menekan F5

Jika url yang akan masukan benar

Jika url yang anda masukan salah

Anda dapat mendownload source codenya dibawah ini

| VB.NET | C# |

Untuk password silahkan klik disini

Sekian dari saya.
Terima kasih atas kunjugannya semoga bermanfaat