Arama butonu
Bu konudaki kullanıcılar: 1 misafir
5
Cevap
5281
Tıklama
0
Öne Çıkarma
Veritabanı bağlantısı Textbox' a Girilen değeri arama
A
16 yıl
Yarbay
Konu Sahibi

Arkadaş acil yardıma ihtiyacım var yarına ödevleri yetiştirmeliyim.

Imports System.Data
Imports System.Data.OleDb
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim baglanti As New OleDbConnection
Dim komut As New OleDbCommand
Dim adp As New OleDbDataAdapter
Dim ds As New DataSet

baglanti.ConnectionString = "Provider=microsoft.jet.oledb.4.0; Data Source=\KITAP.mdb"
baglanti.Open()

komut.CommandType = CommandType.Text
komut.CommandText = "SELECT * FROM KITAP WHERE KITABIN_TURU=Textbox1.text"
komut.Connection = baglanti

adp.SelectCommand = komut
adp.Fill(ds)

DataGridView1.DataSource = ds.Tables(0)

baglanti.Close()
baglanti.Dispose()
komut.Dispose()
adp.Dispose()

End Sub
End Class

Benim sormak istediğim koyu yazan yerdeki sql kodları doğru mu ve öyle bir kullanım var mı?
Eğer kodlar yanlışsa textbox a girilen değeri veritabanında nasıl aratabilirim?

Şimdiden teşekkürler.