Kod:
Sub ekle(sender As Object, e As EventArgs) dim db_baglanti as OleDbConnection dim urunad as string dim urunstok as integer urunad = ad.text urunstok = adet.text db_baglanti = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; DATA Source=" & Server.MapPath("stok.mdb")) db_baglanti.Open() dim db_komut as OleDbCommand db_komut= New OleDbCommand( "Insert INTO stok ( urunad, urunstok) Values( '" & urunad &"','"& urunstok &"')", db_baglanti ) db_komut.ExecuteNonQuery uyari.text = ad.text & " Adlı Urunden " & adet.text & " Adet Yeni Urun Girildi!" db_baglanti.Close() ad.text = "" adet.text = "" End Sub
Bu benim Visual Basic de yeni urun ekleme kodum. Database min adı Stok.mdb! Urunlerin yazılı olduğu satır urunad. Bu kodla oyle bir şey yapmalıyım ki urunad'da oyle bir urun var ise tekrar eklemesin. Lutfen yardım edin. Yardıımmm!
[Zek Sorusu Gibi Oldu ]
__________________