PDA

View Full Version : سوال: نشان دادن جواب در گرید ویو



nedaei
شنبه 30 بهمن 1395, 20: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, 08:58 صبح
سلام بهتره از دیتا اداپتور و دیتا ست استفاده کنی بهتره

hamidrezax1
یک شنبه 01 اسفند 1395, 17: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, 17:13 عصر
دوست عزیز این نتیجه کلی جستجو و کمک گرفتن من از دوستانم هستش که شما با این روش میتونید دستورات اس کیو ال فراخوانی و در جدولتون نمایش بدین

gilsoft
یک شنبه 01 اسفند 1395, 22: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

موفق باشید ......