محمد طاهر

ما فهمته أن الجهاز الآخر غير مرتبط بشبكة مع الجهاز الحالي و بناء علي ذلك أنشيء قاعدة بيانات فارغة أكسس عادية فارغة ثم من ENterprise MAnager اختار القاعدة المطلوبة right click all tasks Export Next Next Choose Msaccess choose File Name & Location copy Tables an…

بالنسبة لطريقة كتابة الاكواد ضع قبل الكود كلمة code داخل [] ثم ضع الكود عن طريق القص و اللصق و بعد الكود ضع code/ داخل [] أما بالنسبة للمشكلة فيستحسن نشر الفورم ربما يكون الحل أن تستخدم دالة Format أو أن تضيف # قبل التاريخ عند استدعاء قيمة ال combo tr_Sql = "s…

رجاء طرح اسئلة الاكسيل فى قسم الاوفيس ( سيتم نقل الموضوع الي هناك) بفرض ان الرقم يقع فى الخلية السابقة علي الخلية التي تقف فيها Sub addnumber() ActiveCell.Offset(0, -1) = ActiveCell.Offset(-1, -1) + 1 End Sub و ان كان هناك مشكلة فى تشغيل الماكرو راجع الدروس فى…

السلام عليكم أهلا بك رجاء مراجعة قواعد طرح الاسئلة المثتة أعلا المنتدي بخصوص السؤال الاول =Format(Date();"dddd dd/mm/yy") أما الثاني ، فاستخدم خاصية البحث فى المواضيع السابقة حيث أنه سبق مناقشته أكثر من مرة ابحث عن كلمة ( نسخ أو نسخ احتياطي ) أو Backup

اولا DoCmd.TransferSpreadsheet acImport, 8, "", "", False, "" ثانيا فى وضع تصميم الاستعلام اختار اضغط علي ايقونة التجميع و التي هي بشكل Sigma و اختار التجميع بالكوج الذي تريد ثالثا مثال مقارب http://mypage.ayna.com/mtarafa/Renumber.zip

لا أعرف سببا لذلك سوي أمرين 1- أن الورق موضوع مائل فى الطابعة 2- وجود عيب فى الطابعة ، أو أن الطابعة فى حاجة الي alignment لوحدة الحبر و هذا فى حالة ال ink-jet printer . للتأكد جرب الطباعة علي طابعة اخري

ان لم تستطع فاضغط الملف ، و ارسله الي علي mtarafa@link.net

لماذا لا تحاول عمل ال compile علي 97 أولا ؟ الا يوجد جهاز عليه 97؟

يوجد فى شريط الادوات أيقونة لل wizards أو المعالجات و هي علي شكل عصي سحرية اضغط عليها قبل وضع الزر و ان لم تكن فى شريط الادوات ، فاضغط بالزر الايمن للماوس علي الفورم فى وضع التصميم ، و اختار صندوق ادوات التحكم control Toolbox ثم اضغط علي زر ال control Wizaards…

حسب ما فهمت من السؤال : بالنسبة للجدول 2 لا داعي لاسم العنصر فيه و يكتفي بالكود و يكون الفورم مبني علي استعلام مكون من الجدولين يحوي جميع أكواد الجدول 2 بالاضافة الي اسم العنصر فقط من جدول رقم واحد و ذلك مع ربط الجدولين فى الاستعلام عن طريق كود العنصر

ثبت خط أو اثنان فى البرنامج كله ثم انقل ملفات هذان الخطان الي أجهزة العمل

أعد تحميل الأكسس

السلام عليكم المثال الذي أعده الأخ بنجا مشكورا يفي بالغرض و زيادة و للتغلب علي المسافة الفارغة صحح الكود الي Me.saderno = Trim(Me.sadermsgno) & "/" & Trim(Str(Year(Me.saddate))) أي اضافة Trim أخري الي الشق الثاني مع ملاحظة ان الكود يعمل بعد تحديث حقل التاريخ

السلام عليكم افتح قاعدة جديدة فى اوفيس 2000 ثم استورد اليها محتويات القديمة

اضغط هنا بالزر الأيمن و اختار حفظ باسم

http://www.arabteam2000.com/vb/showthread....%ED%CC%D3%CA%2A

بالنسبة للصفحة الرئيسية فالتسجيل فيها منفصل عن المنتدي و يمكن قبول مشاركات من الزوار دون تسجيل و تظهر المشاركة باسم ضيف كريم بالنسبة للكود Me.saderno = trim(Me.sadermsgno) & "/" & str(Year(Me.saddate))

http://www.arabteam2000.com/vb/showthread....%DA%C7%E3%E6%CF

السلام عليكم بالنسبة للجزء الاول هل يتم ادخال الرقم فى inputbox ام فى الفورم مباشرة ، فان كان فى الفورم فالمطلوب هو تعليم الحقل فى السجل الحالي ان لم يكن معلما if me.fieldname = 0 then me.fieldname = -1 اما بخصوص الفلتر ، فقصدت به اختيار سجلات معينة فى التقرير…

الحقل الاول هو الذي سيخزن به 1/1422 و الثاني به مسلسل الرسالة الاصلي أي "1" و الذي منه سنكون 1/1422 المطلوبة كما سبق