Veritabanı bağlantısını yap hacı
button1.click eventına alttakileri yaz
try
data.clear()
bag.connectionstring= "provider=microsoft.jet.oledb.4.0;data source=" & application.startuppath & "\veri tabanı adı.mdb"
if bag.open()
kom.commandtext="select * from tablo adı where kitapadi= '" & Textbox1.text & "'")kom.connection=bag
dim par(yukardaki tanıma uygun) as new oledbparameter
par( ).value=textbox adı .text
kom.parameters.clear()
kom.parameters.add(par( ))
adp.selectcommand=komut
adp.fill(veri tabanı adı,"tablo")
oku.kom.executeReader
DatagridView1.datasource=veritabaniadi.tables(0)
catch ex as exception
msgbox(ex.message)
finnaly
oku.close()
bag.close()
end try
end sub
Merhaba, Mutsuz ve Doyumsuz Bayanlar Adana ve çevresinde yaşayan, Reel birliktelik düşünen, Gizlilik ve Güven İçerisinde İlişki Arayan Seks'te Sınır Tanımayan ve Ne İstediğini Bilen Doyumsuz Bayanların Mesajını Bekliyorumm
YanıtlaSil0545 352 25 52 Özele Açık ! Skype™: Dost_erkek01 Whatsapp var
Merhaba, Evli Çiftler Eşi için Büyük ve Kalın Düşünenler.. ( Fotoğraf ispatlı ) Eşinizin Mutluluğuna Engel Olmayın 0545 352 25 52 Özele Açık! Whatsapp Var Skype™: Dost_erkek01 Not:Tek Erkeqim.. Deneyimim var.
Merhaba, Grup seks fante*zisini gerçekleştirme düşüncesinde olan Kararlı Samimi Paylaşıma Açık Gizliliğe Önem Verenler
* Evli Çiftlere 3. Tek ERKEĞİM!
* Kocasının yanında bir başka tene dokunma arzusu olan
* Tost olmayı arzulayan bayanlar
* Karısı gözlerinin önünde başka bir tene dokunurken aldığı hazzı görmek isteyenler beyler
* Sizi tanıyan sizin hassasiyetinizi bilen gizliliğe önem veren deneyimli güvenilir sırdaş samimi dost olarak tanışmak isteyenler
* 0545 352 25 52 Özele Açık ! Skype™: Dost_erkek01 Whatsapp var