17-06-23, 06:36 PM
في الكود التالي : لغة البرمجة VB6
Adodc1.RecordSource = "select * from INFO where name='" & Text1.Text & "' and city='" & Text2.Text & "' and date >= #" & Text3& "# and date <= #" & Text4& "#"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
Text أداة تيكست بوكس
Text1 , text2 , Text3 ,Text4
INFO اسم الجدول
name . city . date اسماء الأعمدة
أرجو مساعدتي في تعديل الكود بحيث تظهر النتائج حسب التصفية في DataGrid كمايلي :
مثلا :
في TEXT1 البحث حسب الاسم عند كتابة اسم احمد ارغب ان تكون التصفية حسب الحرف أ ثم أح ثم أحم ثم أحمد
TEXT2 البحث حسب المدينة . نفس الشيء
سؤال آخر
عند كتابة الكود التالي للبحث بين عمودين رقميين على النحو التالي يظهر الكود بلون أحمر
حاولت عدة مرات معرفة الخطأ ولم أتمكن
Adodc3.RecordSource = " select * from INFO where NUMBER like '" & Combo7 & "*'" And NUMBER2 Like '" & Combo8 & "*'"
لكم الشكر الجزيل
Adodc1.RecordSource = "select * from INFO where name='" & Text1.Text & "' and city='" & Text2.Text & "' and date >= #" & Text3& "# and date <= #" & Text4& "#"
Adodc1.CommandType = adCmdText
Adodc1.Refresh
Text أداة تيكست بوكس
Text1 , text2 , Text3 ,Text4
INFO اسم الجدول
name . city . date اسماء الأعمدة
أرجو مساعدتي في تعديل الكود بحيث تظهر النتائج حسب التصفية في DataGrid كمايلي :
مثلا :
في TEXT1 البحث حسب الاسم عند كتابة اسم احمد ارغب ان تكون التصفية حسب الحرف أ ثم أح ثم أحم ثم أحمد
TEXT2 البحث حسب المدينة . نفس الشيء
سؤال آخر
عند كتابة الكود التالي للبحث بين عمودين رقميين على النحو التالي يظهر الكود بلون أحمر
حاولت عدة مرات معرفة الخطأ ولم أتمكن
Adodc3.RecordSource = " select * from INFO where NUMBER like '" & Combo7 & "*'" And NUMBER2 Like '" & Combo8 & "*'"
لكم الشكر الجزيل
