Merhaba Arkdaşlar;
Bu Derimde Sizlere Programımıza Normal Bir İf Komutu Yerine VeriTabanı İle Giriş Paneli Yapmayı Göstermeye Çalıştım...
Umarım Bir Hatam Olmamıştır...Olduysada Çok Özür Dilerim.
Lafı Uzatmadan Videomuza Geçelim...
THT-HAKOPS-VeriTabanı Bağlantısı on Vimeo
Üye Ol Butonu Kodları
Giriş Butonun Kodları;
Değişken Kodları
General Kodu
Arkadaşlar Bir Teşekkürü Çok Görmeyen Lütfen Tek Ricam Bu....
Butonu Kullanın Lütfen Sözlü Yerine
İyi Günler...
Bu Derimde Sizlere Programımıza Normal Bir İf Komutu Yerine VeriTabanı İle Giriş Paneli Yapmayı Göstermeye Çalıştım...
Umarım Bir Hatam Olmamıştır...Olduysada Çok Özür Dilerim.
Lafı Uzatmadan Videomuza Geçelim...
THT-HAKOPS-VeriTabanı Bağlantısı on Vimeo
Üye Ol Butonu Kodları
Kod:
con.ConnectionString = ("Provider=Microsoft.Jet.OleDb.4.0;Data Source = C:\VeriTabanları\DataBaseler\Hakops.mdb")
con.Open()
com.Connection = con
com.CommandType = CommandType.Text
com.CommandText = ("Insert Into Tablo Adı(Ad,Şifre)values('" + TextBox1.Text + "','" + TextBox2.Text + "')")
com.ExecuteNonQuery()
con.Close()
MsgBox("Üyelik Gerçekleşti !", MsgBoxStyle.OkOnly)
Giriş Butonun Kodları;
Kod:
con.Open()
com.Connection = con
adp.SelectCommand = com
adp.Fill(dataset, "0")
Dim a = dataset.Tables(0).Rows.Count
If a > 0 Then
Form2.show
MsgBox("Doğru")
Else
MsgBox("Yanlış")
End If
Değişken Kodları
Kod:
Dim con As New OleDbConnection
Dim com As New OleDbCommand
Dim adp As New OleDbDataAdapter
Dim dataset As New DataSet
General Kodu
Kod:
İmport System.Data.OleDb
Arkadaşlar Bir Teşekkürü Çok Görmeyen Lütfen Tek Ricam Bu....
Butonu Kullanın Lütfen Sözlü Yerine
İyi Günler...
Son düzenleme: