منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
ارجو الافادة في كود البحث - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : ارجو الافادة في كود البحث (/showthread.php?tid=7965)



ارجو الافادة في كود البحث - علوش - 15-03-13

انا كتبت كود للبحث بـ 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

لاكن خطاء
ارجو الافادة