كيف يمكنني تمرير متغير إلى تقرير الأكتيف ريبورت....
هذا المتغير يأخذ قيمته من text موجود في form ثم يمرر القيمة المدخلة من قبل المستخدم في الـ text إلى التقرير، ويتم عرض التقرير بناءً على تلك القيمة.
شاكرة لكم سلفاً ....
مساعدة عاجلة رجاءاً ... في تقارير الأكتيف
السلام عليكم
ارجو رفع مثال
تحياتي
OMANI FOR EVER
-------------------------------------------------
-------------------------------------------------
الكود يكون كما يلي:
dim str as string
str = text1.text
rpt.parameters("name").value = str
حيث rpt هو ريبورت يمتلك بارامتر من نوع string كما يلي:
select * from personal_query where user_name = <%name | name user |%>
السلام عليكم ورحمة الله
بدل استخدام الباراميتر يوجد عدة الطرق لتنفيذ ما تريد منها تمرير الاستعلام مباشرة مثلا
activereport1.source =" select * from mytable where x =" & text1
activereport1.show 1
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود ا
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو -
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول - ا
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول - ا لثاني
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول - ا لثاني ...
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول - ا لثاني ... -
آســـــف كثيرا ً ... لقد قمت بضغط enter خطأ .. أعتذر ... (كيف يمكنني أن أحذف مشاركة خاصة بي من المنتدى؟)
شكراً كثيراً ....
سأجرب هذه الطريقة اليوم ....
أيضاً هل تفيد هذه الطريقة إذا ما قمت بإستخدام أكثر من متغير أي إستعلام عن طريق OR - and مثلاً:
بحث عن عضو بإستخدام :
كود العضو - اسم العضو الأول ، الثاني، الثالث، اللقب ... الخ.
هل تتغير المعاملات and - or.
جزاك الله خيراً ...
----------------------
كيف يمكنني الوصول إلى بريدك الخاص كما ذكرت في آخر مشاركة في تقارير الأكتيف ...
السلام عليكم روحمة الله
اتعاملا غالبا مع SQL server وبالتالي استخدم ال Procedures لارجاع النتائج دون الاعتماد على التقرير لكن في حالة الاكسس يمكن فتح recordset ثم تمريرها الى التقرير
في حالة وجود اكثر من شرط يمكن وضع الشروط مايلي
sql="select * from mytable where id= " & text1 & " and name like '" & text2 & "'"
activereport1.source =SQL
activereport1.SHOW
وبالنسبة للمراسلة قصدت عن طريق ارسال الرسائل من المنتدى
هذا الملف المرفق يوضح ما أريد عمله بالضبط ... بصراحة أتمنى أن لا يكون الحل النهائي هو Recordset لأن البرنامج كبير جداً ... ولا أريد المزيد من الأكواد لفتح القاعدة وما إلى ذلك ...
شكراً كثيراً... لتعاونكم معي
الملف مضغوط بواسطة برنامج WinRAR
السلام عليكم
التقرير غير مرفق لكن المطلوب هو في الاستعلام وليس في التقرير لذا يمكنك عمل الاستعلام كما يلي :
sql = "select * from personal_query where Name_user = '" & name1 & "' " sql = sql & "and Father_name= '" & txt_father & "' " sql = sql & "and Grand_name= '" & txt_grand & "' " sql = sql & "and nick_name= '" & txt_nick & "' " full_personal_report.DataCtl.Source = sql
اورجو ان تنتبه ان اسماء الحقول بها فراغ في قاعدة البيانات مثل Father _name لذا من الافضل ان تزيلها
السلام عليكم ورحمة الله وبركاته ....
شكراً كثيراً لكل من ساعدني ... وأجاب على إستفساراتي وأخص أ. TareqVB ...
جزاكم الله خير الجزاء ....
تحياتي