طباعة الاستيكرات .. أو الليبل .. أو ... LABEL....على المغلفات البريدية

[محمد العدامه]

عمل استكيرات أو .. ليبل .. (LABEL

يتم وضعه على المغلف للمراسلات البريدية

اخواني الكرام ...

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

1- عمل نموذج يحتوي على ( زر أمر ) بحيث عند الضغط على زر الامر يتم نقل بيانات هذا السجل ( فقط اسم العميل وعنوانه ) الى جدول يتم عمله مؤقتا ..

2- بعد الانتهاء من نقل بيانات السجلات المطلوبة الى الجدول المؤقت لنفترض اسمه ( TT ).

3- يتم طباعة هذه البيانات عن طريق ( التقارير ) بحيث يتكون التقرير من ( عمودين ) وأربعة صفوف في كل صفحة

4- بعد الانتهاء من طباعة التقارير ، يتم ( تنظيف ) الجدول المؤقت ( TT ) من كافة البيانات او السجلات لاستخدامه لاحقا ..

مرفق لكم مثال

التقارير.rar

[ابوخليل]

اخي محمد

لست بحاجة الى كل هذا

فقط استعلام يقوم بالمهمة

وايضا تستطيع ان تجعل مصدر التقرير النموذج نفسه

التقارير2.rar

[محمد العدامه]

اخي الفاضل .. لك كل الشكر ..

لكن...

ليس هذا ما اردت

1- الاستيكر لدي يحتوي على 8 خانات لطباعة 8 عناوين في كل صفحة ....

2- ثانيا : لا أريد طباعة كل السجلات .. أريد طباعة عناوين الزبائن الموجودين الان داخل المحل .

ثالثا : بعد طباعة الاستيكرات ..اريد طباعة استكيرات جديدة لزبائن جدد ...

اذن ....المطلوب :

- طباعة 8 استيكرات في كل صفحة .... بمقاس محدد ...

طباعة عناوين زبائن محددين .يعني طباعة سجلات محددة ....

وشكرا للجميع

[محمد العدامه]

..

يعني ...

1- لو كان عندي نموذج يحتوي على سجلات عديدة ..ومصدر هذا النموذج ( جدول 1)

السؤال ...

كيف أعمل ( زر امر ) داخل النموذج ليتم ( نسخ ) سجلات معينة من ( جدول1 ) الى ( جدول 2)

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

[ابوخليل]

يقوم بها استعلام

واحد للالحاق وآخر للحذف

انظر المثال

التقارير4.rar

[محمد العدامه]

اخي الفاضل ... أبو خليل ...

انت رررررررررررررررررررررررررررررررررررائع...

فلك كل الشكر ....

سوف اجرب المثال وسوف اطعلك على النتيجة ...

مشكور مرة ثانية

[محمد العدامه]

Private Sub ÃãÑ17_Click()

If MsgBox("åá ÊÑíÏ ÇáÍÇÞ åÐÇ ÇáÓÌá ¿", _

vbYesNo + vbMsgBoxRight + vbMsgBoxRtlReading, _

" ÇáÍÇÞ") = vbNo Then

Exit Sub

Else

DoCmd.RunSQL "INSERT INTO tmp ( ÇáÇÓã, ÇáÚäæÇä, ID ) " & vbCrLf & _

"SELECT ÇáÈíÇäÇÊ.ÇáÇÓã, ÇáÈíÇäÇÊ.ÇáÚäæÇä, ÇáÈíÇäÇÊ.ID " & vbCrLf & _

"FROM ÇáÈíÇäÇÊ " & vbCrLf & _

"WHERE (((البيانات.ID)=[forms]![البيانات ]![id]))"

MsgBox "Êã ÇáÍÇÞ ÇáÓÌá ÈäÌÇÍ"

End If

End Sub

اخي الفاضل ...

أبو خليل ...

لك مني ألف ألف ألف شكر ...

نعم هذا المطلوب ...... بل زيادة ... أقصد بالزيادة رسئل التنبية عند اضافة او حذف سجل ..

فعلا مجهود تشكر عليه .. والله والله .. لقد دعوت لك دعوة خاصة بالتوفيق ..

ثانيا ::::

سؤالي - لو تكرمت .. ( وانت اهل الكرم والجود )

سؤالي عن هذا السطر

لقد فهمت جميع الجمل السابقة الموجودة في الكود في الأعلي

سؤالي عن هذا السطر

WHERE (((البيانات.ID)=[forms]![البيانات ]![id]))"

اعرف انها جميلة شرطية .. وكنت أظن انها لاقة للارتباط بين الجدولين 1و2

لكن تبين لي خلاف ذلك ...

علما بأنني اذا خذفت هذه الجملة سوف يتم نسخ جميع السجلات دفعة واحدة ...سؤالي باختصار ...

1- ما معنى الجملة السابقة خاصة وانها تعود لجدول واحد ( البيانات )2- ما الفرق بين :-

أ- ( البينات . id لاحظ علامة النقطة

ب- البيانات ! id لاحظ علامة الاستفهام

[ابوخليل]

العلامة ! ( علامة التعجب ) وتستخدم لتحديد العنصر (النموذج ، مربع النص ، تسمية ، زر أمر ... )

( . ) النقطة وتستخدم لتحديد خصائص العنصر (النموذج ، مربع النص ، تسمية ، زر أمر ... )

بالنسبة للسطر

(البيانات.ID)=[forms]![البيانات ]![id])

فهو عبارة عن جزئين

1- (البيانات.ID) الحقل id في الجدول البيانات

2- [forms]![البيانات ]![id] الحقل id في النموذج البيانات من مجمعة النماذج

ولاحظ ان الخلط في التسميات بحروف عربية وحروف انجليزية يسبب الارباك واللبس

[محمد العدامه]

اخي الفاضل العزيز ............. أبو خليل حفظه الله ورعاه

أولا ؟:_ اذا ادرت حذف ( بيانات ) سل واحد فقط عن طريق sql كيف الطريقة ...؟؟؟؟؟؟؟

ثانيا :-

الكود اللي انا كتبته في الجملة التالية : فيه خطأ ...اتوقيع في سطر جملة where

لكن لا اعرف اين الخطأ ...

علما بان

ا- اسم الجدول الرئيسي- الجدول

ي- اسم الجدول المؤقت ..الليبل

3- اسم النموذج الذي سوف اعمل فيه : ادخال بيانات

مرفق لكم الملف

ضررررررررررررررررررررررروري جدا الرد ... ولكم ألف ألف ألف شكر ..

DoCmd.RunSQL "INSERT INTO ÇááíÈá " & vbCrLf & _

"SELECT * " & vbCrLf & _

"FROM ÇáÌÏæá " & vbCrLf & _

"WHERE (((ÇáÑÞã ÇáÊÓáÓáí.ÇáÌÏæá)=[forms]![ÇáÑÞã ÇáÊÓáÓáí]![ÇÏÎÇá ÈíÇäÇÊ]))"

MsgBox "Êã ÇáÍÇÞ ÇáÓÌá ÈäÌÇÍ"

End If

محمد.rar

[محمد العدامه]

اخي الفاضل العزيز ............. أبو خليل

أولا ؟:_ اذا ادرت حذف ( بيانات ) سجل واحد فقط عن طريق sql كيف الطريقة ...؟؟؟؟؟؟؟

ثانيا : اذا اردت حذف ( بيانات ) عمود كامل مثلا بيانات عمود ( الاسم ) لكل السجلات كيف الطريق

ثالثا :

ثانيا :-

الكود اللي انا كتبته في الجملة التالية : فيه خطأ ...اتوقع في سطر جملة where

لكن لا اعرف اين الخطأ ...

ضرررررررررررررررررررررررررررررررررررررررررررررررررررررروري جددددددددددددددددددددددددددددددددددا

[محمد العدامه]

اخي الفاضل العزيز ............. أبو خليل

أولا ؟:_ اذا ادرت حذف ( بيانات ) سجل واحد فقط عن طريق sql كيف الطريقة ...؟؟؟؟؟؟؟

ثانيا : اذا اردت حذف ( بيانات ) عمود كامل مثلا بيانات عمود ( الاسم ) لكل السجلات كيف الطريق

ثالثا :

ثانيا :-

الكود اللي انا كتبته في الجملة التالية : فيه خطأ ...اتوقع في سطر جملة where

لكن لا اعرف اين الخطأ ...

مرفق لكم ملف بالمطلوب

ضرررررررررررررررررررررررررررررررررررررررررررررررررررررروري جددددددددددددددددددددددددددددددددددا

التقارير.rar

[ابوخليل]

الاخ الكريم محمد العدامة

تحية طيبة وبعد

تم تعديل جملة سكول وابقيت على القديمة لترى بعينك الفرق

واتحداك تعلم اين مكان المشكلة والسبب الخلط بين الحروف العربيبة والانجليزية وهذا ما ننبه له دائما

ايضا للفائدة وضعت لك استعلام الحاق هو نفسه يعمل عمل جملة سكول ذاتها

اما بالنسبة للحذف :

فحذف السجل عن طريق جملة سكول او استعلام تجدها في المرفق وايضا اختر ما شئت علما ان المفعل الآن الاستعلام

اما حذف بيانات عمود فقط بينما الاعمدة الاخرى تشتمل على بيانات فتاستخدم لذلك استعلام تحديث والتحديث يكون الى null أو صفر ان كان رقما .

امل ان تجد الفائدة

التقارير2.rar

[محمد العدامه]

اخي الفاضل ...... أبو خليل

عندي سؤال اخير ...فقط ...

قل لي .....

كيف اشكرك ...

لأن الكلمات تقف عاجزة وحائرة عن شكرك ...[/size]

[محمد العدامه]

معاليش ... عندي تدارك ..

اسم الحقل في النموذج ..... ( الرقم ) على الرغم من أن اسمه في الجدول المصدر ( الرقم التسلسلي) كيف ذلك ..

[ابوخليل]

هذا انت قلت في النموذج

الحقل في النموذج قد يأخذ اسما يختلف عن حقل الجدول ولو كان حقل الجدول هو المصدر

لذا في الجملة الشرطية قلنا ان الحقل الفلاني في الجدول يساوي الحقل الفلاني في النموذج

عند استخدام المعالج يقوم المعالج بتوحيد الاسماء فيعطي حقل النموذج نفس اسم حقل الجدول