اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

التقني

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

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

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

  • Days Won

    1

كل منشورات العضو التقني

  1. اطلع على هذه الروابط : الترقيم التلقائي, حل لمشكلة الترقيم التلقائي السنوي ترقيم تلقائي - إعادة الترقيم بداية كل سنة ترقيم تلقائي - إعادة الترقيم سنويًا لكل قضية ترقيم تلقائي - إعادة الترقيم بداية كل سنة الترقيم التلقائي عمل ترقيم تلقائي مخصص autonumber ترقيم تلقائي أجعل الترقيم التلقائي يبدأ من 1000 إعادة الترقيم التلقئى من البداية بديء الترقيم التقائي مع كل سنة جديدة اعادة الترقيم التلقائي (Auto Number) بعد الحذف وبالتوفيق
  2. وعليكم السلام ورحمة الله وبركاته أتذكر طريقة الطباعة على وجهي الورقة شرحها أحد الأخوة وهي : بعد طباعة الورقة الأولى يتم عمل ايقاف لحظي (Pause) يتم من خلال كود معين ثم تظهر رسالة تطلب منك قلب الورقة والضغط على زر OK ليتم اكمال الطباعة وبذلك تضمن الطباعة على الوجهين والله أعلم
  3. السلام عليكم ورحمة الله اطلع أخي على المثال في المرفقات ففيه طريقة لإعادة الترقيم بأي رقم بداية تختاره إذ أنه مصمم لتكوين أرقام جلوس الطلبة مصمم هذا البرنامج لم أستدل عليه وبالطبع الشكر والدعاء موصول اليه ReNum.rar
  4. وعليكم السلام ورحمة الله اطلع أخي على رابط عرب هاردوير : http://www.arabhardware.net/forum/forumdisplay.php?f=18 فيه ما يهمك تجاه عمل الشبكات بأنواعها .
  5. وعليكم السلام ورحمة الله وبركاته وأنت تقرأ ها الرد توجه الى (عرض) ثم (حجم النص) ثم اختر (الاكبر) ستجد أن الشاشة تغيرت لتكون الأحرف أكبر قليلا .
  6. السلام عليكم ورحمة الله حياك الله أخي أحمد العيسى بداية أعتذر من الأخوة الذين حملوا المرفقين 1 و 2 دون أن يجدوا بقية المرفقات السبع وذلك لظروف خاصة لم أستطع اكمال البقية ... لذى لزم التنويه والاعتذار . ثانيا ً لتعلم أخي أحمد أن تاريخ هذا الموضوع هو 26/5/2006 وسبب رفعي للموضوع هو طبيعة عملي كمشرف في مراجعة الموضوعات (المفيده) وبالتالي تحويلها الى الأرشيف الخاص بها ، ولكون الرابط الذي فيه هذا البرنامج قد يُلغى دون أسباب أحببت أن أرفقه ليكون ضمن مرفقات موقع أوفيسنا ولكبر حجمه قمت بتجزئته خدمة للأعضاء . أما أمور الدعاية والاعلان للشركات فهذا لا يهمنا بقدر المحتوى الذي أتت به هذه الشركة من دروس مفيده يحتاج اليها الأعضاء العرب على وجه الخصوص . طريقة اخراج هذا البرنامج لم يكن موفقاُ من قبل هذه الشركة فالخلفية مزعجة أثناء متابعة الدرس .. يمكنك أخي نسخ المحتوى ولصقه على الوورد لتتخلص من هذه الخلفية أو العلامة المائية . بما أن الموضوع ارتفع ليكون من المواضيع الجديده سيتم الابقاء عليه ومن ثم تحويله الى الأرشيف بعد فترة معينة . وللجميع التوفيق
  7. تم رفع البرنامج على هيئة أجزء مضغوطة ومقسمة الى 7 أجزء LearnAccess.part1.rar LearnAccess.part2.rar LearnAccess.part3.rar LearnAccess.part4.rar LearnAccess.part5.rar LearnAccess.part6.rar LearnAccess.part7.rar
  8. أو يمكنك استخدام هذا الكود في حدث الحالي للنموذج : txtBoxNAme.Value = DCount("[FieldName]", "TableName") بإفتراض أن مربع القائمة مستند (ومرتبط) مع حقل ما في الجدول TableName وليكن اسمه FieldName وبذلك يمكن عمل الاحصاء على الجدول مباشرة . و txtBoxNAme مربع النص الذي تريد اظهار نتيجة الاحصاء فيه .
  9. السلام عليكم ورحمة الله وبركاته يمكنك أخي العزيز استخدام الكود التالي بعد أمر فتح التقرير لكي يتم طباعة الصفحة الأولى فقط : DoCmd.PrintOut , 1, 1 علماً بأن الاجراء نتيجته كالتالي : 1- فتح التقرير للمعاينة 2- طباعة الصفحة رقم 1 من نفس التقرير . يمكنك مراجعة هذا الأمر (PrintOut) بالكامل من خلال رابط الأخ محمد طاهر جزاه الله كل خير : طباعة أكثر من نسخة من التقرير, و امكانية تحديد الصفحات المطبوعة وبالتوفيق
  10. وعليكم السلام ورحمة الله وبركاته لإحصاء السجلات استخدم الدالة : DCount
  11. السلام عليكم ورحمة الله وكل عام وأنت بصحة وسلامة أخي طارق اطلع على هذه الروابط لعل فيها ما يفيدك : برنامج على شاشة 17 تم نقله الى شاشة 15 مشكلة في تكبير النموذج تكبير - تصغير النموذج بكافة عناصره التحكم في ارتفاع وعرض النموذج بالكود ويمكنك الاطلاع على موضوع المبدعه زهرة بخصوص معرفة أبعاد الشاشة الحقيقية : وحدات قياس الشاشة ونقاط شاشة العرض - Twips and Pixels وبالتوفيق
  12. السلام عليكم أخي العزيز .. هذا البرنامج تم تحويله الى صيغة MDE بمعنى أن صاحبه قام بوضع حماية عليه والدليل أن البرنامج لا يمكن فتحه الا بإسم مستخدم (مفوض بذلك ) مع كلمة مرور .
  13. وعليكم السلام ورحمة الله وبركاته مبدئيا يمكنك عمل ذلك من خلال برنامج الوورد انظر الموضوع التالي : http://www.officena.net/ib/index.php?showtopic=9758
  14. السلام عليكم ورحمة الله على حد علمي أن الـComboBox تصلح لمثل هذه الأمور لسبب أنه يوجد لديها نوع مصدر صف وكذلك خانة مصدر الصف لوضع سطر الشرط المطلوب تصفيته . أما كيفية عمل ذلك على الـTextBox فلا علم لدي
  15. السلام عليكم ورحمة الله أرجو الاطلاع على رد الأخ رضوان في الرابط التالي : http://www.officena.net/ib/index.php?showtopic=5437
  16. تاريخ اليوم (الحالي) هو تاريخ التعديل والاضافة ... كيف ؟ عند ادخال السجل لأول مرة سيتم رصد التاريخ في حقل Hent والذي هو تاريخ اليوم أو (الحالي) وفي كل يوم تقوم بإدخال سجلات جديدة سيتم ادخال التاريخ الحالي للعملية . وعند محاولة تعديل أي سجل قديم سيتم ادخال تاريخ اليوم (الحالي) وهذا ما نعتبره تاريخ التعديل . وهذه فكرتي .
  17. وعليكم السلام ورحمة الله وبركاته اليك أخي العزيز نتيجة البحث في المنتدى : البحث التلقائي بمجرد الكتابه في مربع البحث بمجرد ادخال رقم الصنف تظهر بياناته .. كيف ؟؟ بمجرد أن أكتب أسم صاحب العلاقة تظهر باقي بياناته إظهار الاسم بإدخال الرقم المعرف البحث بمجرد الكتابة مباشرةً (داخل نموذج فرعي) البحث بمجرد الكتابة مباشرةً (داخل قائمة) وبالتوفيق
  18. السلام عليكم ورحمة الله يمكنك ذلك من خلال وضع الكود التالي : Hent.Value = Now() يمكنك وضع الكود في حدث قبل التحديث للنموذج أو أي حقل آخر عدا حقل Hent علماً بأن Hent هو الحقل الذي سيدرج فيه تاريخ وساعة التعديل . وبالتوفيق
  19. وعليكم السلام ورحمة الله وبركاته استخدم هذا الكود في حدث الحالي للنموذج : Private Sub Form_Current() Dim RstClone As Recordset Set RstClone = Me.RecordsetClone If RstClone.RecordCount >= 5 Then DoCmd.MoveSize , , , 3000 If RstClone.RecordCount >= 10 Then DoCmd.MoveSize , , , 6000 End If End If End Sub علماً بأن الكود أعلاه قابل للتعديل حسب رغبتك وكذلك وضعت افتراضين للسجلات هما 5 و 10 سجلات وضع هذا الكود عند حدث الفتح للنموذج نفسه Private Sub Form_Open(Cancel As Integer) DoCmd.MoveSize , , , 2000 End Sub وبالتوفيق
  20. السلام عليكم ورحمة الله 1- لنفترض أنك أنشأت جدول به الحقول التالية : رقم الموظف :EmpNo الراتب : Selary الخصم : Khasm الزيادة : Zeyada الصافي : Safy 2- وبعد ذلك عملت استعلام يستند الى الجدول أعلاه 3- في وضع التصميم للإستعلام قم بإضافة هذا السطر في خانة الحقل (Safy) لتكون بهذا الشكل : Safy: [selary]+[zeyada]-[Khasm] 4- قم بتشغيل الاستعلام وضع قيمة الراتب ستجد الصافي يساوي الراتب وبعد ان تدخل الزيادة أو الخصم سيتغير الصافي بالنقص او بالزيادة . أرجو أن تكون الفكرة واضحة وإن أردت مثال فعلى الرحب والسعة
  21. السلام عليكم ورحمة الله الأخ shatat برجاء الاطلاع على التالي : http://www.officena.net/ib/index.php?showtopic=3816
  22. وعليكم السلام ورحمة الله وبركاته يالله صباح خير مع آذان الفجر وبإنتظار صلاة العيد (بتوقيت الكويت) تأتينا الهدايا من اختنا زهرة أعتقد أنني الوحيد المتواجد في المنتدى ... وهذه الفائدة الوحيدة للسهر ... لذا سأختار أحلى هدية جزاك الله عنا كل خير وعيدك مبارك وهدية مقبولة
  23. السلام عليكم ورحمة الله وجدت هذا الرابط في أحد المواقع وهو عبارة عن موقع يزودك ببريد الكتروني جديد . https://domains.live.com/members/signup.aspx?domain=w.cn أنا حصلت على اسم بريد قليل الأحرف وسهل وهو : lamy@w.cn عند التسجيل والموافقة على الشروط ستجد نفسك داخل بريد هوتميل ولكن بالاسم الذي أخترته ملاحظة : قم بتسجيل خروج لأي بريد مفتوح أثناء التسجيل لأن سيكتشف ذلك ويرفضك ! هذا ما ذكره صاحب الموضوع الأصلي : http://mojahid.net/ib/index.php?showtopic=...mp;#entry110063 وبالتوفيق
  24. السلام عليكم ورحمة الله لطباعة السجل الحالي : 1- انشئ استعلام يستند الى الجدول الذي تريده . 2- انشئ تقرير وليكن اسمه (REPORTNAME) يستند الى الاستعلام الذي صممته في الفقرة 1 3- ضع الكود التالي في زر جديد في النموذج الذي تظهر فيه بياناتك : الكود 1 DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]=" & forms![FormName]![TXTBOXNAME] الكود2 DoCmd.OpenReport "REPORTNAME", acViewPreview, , "[ID]='" & forms![FormName]![TXTBOXNAME] & "'" اذا كان الحقل الذي يصنف السجل رقمي ضع الكود 1 واذا كان نص ضع الكود 2 وهذا مثال في المرفقات حتما سيفيدك والله أعلى وأعلم وبالتوفيق Current_Data.rar
  25. نسأل الله عز وجل أن يتقبل منا ومنك صالح الأعمال وأن يتجاوز عن سيئاتنا وأن يجمعنا في مستقر رحمته وأن يرزقنا جنته أخواني أعضاء هذا المنتدى الطيب أوفيسنا : عسى العيد يعود عليكم وعلى أهاليكم وأحبابكم ومن تحبون بالخير والأمن والبركة وكل عام وأنتم بخير ومشكور أخي megonil على هذه الهدية وهذا الموضوع
×
×
  • اضف...

Important Information