اذهب الي المحتوي
أوفيسنا

التقني

المشرفين السابقين
  • Posts

    1,167
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    1

مشاركات المكتوبه بواسطه التقني

  1. السلام عليكم ورحمة الله

    البرنامج جميل

    الملاحظات

    في بند اضافة اصناف جديدة :

    1- الأفضل تحويل حقل البلد الى قائمة منسدلة وتعبأ بأسماء البلدان كما هو الحال في العبوة والوحدة .

    2- زر اغلاق النموذج المفترض أن يكون في رأس النموذج حتى نبعده عن ترتيب الكائنات في تفصيل النموذج .

    3- طريقة اظهار رقم الصنف مرتبطاً برقم السنة جميلة ومفيده .

    4- المفروض وجود زر أمر للحذف والجديد .

    زر توريد الصنف :

    1- فكرة اختيار رقم الصنف ومن ثم تظهر كل بياناته وبعد ذلك نضع كمية الوارد تعتبر فكرة جميلة جداً .

    ادخال الفواتير :

    1- زر الآلة الحاسبة فكرة عملية .

    2- زر اظهار الفاتورة أيضا فكرة عملية ومرتبطة بالنموذج الذي فيه بيانات العميل .

    3- حقل الكمية الصادرة أفضله رسالة تطلب مني الكمية حتى لا أقع في رسالة خطأ حقل مطلوب .

    4- يُعتبر هذا النموذج مثال على شاشة البيع اليومي واستخراج الفواتير عند الطلب .

    5- حبذا لو تم دمج نموذج التحصيل مع هذا النموذج حتى يكون الأمر أكثر سلاسة .

    هذا ما امكنني الاطلاع على برنامجك

    بارك الله بك على هذا الجهد المتميز وإن تم تطويره فسيكون مفيداً لكثير من الأخوة الذين يبحثون عن برنامج مبيعات ومخازن .

    وبالتوفيق

  2. وعليكم السلام ورحمة الله وبركاته

    قم بإستيراد النموذج واستبعد الكائنات التي لا تريدها فيه وجرب تشغيله .

    وبشكل عام..

    بعض الكائنات مرتبطة وبشكل معقد بأكواد عدة

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

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

    والله أعلى واعلم

  3. وعليكم السلام ورحمة الله

    بالنسبة لترقيم الحقل تلقائياً

    اطلع على هذا الكود

    Private Sub Form_Current()
      If Me.NewRecord Then
        On Error Resume Next
        Me!ID.DefaultValue = Nz(DMax("[Id]", "tblName"), 0) + 1
      End If
    End Sub
    يتم وضعه في حدث الحالي للنموذج ID هو الحقل الذي يتم فيه الترقيم والكود مقتبس من أحد أمثلة الأخوة الأعضاء فله الشكر الجزيل . بالنسبة لإظهار تاريخ الجهاز قم بوضح السطر التالي في مصدر عنصر التحكم لمربع نص
    =Date()

    وبالتوفيق

  4. شكرا لك آخي الكرام

    أنا لا أريد تكرار البرنامج لدليل الهاتف"

    أنا أقدم فكرة وهي استخدام VBA في التعامل مع الجدوال

    أعطيك بعض الأفكار في البرنامج:

    أولاها: طريقة البحث والتنقل بين السجلات

    ثانيها: أن عند كتابة اسم موجود في جدول tel تظهر لنا معلوماته

    أما عند كتابة اسم غير موجود نتمكن من إضافته

    ثالثا: عند إضافة تصنيف غير موجود نلاحظ إمكانية إضافته لجدول التصنيف types

    أرجوا أن تدرس البرنامج بعمق وأن ترد علي

    وأنا أقبل أي ملاحظات

    وشكراً

    الأصل في صياغة وتصميم البرامج أنها تخاطب المستخدم العادي (الغير مبرمج) بمعنى أنه لا يهتم بما حصل داخل البرنامج ويهمه المخرجات ونتائج عمل هذا البرنامج .

    بالنسبة لبرنامجك ..

    فعندما أضع اسما في القائمة اليسرى يظهر لي نسخه منه في حقل الاسم ... جميل جداً

    وهذا معناه أن الاسم موجود بالفعل ... حركة موفقة.

    لكن تظهر لي رسالة وهي (طلب صيانة (الشخص المذكور) موجوده لم أفهم المغزى منها .

    ملاحظة : لم أزلت مرفق البرنامج ؟

  5. السلام عليكم

    حسب ما فهمت من سؤالك ..

    الذي يقوم بإنشاء هذا الامتداد هو الآكسيس نفسه ومن خلال عمليات برمجية ناتجة عن تحويل الامتداد الـMDB ينتج لدينا الامتداد MDE

    ولتحويل القاعدة الـMDB الى MDE قم بتحويل القاعدة الى الاصدار الحالي (لأن الاصدار 2000 لا يتم تحويله ) وللتحويل من خلال :

    1- أدوات ثم (أدوات مساعدة لقواعد البيانات) ثم (تحويل قاعدة بيانات) ثم اختر الاصدار الأعلى .

    2- سيتم فتح صندوق حوار التحويل لتضع الاسم الجديد لهذا الاصدار .

    3- أغلق القاعدة الحالية (القديمة) ثم افتح القاعدة الجديدة (التي انشأتها حالياً) .

    4-الآن قم بتحويل هذه القاعدة الى الاصدار MDE

    وبالتوفيق

  6. السلام عليكم ورحمة الله

    أخي محمد

    رد أخينا رضوان واضح بخصوص عدم التعدي على حقوق الغير ..

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

    نحن في هذا القسم نساعدك في ايجاد حلول لحماية برنامجك ..

    فكيف ترضى لبرنامجك (وبعد أن قمت بحمايته) وقد عُرض هنا ضمن موضوع يطلب صاحبه كسر ما قُمت به من حماية .

    أكيد ستحتج وتغضب لأنك حي تُرزق فما بالك وصاحب البرنامج الذي تطلب كسر حمايته قد وُرى الثرى وأصبح ممن نترحم عليه .

    أعتقد أن حل تصميم برنامج جديد سيبعدك عن المسائلة الشرعية أمام الله عز وجل.

    (أرجع وأقول) أن ما نصحك به أخينا رضوان هو لمصلحتك وللجميع .

    والعتاب على قدر المحبة

    وجزاك الله خيرا

  7. السلام عليكم ورحمة الله

    كلام الأخ nail صحيح

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

    لحل الاشكال :

    1- قم بأخذ نسخة من النموذج الذي به العطل واجعل اسمه مقارب للأصلي .

    2- في عرض التصميم للنموذج افتح محرر الأكواد بالضغط على Alt + F11

    3- يوجد فوق الأكواد قائميتين منسدليتن متجاورتين .

    4- في القائمة على اليسار ابحث عن العنوان General فإن وجدته ابحث في ...

    5- في القائمة التي على اليمين عن اسم الكائن الذي تم حذفه فإن وجدته قم ...

    6- بحذف الأكواد التي تحمل اسم هذا الكائن .

    هذه الطريقة مفيده في التخلص من الأكواد التي كانت مرتبطه بكائن تم حذفه وأصبحت عبئاً زائداً على القاعدة.

    ملاحظة مهمة :

    1- قم بتضليل الكود فقط الذي يخص الكائن المحذوف ولا تتجاوز في التضليل الى أكواد كائن آخر.

    2- في حال تعطل عمل النموذج قم بحذفه والرجوع الى النسخة الأصلية .

    3- أقصد بالكائن هو زر أمر أو مربع نص أو قائمة منسدلة ... الخ .

    4- بعض الأكواد المطلوبة تحمل اسم General لذا انتبه وقارنها بالقائمة التي على اليمين فإن وجدت اسم الكائن طبق الخطوات أعلاه .

    والله أعلى وأعلم .

  8. وعليكم السلام ورحمة الله وبركاته

    ان كنت تقصد شريط القوائم ذلك الذي يحوي (ملف - تحرير - تنسيق ... الخ)

    في الحقيقة الذي بقي هو مكانه ومعه مربع نص التعليمات لذا .. يمكن اظهاره بالطريقة التالية :

    1- ضع المؤشر عليه واضغط يمين الفأرة .

    2- اختر (تخصيص ) ثم التبويبة (أشرطة الأدوات)

    3- ستجد نافذة فيها جميع أشرطة الأدوات وقد تم التأشير على (شريط القوائم) بشكل اجباري

    4- اضغط بالفأرة على (شريط القوائم) ثم اضغط على الزر (اعادة تعيين...) ستظهر نافذه صغيرة اضغط على موافق للبند Normal

    سيتم ارجاع شريط القوائم كما كان

    وبالتوفيق.

  9. وعليكم السلام

    حياك الله أخي

    وشكرا على هذه المشاركة

    حقيقة لم أفهم المغزي من هن هذا البرنامج .

    هل هو لتخزين هواتف الأشخاص أم هو لعمل صيانة لهم ؟

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

    وتسلم

  10. اجابة على السؤال الأول :

    لجعل النموذج يملأ الشاشة عند تشغيله .. هناك طريقتان :

    أولا : من خلال الكود ...

    1- ضع في حدث عند التحميل للنموذج الكود التالي :

    Private Sub Form_Load()
    DoCmd.Maximize
    End Sub

    2- من قائمة أدوات أكسيس اختر (بدء التشغيل...) ثم من (عرض النموذج/الصفحة) اختر النموذج الذي تريده أن يعمل حال تشغيل القاعدة .

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

    1- توجه الى نافذة الماكرو واختر (جديد)

    2- من عمود (إجراء) اختر (openform)

    3- في وسائط الاجراء بالاسفل اختر اسم النموذج الي تريده أن يعمل فور تشغيل القاعدة

    4- قم بتسمية هذا الماكرو بالاسم (autoexec)

    وهذا المثال تعديلا على ملفك :

    db1.rar

    والله أعلى وأعلم

  11. السلام عليكم ورحمة الله

    غفر الله لك اخي

    أرفقت ملف حجمه يزيد على 3.24 ميجا بايت وعند فك الضغط عنه ازداد حجمه ليصل الى 33.4 ميجا بايت !!

    قبل أن ترفقه لنا يكفيك عمل ضغط واصلاح كما عملت ليتحول حجمه الى 276 كيلوبايت وعند ضغطه أصبح حجمه لا يتعدى 16 كيلوبايت فقط .

    اليك المثال بعد تعديل حجمه :

    db1.rar

    ملاحظة :

    تم تعديل عنوان الموضوع من

    الرد على موضوع مشروعي بحاجة لمساعدتم

    الى :

    كيف أجعل النموذج يملأ الشاشة ؟

  12. السلام عليكم

    سؤالك غير واضح ..

    هل تقصد أن السجلات متكررة لديك ؟ فإن كان كذلك قم بإضافة هذه العبارة DISTINCT الى الأمر SELECT ليكون السطر التالي هو الفلتر للسجلات المتشابهة في حقل معين :

    SELECT DISTINCT tblName.fldName FROM tbeName;

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

  13. السلام عليكم ورحمة الله

    اطلعت على المثال ولم أجد فيه comobo box

    عموما اطلع على هذا المثال ..

    _____________.rar

    فيه نموذج اعددته لك يحتوي على comobo box يعرض لك كل التقارير المتوفره لديك ويعرضها بشكل مباشر .

    مصدر الـ comobo box هو جدول tblReports فيه أسماء التقارير ، يمكنك اضافة باقي أسماء التقارير .

    أرجو أن يكون هذا ما تريد

    وبالتوفيق

  14. السلام عليكم ورحمة الله

    الوورد أخي يأتي ضمن حزمة الأوفيس

    وهذه روابط التحميل للأوفيس 2003

    http://www.zshare.net/download/mgro7yn-part1-rar.html

    http://www.zshare.net/download/mgro7yn-part2-rar.html

    http://www.zshare.net/download/mgro7yn-part3-rar.html

    http://www.zshare.net/download/mgro7yn-part4-rar.html

    الحجم الكلي للملفات هو 356 ميجا بايت وذلك بعد فك الضغط .

    علماً بأن نسخة هذا الاصدار هي باللغة العربية .

×
×
  • اضف...

Important Information