مشکل جست جو نام در اس کیو ال سرور با زبان برنامه نویسی ویبی دات نت

[sempay_ninjutsu]

سلام به همه دوستان
یک برنامه حسابداری به زبان ویبی دات نت نوشتم که پایگاه داده آن sql server می باشد.
این برنامه یک جست جو بر اساس نام دارد که نامهای انگلیسی را پیدا میکند ولی نامهای فارسی را تا 4 حرف پیدا میکند و برای بیش تر از 4 تا حرف موردی را پیدا نمی کند.لطفا" خیلی سریع راهنمایی کنید.فوری فوری!!!
با تشکر

[arsalansalar]

عجیبه!کدی که برای جستجو می نویسی اینجا بگذار تا درست کنیم.

[taheri-ali]

سلام به همه دوستان
یک برنامه حسابداری به زبان ویبی دات نت نوشتم که پایگاه داده آن sql server می باشد.
این برنامه یک جست جو بر اساس نام دارد که نامهای انگلیسی را پیدا میکند ولی نامهای فارسی را تا 4 حرف پیدا میکند و برای بیش تر از 4 تا حرف موردی را پیدا نمی کند.لطفا" خیلی سریع راهنمایی کنید.فوری فوری!!!
با تشکر
آقا احتمالاً شما هم همون مشكل ك و ي را داريد با اسمهايي كه اين حروف تو اونا نيست سرچ كن ببين جواب ميده يا نه

[morteza_261]

سلام
یه نمونه برای جستجو فارسی:



Dim WHERE As String
WHERE = "Fname Like N'" & TxtSearch.Text & "%'"
PubSqlCom.CommandText = "SELECT Id, Fname, LName, FatherName, IdCordNo FROM TblStudent WHERE " & WHERE
PubSqlCom.Connection = PubSqlCon
If PubSqlCon.State = ConnectionState.Closed Then PubSqlCon.Open()
PubSqlDR = PubSqlCom.ExecuteReader()
If PubSqlDR.HasRows Then
While PubSqlDR.Read()
Lst = ListView1.Items.Add(PubSqlDR("Id"))
Lst.SubItems.Add(1).Text = (PubSqlDR("Fname"))
Lst.SubItems.Add(2).Text = (PubSqlDR("Lname"))
Lst.SubItems.Add(3).Text = (PubSqlDR("FatherName"))
Lst.SubItems.Add(3).Text = (PubSqlDR("IdCordNo"))
LblSearch.Text = "موارد پیدا شده برای:" & Space(2) & TxtSearch.Text
End While
Else
MessageBox.Show("موردی برای جستجو یافت نشد", "", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button3, MessageBoxOptions.RightAlign)
TxtSearch.Clear()
End If

[S_h_m102]

اگر مشکل در حروفی است که ی و ک دارد می توانید از ونت های شرکا برنا استفاده کنید و یا Dll کی بورد فارسی جدید میکرسافت را جایگزین آن کنید