visual .nette programlama

[DrWatsoN]

arkadaslar öncelikle pcnetin programlama bölümünde yeterince bu konuyla ilgili soru yok.. bende bu konuda bildiklerimi sizinle paylasmak istedim..

öncelikle bir veriyi varolan bi database girmenin kodunu vericem..

--------------------------------------------------------------------------

On Error GoTo hata
Dim komut As OleDb.OleDbCommand
db_baglanti.Open()
komut = New OleDb.OleDbCommand("insert into giris(kullanici_adi,sifre,yetkisi) values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & ComboBox1.Text & "')", db_baglanti)
komut.ExecuteScalar()
db_baglanti.Close()
TextBox1.Text = ""
TextBox2.Text = ""

MsgBox("Yeni kullanici kayýtlarýmýza geçmiþtir...", MsgBoxStyle.Information, "Stoky : Ýþlem Tamam")
Exit Sub
hata:
MsgBox("Kullanici eklenemedi. Lütfen program satýcýnýza baþvurun.", MsgBoxStyle.Critical, "stoky : Hata 215")
db_baglanti.Close()
------------------------------------------------------------------------------

bu bölüm ekle butonunun click anına yazılacak..
tabii burda tanımlanan db_baglantinin formun üstündeki tanımada su:

_-------------------------------------------------------------------------------
Public db_baglanti As New OleDb.OleDbConnection("provider=microsoft.jet.oled b.4.0;data source=" + CurDir() + "\bilgi.mdb")

neyse dersler devam edecek...