ابوخليل

لم اذكر الا ما وصفت به نفسك

عمل متقن وجميل ... شكرا لك

جزاك الله خيرا على هذا الشرح والتفصيل تعقيب بالنسبة لحماية المستند ضد الطباعة لا يمكن ذلك لانه يمكنك طباعة أي شيء بستخدام ctrl+P الا اذا اردت ان تلغي أوامر وخصائص الطباعة من الجهاز نفسه

هذه طريقة اخرى في التنفيذ والعرض لتحقيق مطلبك db3.rar

وقد اكتمل البناء نشكر المعلم والمتعلم على هذا الطرح المتميز وهذه المسائل الشيقة المفيدة الاستاذ محمد أيمن : ادام الله عليك الصحة والبسك ثياب العافية .

السلام عليكم في الحل الأخير عند النقر على زر نعم يتم حذف البيانات والسبب انك وضعت خيارين فقط في الشرط 1- cancel = الخروج ، 2- نعم + لا = الحذف ( التراجع ) لحل المسألة اجعل نص الرسالة كمتغير ثم طبق الشرط على الازرار الثلاثة متفرقة

تم التعديل انظر المرفق يمكن عمل ذلك في الفاتورة عند الطباعة بواسطة استعلام مجاميع db2.rar

انظر الى المشاركة رقم 5 من هذا المقال http://www.google.com.sa/url?sa=t&rct=j&q=&esrc=s&frm=1&source=web&cd=1&ved=0CFMQFjAA&url=http%3A%2F%2Fwww.arabteam2000-forum.com%2Findex.php%3Fshowtopic%3D55705&ei=ucDtT9mrFIGq-gb5jLm2Dg&usg=AFQjCNGPa-yl0G9muXmLU-esuhQhVL5FNw لعلك تجد حلا لمشكلتك

قد ساق الله لك رفيق درب ، يشاركك الاهتمام فلن تعدم فائدة ، فتلاقح الافكار مطلوب ونحن بالخدمة ما استطعنا .

يبدو ان لديك مشكلة مع nz وسببه موقعها الغير ملائم داخل الكود جرب وانقلها كما في السطر التالي بالضبط ووافني بالنتيجة : Total: DSum("nz([IN_B])-nz([OUT_B])";"tbl1";"[id]<=" & [id])

اخي الكريم سدد الله على طريق الخير خطاك 1- ضع كل سؤال في موضوع مستقل 2- اكتب عنوانا واضحا يصف الموضوع يغلق الموضوع

طبعا ستبقى حسب آخر اختيار ويمكنك تحديد طابعة افتراضية معينة عند اغلاق النموذج ( البرنامج) فنكتب عند حدث اغلاق النموذج السطر التالي SetDefaultPrinter ("hp LaserJet 1000") ما بين القوسين هو اسم الطابعة التي امامي الآن هذا للعلم فقط حيث لا يتصور ان تكتب اسم الطابعة داخل المحرر ، حيث ان هذه الاجهزة غير ثابتة فقد تتغير وتستبدل في اي لحظة

اولا : الصق هذا السطر في اعلى صفحة محرر الفيجوال الخاص بالنموذج Private Declare Function SetDefaultPrinter Lib "winspool.drv" Alias "SetDefaultPrinterA" (ByVal pszPrinter As String) As Long ثم في حدث بعد التحديث لمربع التحرير الصق هذا السطر SetDefaultPrinter (Me.cboPrinter)

سبب التأخر ان اجهزة الغالبية تحمل الاصدار2003 لا تحزن نسأل الله لك التيسير

ادخل او ادرج من حقلي [in] و [out] من الجدول [tabl1] في الحقل [total] العمليات التراكمية التالية : [in]-[out] شريطة ان يكون حقل [id] في الجدول[tabl1] اصغر أو مساويا لحقل [id] في الاستعلام أما nz فهي لارجاع قيم الحقول الخالية الى صفر

نرجو من الله ان يكون اخي الحبيب واستاذي الفاضل " ابو آدم " بخير وان يديم عليه وعلينا النعم . اخي العزيز عبدالله ارى الا تغير في كود زر الطباعة فما دمت قد طبقت الدرس وخرجت معك الطابعات في مربع التحرير فيكفي الى هذا الحد فلست بحاجة الى تخصيص لكل تقرير طابعة . وانما يقوم بالامر لو غيرت الطابعة الافتراضية للجهاز حسب الاختيار من مربع التحرير بمعنى ان الطابعة الافتراضية تتغير تبعا لما يتم اختياره في مربع التحرير ما رأيك ؟

انظر الاستعلام في المثال الصغير المرفق لعله يلبي حاجتك db2.rar

السلام عليكم شكرا للاستاذ احمد على هذه الاجابة الموفقة اخي الكريم لا يمكن ان تتم العملية وحسب الاصول المتبعة كما بينت في الصورة ، اي عمليتي سحب وايداع بقيد واحد فالسجل الواحد لا بد ان يحمل عملية واحدة ورقم قيد يخصها ،

وعليكم السلام ورحمة الله وبركاته بداية نأمل أن تشاركنا هنا http://www.officena....showtopic=41520 الامر الآخر : أخونا حامل المسك لديه توجه نحو هذه الاعمال ويملك الخبرة فلعله يمر من هنا ففي مشاركته خير كثير ان شاء الله ونحن بالعون والمساعدة ما استطعنا .

الصورة رقم 1 لكيفية تخصيص زر لحدث ما والوصول اليها : أدوات / تخصيص الصورة رقم 2 لكيفية فصل الكلمات عن بعض بعمودين بدلالة النقطة ( بفرض وجودها بين الكلمات العربية والكلمات الاجنبية ) الصورة رقم 3 لنتيجة الفصل

هناك حل قريب وهو ان يعين رغبته الاساسية لتكون افتراضية فتدخل الوجهة ضمن البيانات

المشكلة امامنا ان تنسيق البيانات لديك غير منضبط فتجد في سطر مسافة بين الحروف الانجليزية والحروف العربية وفي سطر آخر لا تجد هذه المسافة بل تجد الحروف ملتصقة وهنا مكمن الصعوبة في التعامل مع البيانات ككل عندي لك حل قد يأخذ من وقتك ولكنه ايسر واتقن من الطريقة التي عالجت بها المسألة ولعل احدا من اخواننا المحترفين والخبراء من لديه حل افضل والطريقة : ان تضع نقطة مثلا (أو اي رمز) بين الحروف العربية والحروف الانجليزية فهنا يمكنك تحويل النص الى جدول بعمودين بدلالة الفاصلة التي هي النقطة . استدراك : ان كانت جميع الكلمات الانجليزية تنتهي بهذين القوسين (v) أو هذين (n) فالامر يسير ومقدور عليه ان شاء الله بخطوتين فقط

وعليكم السلام البطاقات لها طابعات خاصة ولكن اذا استخدمت ورقا خاصا ( من خصائص الطابعة ) بحيث يكون عرضه مناسبا لعرض بطاقة واحدة ، فيمكنك الطباعة الامامية ثم تقلب الورقة لتطبعها مرة اخرى

تم تعديل العنوان يرجى اختيار عنوان مناسب يصف الموضوع والاكتفاء بطلب واحد في كل مشاركة

تفضل تم التعديل حسب رغبتك لطباعة التقرير اضغط ctrl+P بطاقات2.rar