السلام عليكم
عايز مساعدة اني ازاي اخلي الاستعلام أنه اول ما يكتب حرف من المدينه او حرفين يظهر المدن المتشابهه في الحروف
وشكرا مقدما
Public Sub Load_city_Supplier(ByVal supplier_city As String)
Try
city_Supplier.Clear()
Dim cmd As New SqlCommand("Select * From Supplier Where supplier_city= @supplier_city", connSQLServer)
cmd.Parameters.Add("supplier_city", SqlDbType.NVarChar).Value = supplier_city
connSQLServer.Open()
city_Supplier.Load(cmd.ExecuteReader)
connSQLServer.Close()
cmd = Nothing
Catch
connSQLServer.Close()
End Try
End Sub
PHP كود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
Using con As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=db.accdb")
Dim dt As New DataTable
If con.State = ConnectionState.Closed Then con.Open()
Using cm As New OleDb.OleDbCommand("", con)
cm.CommandText = "select * from tb where tname like'%" & TextBox1.Text & "%'"
dt.Load(cm.ExecuteReader)
ListBox1.DataSource = Nothing
ListBox1.Items.Clear()
ListBox1.DataSource = dt
ListBox1.DisplayMember = "tname"
End Using
If con.State = ConnectionState.Open Then con.Close()
End Using
End Sub
جرب الكود بمثال مستقل فان عمل يتبقى ان تفحص مشروعك للبحث عن سر عدم عمله.
تم نقل الموضوع لقسم الاسئلة
أشكركم جميعا على المساعدة
تم حل المشكله و كانت في السطر التالي
cmd.Parameters.Add("supplier_city", SqlDbType.NVarChar).Value = supplier_city
و عدلت الكود
cmd.Parameters.Add("supplier_city", SqlDbType.NVarChar).Value = "%" & supplier_city & "%"