VB.NET Kendi Uygulamanıza Giriş-Kayıt Sistemi Ekleme

[Drenated]

Giriş Ekranına Şunları Ekleyerek Başlayın;
2 Tane Label
2 Tane Buton
2 Tane TextBox

Ekleyin...
Formumuza şu kütüphaneleri ekleyin;

Imports System.Net
Imports System.IO

Ardından şu değişkenleri tanıtın;

Dim wc As New Net.WebClient
Dim texting = wc.DownloadString("http: //siteadresiniz/data.txt")

Buton 1 e yani Giriş Yap Butonun'a ;

If TextBox1.Text = Nothing Or TextBox2.Text = Nothing Or TextBox1.Text = Nothing And TextBox2.Text = Nothing Then
MsgBox("Kullanıcı Adı ve Şifreyi Girmediniz.", MsgBoxStyle.Exclamation, "Hata")
ElseIf texting.contains(TextBox1.Text & ":" & TextBox2.Text) Then
form3.Show()
Me.Hide()


ElseIf Not texting.contains(TextBox1.Text & ":" & TextBox2.Text) Then
MsgBox("Kullanıcı Adı veya Şifre Yanlış !", MsgBoxStyle.Critical, "Giriş Başarısız")

Kodunu Yapıştırın.Form 1 tamamlandı temayı falan kendiniz tasarlayın.

Form 2 Kayıt Ekranı

Aynı araçlarımızı ekliyoruz...

Ardındanşu kütüphaneleri ekliyoruz;

Imports System.Net
Imports System.Net.Mail
Ve Kaydol butonuna ;

Dim site As New Net.WebClient
Dim yazi = site.DownloadString("http: //siteadresiniz/data.txt")
Dim request As WebRequest = WebRequest.Create("http: //siteadresiniz/post.php?w=" & TextBox1.Text & ":" & TextBox2.Text)
request.GetResponse()
MsgBox("Başarılı Bir Şekilde Hesap Oluşturuldu,Şimdi Program Yeniden Başlatılacak", MsgBoxStyle.Information, "Bilgi")
Process.Start(Application.ExecutablePath)
Me.Close()
Form1.Close()

Kodunu yapıştırın.

​