15-03-13, 02:59 AM
انا كتبت كود للبحث بـ ado طيب المطلوب التقرير ان يحمل نتائج البحث هذا هو الكود
If RS.State = 1 Then RS.Close
RS.Open "select * from itemsvo where invno ='" & Trim(Text3.Text) & "'", DB, adOpenStatic, adLockPessimistic
كيف اجعل التقرير يحمل نتائج البحث انا كتب
Set DataReport1.DataSource = RS
DataReport1.PrintReport
لاكن خطاء
ارجو الافادة
If RS.State = 1 Then RS.Close
RS.Open "select * from itemsvo where invno ='" & Trim(Text3.Text) & "'", DB, adOpenStatic, adLockPessimistic
كيف اجعل التقرير يحمل نتائج البحث انا كتب
Set DataReport1.DataSource = RS
DataReport1.PrintReport
لاكن خطاء
ارجو الافادة