ابوخليل

اهلا بأخي واستاذي العزيز منتصر بالنسبة لالحاق اكثر من سجل في صفحة الوورد فلم اتطرق له من قبل . وقد قمت بالتعديل على المثال حسب ما هداني اليه تفكيري ولست بغنى عن نظرتك وتقييمك . دمت بخير ،،، as.rar

ان كان الوندز لديك عربي فاتبع الخطوات كما في الصورة

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

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

السلام عليكم ممكن الجمع بين رأي الإخوة وبين رغبتك . عملت لك استعلامين الحاقي وحذف فبمجرد فتح النموذج يحذف الاصناف المنتهية طبعا استنادا الى تاريخ النهاية وقبل الحذف يكون نقلها لجدول جديد sejeX . اذا انت تريدها حذف بلا رجعة يمكن الاستغناء عن الاستعلام الالحاقي وكذلك الجدول وحينئذ لا تنسى ازالة السطر الخاص بالاستعلام الالحاقي والموجود في الكود . دمت بخير db1.rar

الحل : ICDL_TrainingCenter_ver2.rar

السلام عليكم اخي عبد الواحد صباح الخير بالنسبة للسطر الفارغ اكتب في الاستعلام في حقل المحافظة في الاسفل في المعايير is not null أما بالنسبة للبحث فلمشكلة عندك املائية لاحظ الفرق بين العبارتين علما أن الأخيرة هي الخاصة بـ 6 اكتوبر : العبارة الأولى : سكرتير عام العبارة الثانية : سكرتيرعام المشكلة هي المسافة بين الكلمتين واحدة فيها مسافة والثانيه لا تحتوي على مسافة . يعني لازم يكون هذا درس لوجوب جعل الكلمات التي تتكرر في المشروع ثابتة لا يمكن التصرف فيها من قبل المستخدم. تقبل تحياتي ودمت بخير

يوجد اكثر من طريقة لتحجيم النماذج وكذلك التحكم بدقة شاشة المستخدم ولكن كما ذكرت لك سابقا لو افترضنا اني اريد ان يفتح الفورم على اقصى اتساع وكنت اعمل مثلا على على دقة 1024 - 768 وباعتبار انه يحتوي على الكثير من الكائنات فعند فتحه على دقة 800 - 600 سيتمدد الفورم ولن ترى الا جزأً منه . هذا الكود بعد تجربته اعتقد انه يبقي الفورم على مقاس واحد أنت تحدده مهما اختلفت دقة الشاشة في الاجهزة المستخدمة . وإن اردت التحجيم الآلي للنموذج فهذا مثال لأخينا احمد سليم آمل أن تجد فيه بغيتك . asiliem.rar

السلام عليكم طبعا نحن نعمل برامجنا وخاصة تنسيق الفورم واجهزتنا مقاسات الشاشات فيها على دقة معينة وحين يتم نقل البرنامج الى حاسبة اخرى لا بد ان يكزن دقة الشاشة فيها بنفس الدقة التي في حاسباتنا والا سيختل العرض في النماذج وأظن هذا الامر معلوم عند عموم الاخوة . اخي حاتم : استللت لك الكود الخاص بتحجيم النموذج ووضعته لك في مثال بسيط كل ما عليك هو نقل الكود الى برنامجك وعمل خطوتين : ( لتبقى نماذجك على مقاس واحد دائما ) 1- في حدث عند التحميل للنموذج الصق هذا الكود ReSizeForm Me 2- غير مقاسات الشاشة في الوحدة النمطية في هذين السطرين Private Const DESIGN_HORZRES As Long = 1024 Private Const DESIGN_VERTRES As Long = 768 db1.rar

آمين .. أسأل الله لك مثل ذلك .

السلام عليكم اخي عبد الواحد لم اكتب شيئا يدل على الضجر وإنما الانسان يكون مستعجل أو مشغول وعملك يأخذ وقتا فأعطيتك الحلول السريعة كي تحاول معها . نعود فنقول التأسيس الصحيح يجنبك المشاكل المستقبلية دعنا نأخذها واحدة واحدة . أولا : ترتيب القيادات لعلك تذكر حين واجهتك مشكلة في تصفية القيادات وحاولت معك في حلها ولم افلح ثم وجدت الحل أنت ، اذكر حينها أني اقترحت عليك فصل اسم المحافظة والمركز والمدينة في عمود مستقل ولو رجعت اليها الآن لوجدتها. الآن حين قمت بعمل جدول لمسميات القيادات وجعلت الجدول ارئيسي يستقي منه اصطدمت بزيادة البيانات ، والصورة المرفقة تبين لك الواقع . 2 تاريخ الأقدمية: لا اعلم ان كان بالامكان عمل كود يقوم بالفرز من عمودين ان لم يجد في الاول ذهب الى الآخر . وبإمكانك طرح سؤال منفرد بمثال بسيط يحتوي على جدول واحد به عموين وتواريخ . ولكن ان اردت عمل عمود خاص بذلك فهو كالتالي : نفرض ان حقل التاريخ الافتراضي هو f وحق بداية التعيين هو b والحقل الجديد الذي سيجرى عليه الفرز هو N فالمسألة كالتالي : عند حدث فتح النموذج نكتب me.N = me.f if isnull ([f]) then me.N = me.b end if

وعليكم السلام ورحمة الله وبركاته اخي سوف اعطيك ما عندي من اجابةحسب رؤيتي وان بقي شيء أو هناك حلول أخرى فالزملاء هنا لن يتوانو عن المساعدة حقيقة انت جالس تجمع وجبتها مرة واحدة . 1- بالنسبةلترتيب الاقدمية حسب التاريخ فهذه المسألة ليس عندي حل لهاإلا بإنشاء عمود جديد في الجدول ويوضع الشرط عند فتح النموذج ( أ=ب وإذا كان ب خالي فـ أ=ج ) 2- تاريخ الاحالة على المعاش الكود شغال عندي % 3 القيادات يلزم لكل قيادة رقم يعني انت لمتضع جدول للقيادات 4 الترقيم لعلك تريده في التقارير كل ما عليك هو انشاء مربع نص غير منضم واكتب داخله =1

السلام عليكم اجعل هذه في التنسيق yyyy/mm/dd وانظر الصورة

انظر الصورة

اهلا اخوي رياض كل يوم ازداد علما ازداد علما بجهلي انا لي مدة استعمل هذا السطر لاخراج مربع الحوار Public Function SHowPrintDialog() DoCmd.RunCommand acCmdPrint End Function وبعدين تعال ... لا تقيسني على نفسك... الله يحفظك ، انا شيبة .. والحاسب كله تعلمته عن كبر ... يعني المعلومة آخذها اليوم ومن بكرا يخلف الله . ولكن الروح شبابية ، يعني الواحد يشغل نفسه بشي ينفع أحسن .

وفيك فاليبارك الله أخي حاتم اهنئك على حب الاطلاع والمتابعة وأشكرك على المشاركة والتشجيع فأنت المشرف حقا .

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

السلام عليكم مشكور اخي رياض وزيادة الخير خير من غير استعلام هذا كود للبحث في التاريخ كنص يبحث بالرقم الواحد فإذا اراد الشهر والسنة فقط يكتب رقم الشهر والشرطة المائلة والسنة Private Sub find_date_Change() Dim ctc As String * 1 Dim sts As String * 1 ctc = """" sts = "*" Me.find_date.Tag = Me.find_date.Text Me.RecordSource = "SELECT * FROM tbl1 WHERE tbl1.date1 LIKE " & ctc & sts & (Nz(Me.find_date.Tag)) & sts & ctc & "" If Me.RecordsetClone.RecordCount = 0 Then Me.Detail.Visible = False Me.RecordSource = "" Else Me.Detail.Visible = True End If Me.find_date = Me.find_date.Tag Me.find_date.SetFocus SendKeys "{f2}" End Sub

السلام عليكم اظن يا أخي جدول المواد لا يمكن انشاؤه بهذه الطريقة ، جرب واجعل كل مادة في حقل افتح الجدول على التصميم واكتب اسماء المواد في الحقول باللغة الانجليزية واكتب لها تسمية توضيحية وبالنسبة للمراحل وما يخصها من مواد فيتم التحكم به عن طريق النماذج الآن اربط جدول المراحل بكلا الجدولين ، وجدول الاسماء بجدول المواد هذا رأي ومن يرى خلاف ذلك أو لديه زيادة أن لا يبخل على أخينا بالفائدة .

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

الله يسعدك يا عبد الواحد شوف .. حقيقة .. لا أعلم بماذا أجيبك .. انت قلت : (( عندى 29 محافظة مرتبه ترتيبا معينا ( القاهره - حلوان - الجيزه-6 اكتوبر القليوبية 0000الخ ) ماهو الضابط في هذا الترتيب ؟؟ هناك حل حسب تصوري وهو أن تعطي هذه المحافظات ارقام من 1 الى 29 ثم يكون الفرز حسب هذه الرقام .

السلام عليكم طبعا لازم تتعجب ليه الغالب يحضون بالرد وانا لا ؟؟ غالب الاخوان هنا يعملون على الاصدار 2003 وكم كذا مرة اضع الاصدارين على جهازي لمساعدة من يتعاملون مع الاصدار 2007 ولكن لا يستمر الوضع طويلا حيث تنشأ المشكلات مما اضطر احيانا لازالة الاصدارين جميعا ثم العودة لتركيب احدهما وهو في الغالب 2003 آمل ان يكون اتضح لك الأمر تقبل تحياتي ،،،

وهذا نفس المثال طورته قليلا يتم استبعاد رقم واحد عند كل وقوف وسأحاول تطويره كي يقف من نفسه آليا . اخبرني ان كانت الفكرة مقبولة . برنامج القرعة2.rar

دمّر أكثر من 180 موقعاً دنماركياً وكان حديث الصحافة العالمية وفاة أشهر "هكر" سعودي في حادث مروري الأربعاء 03 فبراير 2010 1:41 ص ​سلطان المالكي- سبق- متابعة: توفي قبل أيام أشهر "هكر" سعودي، إثر حادث مروري بمحافظة حفر الباطن، ويُعرف الهكر الأشهر باسم "علوش الحربي"، واسمه الحقيقي سلطان سليمان الحربي وهو من أبناء حفر الباطن، ولقي حتفه وهو في طريقه لعمله الذي التحق به مؤخراً بقاعدة الملك خالد العسكرية بحفر الباطن. السؤال لجميع الاخوة هل هو زميلنا المبدع ، حقيقة ليس له أثر من مدة ... ولكن اللقب أثارني الرجاء ممن يعلم شيئا عن ذلك افادتنا مشكورا .

السلام عليكم ضع المجلد المرفق على سطح المكتب لترى كل شخص امامه صورته ، أو اجلبهامن جديد ان وضعت المجلد في مكان آخر وتنبيه انتهاء الخدمة سيستقبلك عند بدء فتحك للبرنامج ، والنموذج ستارت أب يوجد فيه مشكلة لا ادري من أين ومن اجل الوقت استبدلته بآخر ، واعذرني في سؤالك الأخير حيث لا أعرف نظام الترتيب الاقليمي المطلوب . my email address: mzm1430@gmail.com gyad.rar