تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] عندي مشكله في البحث
#1
السلام عليكم ورحمة الله
اخى الكريم ممكن حل

عندي مشكله في البحث حيث يقوم البرنامج بالبحث عن اي كلمة باللغه الانجليزيه ولا يقوم بالبحث عن اي كلمة باللغه العربيه vb.net and sql server
 

Dim SQL As String = ""
       Select Case ComboBox1.SelectedIndex
           Case 0
               SQL = ("SELECT * FROM PationtInfo WHERE PationtCode LIKE '%" & TextBox1.Text & "%'")
           Case 1
               SQL = ("SELECT * FROM PationtInfo WHERE PationtName LIKE '%" & TextBox1.Text & "%'")
           Case 2
               SQL = ("SELECT * FROM PationtInfo WHERE PationtReveal LIKE '%" & TextBox1.Text & "%'")

       End Select
       '===========================================================
       Dim ADB As New SqlClient.SqlDataAdapter(SQL, Sqlconn)
       Dim DS As New DataSet
       ADB.Fill(DS)
       Dim DT = DS.Tables(0)
       '-=======================================================
       DataGridView1.DataSource = DT.DefaultView
       DataGridView1.AutoGenerateColumns = False
الرد }}}
تم الشكر بواسطة:
#2
ضع بعد كلمة Likeفي الاستعلام حرف N
الرد }}}
تم الشكر بواسطة:
#3
CHAR
NCHAR

VARCHAR
NVARCHAR

PHP كود :
If ComboBox1.SelectedIndex 0 Then Return
'==========================================================='
Dim SQL As String "SELECT * FROM [PationtInfo] WHERE [" & {"PationtCode""PationtName""PationtReveal"}(ComboBox1.SelectedIndex) & "] LIKE '%' + @param + '%'"
Dim ADB As New SqlClient.SqlDataAdapter(SQLSqlconn)
ADB.SelectCommand.Parameters.AddWithValue("@param"TextBox1.Text)
Dim DT As New DataTable
ADB
.Fill(DT)
'==========================================================='
DataGridView1.AutoGenerateColumns False
DataGridView1
.DataSource DT 
الرد }}}
تم الشكر بواسطة:



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم