الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

برنامج يوصلني لمبتغاي

مغلق
بدأه alali100 في 7 مارس 2003 · 35 رد · 2,243 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#26

يا هاجري تحياتي لك . أولا أكتب ( إن شاء الله ) وليس إن شاء الله.

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

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

#27

الأخ الهاجري: شكرا مرة أخرى يبدو أنني تسرعت في طرح السؤال. فقد توصلت إلى المشكلة وأنهيت حلها ولله الحمد.

لكن عوضا عن ذلك السؤال اسمح لي بطرح سؤال آخر.

قلت لي أن أكتب كودا في حدث عند الفتح في خصائص النموذج. والكود الذي تشير إليه هو

fSetAccessWindow ...إلخ الكود.

هل تقصد خصائص نموذج لوحة التبديل أم تقصد نموذجا آخر. لأنني عندما أقوم بمحاولة لصق هذا النموذج في المكان المحدد أجد أن هناك كودا آخر مكتوبا في نفس المكان هو :

Private Sub Form_Open(Cancel As Integer)

' Minimize the database window and initialize the form.

' Move to the switchboard page that is marked as the default.

Me.Filter = "[itemNumber] = 0 AND [Argument] = 'Default' "

Me.FilterOn = True

End Sub

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

ثانيا: إذا قمت بفتح قاعدة البيانات في نهاية المشوار مع الأكواد والنماذج ولوحة التبديل فإن قاعدة البيانات لا تظهر لي بل يظهر لي شاشة رمادية فارغة تماما ما عدا من أوامر منسدلة قليلة جدا مثل ( ملف _ إطار ـ تعليمات ) في أعلى الشاشة. لكن عندما أقوم بعمل اختصار على سطح المكتب لنموذج لوحة التبديل فإن البرنامج يعمل ( زي الحلاوة ). هل أنا على الطريق الصحيح أم أن هناك مشكلة؟ لك تحياتي .

#28

السلام عليكم

اترك الكود الموجود فهو خاص بلوحة التبديل وتراني ما عرفت وشو له :D اضغط انتر يعني خل الكود ينزل شوي سطر واحد والصق الكود المكتوب بالمشاركة السابقة . ويصير زي كذا

Private Sub Form_Open(Cancel As Integer)

fSetAccessWindow (SW_HIDE)

' Minimize the database window and initialize the form.



    ' Move to the switchboard page that is marked as the default.

    Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'Default' "

    Me.FilterOn = True

    

End Sub

ثانيا : اضغط مفتاح الشفت باستمرار مع مفتاح انتر لفتح القاعدة ثم

اختر من قائمة اداوت (بدء التشغيل) سيظهر لك مربع حوار بدء التشغيل

ستجد بند اسمه (عرض النموذج/ الصفحة ) ستجد فيه اسماء النماذج

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

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

#29

الاخوة الكرام

السلام عليكم

الاخ alhajri شكراً لك

الكود الخاص بعمل النسخة الاحتياطية هل يمكن تعديله بحث ينسخ فوق النسخة الأقدم

حيث هو الان يقوم بعمل نسخ متكرره في نفس المكان

ولكم جزيل الشكر

#30

اهلا وسهلا بك ابو هاشم

اسعدني مرروك ولو اقدر على طلبك كان من عيوني

بس كود النسخ لست انا من عمله . على ما اعتقد

انه اخي ابو هاجر . اذا قرأ هذه المشاركه سيفيدك ويفيدني

ايضا .

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

2 / 3 /4 وهكذا تعرف اخر نسخه

#31

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

لكن الذي قمت به هو انني فرمت الجهاز وانزلت الويندوز 89 والاوفيس 2000 ووجدت ان نفس المشكله قائمه ولكن سؤالي يمكن .

1ـ مالذي جعل ذلك المرجع يفقد ؟

وكيف استعيده هو وليس اصدار اقدم منه .

2ـ اخي عندما استعيد اصدار اقدم منه فاين اجده فانت قلت في نفس القائمه ولكنني لم اتعرف عليه وكيف اعرف انه اصدار مشابه له .

وايضاً بالنسبه للوحة التبديل الرئيسيه فهل استطيع اختيار خلفيه بل لون للواجهه الرئيسيه . فقد بحثت ولكنني لم اجد ارتباط لصوره .

ودمتم سالمين

sob7ank.jpg

فرض على الناس أن يتوبوا**** لكن ترك الذنوب أوجب

والصبر في النائبات صعب**** لكن فوات الثواب أصعب

والدهر في صرفه عجيب**** لكن غفلة الناس أعجب

وكل ما قد يجي قريب****والموت للعبد من ذاك أقرب

#32

تسلم عيونك

وشكراً لك

#33

لقد وصلت فعلا لما كنت تقول عنه وجدت اصدار اقدم وفعلاً طبقت المطلوب ولكن انا طبقت كلامك على جهازي انا ولم اطبقه على جهاز العمل وسوف اقوم بذلك إن شاء الله عند ذهابي للعمل بكره لكن سؤالي هل جميع المراجع التي قد تفقد اجد لها مرجع اخر اقدم منه وارجو التوضيح مالذي يجعل هذه المراجع تفقد

2ـ وهل بالاماكن ان استطيع احمي هذا البرنامج بكلمة مرور وعدم العبث به حتى احميه من اي انهيار او تعديل به يعني كحفظ حقوق او ما شابه .

3ـ هل بالامكان تصدير البييانات التي حفظت ببيانات وليس كقاعدة بيانات كامه حتى استطيع فيما بعد نقلها الى جهاز اخر به قاعدة البيانات فارغه من البيانات .

sob7ank.jpg

فرض على الناس أن يتوبوا**** لكن ترك الذنوب أوجب

والصبر في النائبات صعب**** لكن فوات الثواب أصعب

والدهر في صرفه عجيب**** لكن غفلة الناس أعجب

وكل ما قد يجي قريب****والموت للعبد من ذاك أقرب

#34

السلام عليكم

اخي العلي

1-(سؤالي هل جميع المراجع التي قد تفقد اجد لها مرجع اخر اقدم منه وارجو التوضيح مالذي يجعل هذه المراجع تفقد ) نعم ستجد مرجع بنفس الاسم

اذا كان الاصدار اقدم مثلا تحصل المفقود اصدار 2.2 وتحصل واحد بنفس اسمه

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

ربما يرجع الى عدم تحميل ادوات اوفيس كامله عند الاعداد للاوفيس .

هذا اللي قدرت اشرحه :D

2- نعم تستكيع بتحويل القاعدة الى ملف بصيغة MDE هذه افضل حماية

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

3- نعم يمكن ذلك ايضا بفصل الجدوال بقاعدة اخرى تحتوي على الجداول

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

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

#35

يعطيك العافيه على جوابك الرائع والمفيد وسرعة ردك .

sob7ank.jpg

فرض على الناس أن يتوبوا**** لكن ترك الذنوب أوجب

والصبر في النائبات صعب**** لكن فوات الثواب أصعب

والدهر في صرفه عجيب**** لكن غفلة الناس أعجب

وكل ما قد يجي قريب****والموت للعبد من ذاك أقرب

#36

اخي الهاجري

عندي سؤال اخر وهو كيف انفذ فكره تصميم برنامج مثل

الاستئذان من العمل لوقت معين والخروج من البوابه بتصريح او ورقة خروج

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

ومثال على ذلك

برنامج حصر بيانات الاستئذان

الاسم :

الرقم :

الرتبه أو المرتبه :

القسم

اليوم :

التاريخ: ويحدد كالتالي :

من تاريخ:

الى تاريخ:

الهدف من الخروج

ويندرج تحته مثلاً مهمه ـ مكلف ـ استراحه ـ اجازه ـ مراجعه دائره ـ ....الخ

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

sob7ank.jpg

فرض على الناس أن يتوبوا**** لكن ترك الذنوب أوجب

والصبر في النائبات صعب**** لكن فوات الثواب أصعب

والدهر في صرفه عجيب**** لكن غفلة الناس أعجب

وكل ما قد يجي قريب****والموت للعبد من ذاك أقرب

هذا الموضوع مغلق.

مواضيع مشابهة