25-09-16, 04:33 PM
(25-09-16, 11:33 AM)سعود كتب :إقتباس :لو يكون المثال بالسيكوالاخي الكريم ماذا تقصد بـ بالسيكوال؟؟؟
هل تقصد SqlServer؟
PHP كود :
Sub filldata3()
Dim cmd As New OleDbCommand
Dim reader As OleDbDataReader
cmd = New OleDbCommand("select * from table1", cn)
cn.Open()
reader = cmd.ExecuteReader
While reader.Read
ComboBox1.Items.Add(reader.Item(2))
End While
cn.Close()
End Sub
اكتب التعديل هذا وجرب
الكود شغال مية بالمية تسلم لي اخي سعود
بالنسبة لسيكوال : مثال بسيط
Dim cmd As New OleDbCommand("select * from Table1 where test like @test +'%' ", cn)
cmd.Parameters.AddWithValue("@test", TextBox1.Text.Trim)
cn.Open()
Table1.Load(cmd.ExecuteReader)
DataGridView1.DataSource = Table1
cn.close()
