أبو آدم

أخي الحبيب أبو خليل جزيت عني وعن إخوتنا خيراً ، وتقبّل الله منك الدعاء الطيب ... آمين عذراً كنت قد جهّزت الكود أخي الفاروق الامين يلزم إنشاء حقل جديد في النموذج باسم txt2 لتحديد إسم الجدول الجديد وخلف زر الأمر ضع الكود ... Private Sub Command2_Click() On Error GoTo Err_Command2_Click Dim strTableName, strFieldName As String strTableName = Me.txt2 strFieldName = Me.txt1 DoCmd.RunSQL "SELECT Table1.ID, Table1.Name, Table1.hdate INTO " & strTableName & " " & vbCrLf & _ "FROM Table1 " & vbCrLf & _ "WHERE (((Table1.Name) Like '" & strFieldName & "' ));" Exit_Command2_Click: Exit Sub Err_Command2_Click: MsgBox Err.Description Resume Exit_Command2_Click End Sub هكذا أصبحت قيمة البحث متغيراً و إسم الجدول متغيراً آخر جرّب ووافني بالنتيجة....... .................

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

أخي لا داعي للقسم فنحن نعلم أنك تحاول ، ولكننا نريد منك أن تحاول أكثر الأرقام التي تظهر هي الأرقام الرمزية لإسم المحافظة و المدينة وللتعرف على الموضوع ، إطلع على الرابط ........ http://www.officena.net/ib/index.php?showtopic=41463 ................

يتم تسمية الملف إقتراناً بين الرقم الوظيفي للموظف و الرقم التسلسلي للوثيقة ... ...........

الخطوات .............

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

عذراً على التأخير ... لأسباب عملية وصحية و بانتظار مساهمات الإخوة .... ..........

أخي العزيز كريم نريد منك في المشاركات القادمة بإذن الله " محاولات " لنساهم معك بها تفضل ... المرفق أظنه كافياً ................. NA_Territory.zip

أخي العزيز تفضل المرفق كما تريد أن شاء الله ونحن على استعداد للعون و التواصل .................. NA_3Combo.zip

أخي العزيز الأصفار تتعلق بتنسيق الحقل في الجدول ، و النموذج ... إجعلها "00000" ..............

سأنظر في الأمر وإجري إتصالاتي مع دار النشر نسأل الله التيسير ..... ............

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

قواعد وفوائد • لأن القيمة في حقل الترقيم التلقائي هي قيمة فريدة لكل سجل في الجدول، يكون حقل الترقيم التلقائي هو الخيار المناسب للمفتاح الأساسي للجدول. • لا يمكنك تغيير القيمة في حقل الترقيم التلقائي. • إذا قمت بحذف السجلات من نهاية الجدول الذي يحتوي على حقل الترقيم التلقائي بصيغته الإفتراضية (رقم تصاعدي)، سيتم إعادة استخدام القيم التي كانت موجودة في حقل الترقيم التلقائي من السجلات المحذوفة بعد ضغط وإصلاح قاعدة البيانات. على سبيل المثال، لنفترض أن القيم في حقل الترقيم التلقائي من الجدول هي 1 و 2 و 3 و 4. إذا قمت بحذف سجل 4، ثم قمت بضغط و إصلاح قاعدة البيانات، ومن ثم إضافة سجل جديد، فإن قيمة حقل الترقيم التلقائي للسجل الجديد ستكون 4. • إذا قمت بحذف السجلات التي ليست في نهاية الجدول، فلن يعاد استخدام القيم التي كانت موجودة في حقل الترقيم التلقائي من السجلات المحذوفة. على سبيل المثال، إذا كانت القيم في حقل الترقيم التلقائي من الجدول الخاص بك هي 1 و 2 و 3 و 4، و قمت بحذف سجل 2، فلن يتم إعادة استخدام القيم المحذوفة - حتى بعد ضغط و إصلاح قاعدة البيانات. .......................

أخي العزيز تفضل ، الموضوع على الرابط التالي يفي بالغرض ...... http://www.officena.net/ib/index.php?showtopic=37919 ..................

المسألة لا علاقة لها بالوورد . المسألة تتعلق بالأمان وتأمين الملفات في الويندوز SECURITY ، وصلاحيات المستخدم بإستخدام الملفات على الجهاز .... .................

يرجى الالتزام بالموضوع الأصلي المشاركات غير الخاصة بهذا الموضوع تم نقلها لرابط الموضوع الخاص بها ....... http://www.officena.net/ib/index.php?showtopic=41612 ............ شكراً ...............

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

جزاك الله خيراً أخي ورفيق دربي أبا خليل والى الأخ الفاضل "اليتيم" ، ما تفضلت به كلام طيب ، ما تمثلته من القول قد لا يصِّح في السعي لطلب العلم فهو مما يوصل لفتور الهمة ، وكن مع حال النملة متأملا وحال غيرها مما يرفع الهمة ويصون مقومات السعي . ونسأل الله أن ينعم عليك بعلو الهمة ويعينك على الطلب. .................... (تمت الاجابة) ..................

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

تفاعل طيب ... وخدمات مميزة من مميزين (تمت الاجابة)

جزاك الله خيراً أخي العزيز آمين .. آمين .. آمين وأسأل الله أن يمتعك بعظيم ما دعوت لي به ، ويرفع قدرك ومنزلتك في الدنيا و الآخرة (تمت الفائدة)

إخوتي الفضلاء الأخ Lordring وأخي أحمد خلف تصعيداً للنقاش ، وكون هذا الموضوع كثيراً ما يطرق ويسبب بعض الإشكالات في التطبيقات... نقول كنت فكرت بالتنسيب بحل الأخ أحمد ولكنني تمهلت ، ... حيث افترضت أننا إستخدمنا المعادلة الموصى بها ، وتم ذلك ، وبنفس المبدأ ، تم حذف مجموعة متفرقة من السجلات ولنفترض 15 . 22 .25. 38 ، وكنا قد وصلنا للترقيم التلقائي الممنهج 130 ، فعند إضافة سجل جديد سيتم الترقيم الى 131 ، ونعود لنفس المشكلة ...!!! وبعد كل هذا يراودني سؤال أود أن أطرحه : لماذا نفترض ضرورة أن يكون الترقيم التلقائي متسلسلاً ؟ ومن باب أسئلة العارف : ما هي الغاية من الحقل الذي يحمل ترقيماً تلقائياً في قاعدة بياناتك ؟ بإنتظار حواراتكم ومناقشاتكم لنستلهم سبب الإشكال ... وشكراً ............

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

تفضل ...... Private Sub Command8_Click() DoCmd.GoToRecord , , acNewRec If Me.NewRecord Then Me!ID = DMax("id", "MytableName") + 1 End If End Sub ................

أخي العزيز أنت مبتدئ ... ؟ !! هذا تواضع ، أما مسألة عباقرة !!! .. جزيت خيراً عليها ... أما " للحديث بقية ... " ، فقد أصبحت مسروراً كلما أستخدمها إخوتي عنّي ... لأنها تبشر بالاستمرار ...........