baran قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 (معدل) الأخوة الأعزاء في هذا المنتدى أود أن أسأل سؤالين: الأول هو كيفية صنع قوائم مثل قائمة ملف -تحرير-تنسيق طبعاً سأضع فيها أوامر خاصة ببرنامجي الذي سأنشئه علماً أني سأمنع الجميع من اظهار أي شيء من القائمة (بدء التشغيل) فهل أستطيع ذلك الثاني : كيفية انشاء صندوق حوار خاص للبحث عن مستند ما غير الذي يظهر بشكل افتراضي في برنامج الاكسس تم تعديل يوليو 11, 2005 بواسطه baran
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم أخي باران ، بارك الله فيك نبدأ من السؤال الثاني وهو السهل ، لا أنصحك بذلك لأن الأمر لن يكون سهلا :d . بالنسبة للسؤال الأول ، بالضغط على زر الماوس اليمين في مكان فارغ فوق أشرطة الأدوات وثم طلب خيار تخصيص ويظهر صندوق حواري تستطيع من خلاله بناء شريط أدوات مخصص جديد ومن ثم تستطيع الاضافة له ما تشاء من الأوامر وعناصر القاعدة. سأبحث لك في المنتدى عن مواضيع ذات علاقة بإذن الله يكون فيها شرح مع صور أو على الاقل شرح أكثر. مع الاحترام والتقدير
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم أخي باران ، بارك الله فيك أرجو منك مراجعة الموضوع التالي للأخ أبو حمود جزاه الله خيرا هنا مع الاحترام والتقدير
baran قام بنشر يوليو 11, 2005 الكاتب قام بنشر يوليو 11, 2005 جزاك الله خيراً لدي مثل شائع بالعامية (لو كنت الأم لما استيقظتَ لبكاء طفلك ليلاً مثلما تنبهت لصوت هذا الصديق ) وهذا ما حصل معي ففارق السؤال والاجابة أقل من دقيقة ....فكل الشكر لك وأزيد سؤالاً بينما أنا أجرب هذا البرنامج لدي فالرقم التلقائي يزداد يوماً بعد يوم إلى أن وصل لدي إلى رقم كبير علماً أني أحذف السجل ولكن الرقم يزداد فكيف لي بتصفيره في نهاية تجاربي التي أصبحت كاختراع كمبيوتر
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم أخي بارن ، بارك الله فيك اشكرك على المجاملة وإليك هذا الاقتباس من مشاركة لأختي زهرة في احد المنتديات الواعدة. اعزائي الكرام السلام عليكم ورحمة الله وبركاته لا مشكلة بعد اليوم مع الترقيم التلقائي فقد تم حل تساقط او حذف الارقام برمجيا من خلال التالي 1. قم بأنشاء جدول يتصمن الحقول المطلوبة ومن ضمنها حقل العدد او الرقم او الرقم المعرف او ID او اي اسم تختاره لهذا الحقل وفي مثالنا هو ID الذي سيصبح ترقيم تلقائي برمجيا ولابد ان يكون خاصية هذا الحقل رقم ويكون مفتاح اساسي 2. بعد الانتهاء من الجدول قم بحفظه بأي اسم تختاره وفي مثالنا هو EMP 3. الان قم بإنشاء نموذج مبني على الجدول وقم بحفظه بأي اسم تختاره وفي مثالنا هو EMP 4. الان قم بعرض النموذج في وضع التصميم واختر خصائص النموذج وانتقل لحدث في الحالي واختر اجراء حدث ثم اضغط على المربع الصغير ذو الثلاث نقاط لتنتقل لمحرر الفيجول بيسك وضع هذا الكود <!--QuoteEBegin-->Private Sub Form_Current()<!--QuoteEBegin--> If Me.NewRecord Then<!--QuoteEBegin--> On Error Resume Next<!--QuoteEBegin--> Me!ID.DefaultValue = Nz(DMax("[ID]", "EMP"), 0) + 1<!--QuoteEBegin--> End If<!--QuoteEBegin-->End Sub<!--QuoteEBegin--> انتبه لبداية الكود ونهايته حتى لا يتكرر ويحث لديك خطأ 5. الان جرب النموذج بإدخال عدد من السجلات وقم بحفظها ثم قم بحذف ما تختار من السجلات تجد ان الترقيم التلقائي عاد كما هو ولم يعد هناك مشكلة وهذا مثال للتطبيق اختكم زهره Example.zip أنصحك بهذا الحل بدون أي تردد ، أما إذا كنت مصرا على استخدام الترقيم التلقائي من الأكسيس فيوجد حلول أخرى ، استطيع تزويدك بها ، ولكن أرجو منك أولا أن تدرس الأمر جيدا. مع الاحترام والتقدير AutoNumber.rar
الدكتور خضر الرجبي قام بنشر يوليو 11, 2005 قام بنشر يوليو 11, 2005 السلام عليكم أخي بارن ، بارك الله فيك على كل الأحول لا ضرر من دراسة المثال التي الذي زودنا به أخي سهل بسم الله الرحمن الرحيم هذا مثال لأعادة الترقيم الطريقة الأولى عند النقر على زر ترتيب يقوم بأعادة الترقيم بدأ من رقم واحد الطريقة الثانية قم بكتابة رقم في الحقل الموجود تختاره أنت ثم أنقر زر ترتيب رقم الهوية ليبدأ ترتيب الأرقام من الرقم الذي قمت بوضعه أتمنى أن يحوز على رضاكم وتقبلوا تحياتي أخيكم سهل أحمد ( ابو نعيم ) db1.rar
baran قام بنشر يوليو 15, 2005 الكاتب قام بنشر يوليو 15, 2005 ربما هذه الطريقة غير واضحة يا أعزائي وأتذكر أني قرأت في كتاب طريقة أسهل وهي تصفر فقط بعد الانتهاء من التجارب ولكن من كثرة الكتب التي قرأتها في مجال الكومبيوتر لا أعلم أي الكتب هي ولا أعلم أنها من كتبي أم لا فلا تؤاخذوني في هذا الأمر وجزاكم الله خيراً وأعطاكم بما هو أهل له من رحمة ورأفة
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.