View Full Version : سوال: نشان دادن جواب در گرید ویو
nedaei
شنبه 30 بهمن 1395, 21:32 عصر
با سلام خدمت دوستان
این کدها برای سرچ در sqlite هست من اگر بخوام جواب رو توی گرید ویو نشون بدم باید چه کدی بهش اضافه کنم و کدش چی هست
Dim cnn As SQLiteConnection = New SQLiteConnection("Data Source=mydata.sqlite;version=3;")
cnn.Open()
Dim q As String = "select * from tell where nam like@nam"
Dim cmd As SQLiteCommand = New SQLiteCommand(q, cnn)
cmd.Parameters.AddWithValue("@nam", "%" & TextBox8.Text & "%")
systam
یک شنبه 01 اسفند 1395, 09:58 صبح
سلام بهتره از دیتا اداپتور و دیتا ست استفاده کنی بهتره
hamidrezax1
یک شنبه 01 اسفند 1395, 18:12 عصر
Me.DataSet.Clear()
Dim Connectionn As New SqlConnection("Data Source=.;Initial Catalog=c;Integrated Security=True")
Dim Commandd As New SqlCommand()
Dim DataTablee As New DataTable
Dim DataAdapterr As New SqlDataAdapter(Commandd)
Commandd.Connection = Connectionn
Commandd.CommandTimeout = 2000
Commandd.CommandText = "SELECT * FROM [tt].[dbo].[Table_1] WHERE(nam LIKE '" + "%" + Me.TextBox1.Text + "%" + "')"
DataAdapterr.Fill(DataTablee)
Me.Table_1DataGridView.DataSource = DataTablee
DataAdapterr.Fill(DataSet.Table_1)
Me.Table_1DataGridView.DataSource = Me.DataSet.Table_1
Connectionn.Close()
hamidrezax1
یک شنبه 01 اسفند 1395, 18:13 عصر
دوست عزیز این نتیجه کلی جستجو و کمک گرفتن من از دوستانم هستش که شما با این روش میتونید دستورات اس کیو ال فراخوانی و در جدولتون نمایش بدین
gilsoft
یک شنبه 01 اسفند 1395, 23:12 عصر
با سلام خدمت دوستان
این کدها برای سرچ در sqlite هست من اگر بخوام جواب رو توی گرید ویو نشون بدم باید چه کدی بهش اضافه کنم و کدش چی هست
Dim cnn As SQLiteConnection = New SQLiteConnection("Data Source=mydata.sqlite;version=3;")
cnn.Open()
Dim q As String = "select * from tell where nam like@nam"
Dim cmd As SQLiteCommand = New SQLiteCommand(q, cnn)
cmd.Parameters.AddWithValue("@nam", "%" & TextBox8.Text & "%")
سلام دوست عزیز
من کد زیر رو به شما پیشنهاد میکنم:
Dim cnn As SQLiteConnection = New SQLiteConnection("Data Source=mydata.sqlite;version=3;")
cnn.Open()
Dim q As String = "select * from tell where nam like@nam"
Dim cmd As SQLiteCommand = New SQLiteCommand(q, cnn)
cmd.Parameters.AddWithValue("@nam", "%" & TextBox8.Text & "%")
Dim da As New SQLiteDataAdapter(cmd)
Dim DT As New DataTable
da.Fill(DT)
DataGridView1.DataSource = DT
موفق باشید ......
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.