rawya

أهلا اخي رضوان أشكرك وبانتظار الرد فقد سبب لي الموضوع حالة من القلق :(

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

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

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

جزاك الله خير :(

شكرا اخي الكريم على الرد .. جربت الطريقة وهي تعمل لكن ليس كما هو ظاهر في الصورة وهو ما اريد .. فالكلمات تبدو بعيدة عن بعضها .. اي ان التنسيق يتم باضافة فراغات بين الكلمات وليس تمديدها :( بانتظار تعليقكم

السلام عليكم ورحمة الله وبركاته .. تحياتي .. أواجه مشكله أرجو ان تساعدوني فيها جزاكم الله خيرا احاول تنسيق الشعر في برنامج وورد وجربت اكثر من طريقة وجدتها في الوصلة التالية بالمنتدى http://www.officena.net/ib/index.php?showtopic=197&st=0 ولكنها لا تعمل ، علما بأني استخدم اوفيس 2003 حاولت اضافة الماكرو لكن يظهر لي خطأ في الكود .. وفي الحقيقة اريد ان يكون التنسيق مباشرة في البرنامج باستخدام ماكرو او اي طريقة اخرى.. اي لا اريد استخدام برنامج آخر

أخي الفاضل .. بما أن الحقل عبارة عن رقم فيجب التخلص من علامتي التنصيص ليصبح الكود بالشكل التالي docmd.runSQL "UPDATE employeeTbl SET grade= " & me.grade & " WHERE employeeSno = " & me.employeeNo

أعتذر فما زال الكود ناقصاً حيث يجب تحديد الشرط وهو الرقم ( المفتاح الرئيسي للموظف ) لتعيين الحقل الذي سيتم به التحديث docmd.setwarning 0 docmd.runSQL "UPDATE employeeTbl SET positioin='" & me.postion & "' WHERE employeeSno = " & me.employeeNo" docmd.runSQL "UPDATE employeeTbl SET grade= '" & "' WHERE employeeSno = " & me.employeeNo docmd.runSQL "UPDATE promotionTbl SET date = " & date() & " WHERE promotionSno = " & me.promotionNo

تحياتي أضف الكود التالي بعد التحديث في نموذج الترقيات ، حيث افترض انك تعمل عليه وتريد في نفس الوقت تحديث البيانات في جدول الموظفين.. بإعتبار ان me.positon me.grade هي حقول موجودة على النموذج ويمكنك استبدالها بأي قيم خاصة تحدد الوظيفة والدرجة docmd.setwarning 0 docmd.runSQL "UPDATE employeeTbl SET positioin='" & me.postion & "'" docmd.runSQL "UPDATE employeeTbl SET grade= '" & me.grade & "'" docmd.runSQL "UPDATE promotionTbl SET date = " & date() أرجو ان يكون هذا هو المطلوب في سؤالك

السلام عليكم ورحمة الله .. لتحديد مصدر البيانات على النموذج يمكنك اضافة الكود التالي عند الفتح onOpen if [condition] then me.RecordSource = Qry1 else me.RecordSource = Qry2 end if أو بصيغة أخرى تكتب فيها الاستعلام المطلوب مباشرة كالتالي if [condition] then me.RecordSource = "select * from Tbl1 where field1=1" else me.RecordSource = "Select * from tbl1 where field2 like 'Ali'" end if تحياتي

مرحبا أختي العزيزة أرجو ان تجربي تعديل الخصائص المتعلقة بالحقل في الجدول نفسه بالاضافة الى النموذج غيري الخصائص لتصبح كالتالي : field size : Double Format : General Number Decimal Places : 2 تحياتي

تحياتي ... جرب استخدام منسق الشعر على الرابط التالي لكتابة القصيدة http://www.iioem.org/modules.php?name=Poet

مثال لاختيار عدد من السجلات بالنقر عليها مرتين في نموذج ثم نسخها الى الذاكرة على شكل جدول يمكن لصقه في الوورد بالضغط على Ctrl+v او اختيار "تحرير ثم لصق" copyToWord.rar

السلام عليكم ورحمة الله اخواني الكرام .. اولا اشكركم جدا جدا على تشجيعكم وتواصلكم وثانياً فقد تمكنت اخييييييييراً والحمدلله من حل المشكلة كما هو مطلوب تماماً :( والطريقة هي كالتالي : - فتح وثيقة وورد جديدة - ادراج جدول به عمودين وعدد من الصفوف مساوٍ لعدد الحقول في الجدول - اضافة القيم للجدول - نسخ الجدول الى الذاكرة - اغلاق وثيقة الوورد ارجو ان تتاح لي فرصة لادراج المثال في المنتدى .. وجزاكم الله خيراً copyToWord.rar

السلام عليكم ورحمة الله .. الشكر موصول للإخوة خضر ورضوان جزاكم الله خير على تعاونكم وصبركم على طلباتي التي لا تنتهي .. لقد أخذت باقتراحك استاذ خضر واضفت نموذج فرعي يحتوي على البيانات المطلوبه، ولم اجعله مخفي بمعنى الغاء خاصية الرؤية visible = false ولكن جعلته صغير بحيث لا يمكن رؤيته. وهذا هو الكود على زر "النسخ" Me.selectedQry.Requery Me.selectedQry.SetFocus DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdCopy حيث selectedQry هو النموذج الفرعي و احتجت لاعادة طلب البيانات Requery لان الاختيار يتم كما ذكرت في نفس النموذج. ربما اشعر الان بنوع من الارتياح ولكني ما زلت غير سعيدة بإصرار البرنامج على ادراج اسماء الحقول .. وشخصيا لم اجد حتى الان طريقة لتغيير هذا السلوك :) تحياتي الخالصة ......

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

جربت الكود لكن لم ينقل اي شيء :)

مرحبا اخ سهل .. طبعا اقتراحك سيجعل من حياتي اسهل وليس حياة المستخدم ، فالمستخدم يريد برنامج بواجهة تطبيقة متقدمة و سهلة الاستخدام في الوقت الذي تحقق فيه الغرض المطلوب . ومما يريد المستخدم "to make his life easy " ان ينسخ بعض السجلات التي يختارها في النموذج ويضيفها كحقول في تقرير يكتبه على برنامج الوورد مرقمة بترتيب اختياره لها . حاولت هذه المرة اضافة الكود إلى النموذج بحيث يختار الحقول ثم ينسخها .. ولكن أيضاً يقوم الاوفيس كليب بورد مشكورا بنسخ اسماء الحقول وعنوان النموذج كما انه ينقل جميع الحقول بدون اي فلتر وهذا هو الكود DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdCopy تقبلوا تحياتي

السلام عليكم ورحمة الله تحياتي .. اشكرك اخي الفاضل واعتذر لاني لم اوضح ما اريد بالتحديد حقيقة فاني ارغب بعمل كل هذا عن طريق كود موجود على زر معين على نموذج .. وقد بحثت و حاولت كثيراً وافضل ما استطعت التوصل اليه هو الكود التالي DoCmd.OpenTable "myTbl" DoCmd.SelectObject acTable, "myTbl" DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdCopy لكن هنا يتم فتح الجدول و عرضه في حين اريد ان يتم كل شي بشكل مخفي ، المشكلة الاخرى هو انه يتم نقل اسم الجدول واسماء الحقول بالاضافة الى حقول الجدول . أرجو ان اجد عندكم حلاً .. فاني شارفت على اليأس :)

السلام عليكم ورحمة الله .. تحياتي ... أرجو منكم المساعدة بمثال لعمل التالي : نسخ القيم من جدول في الاكسس الى الحافظة وحين يتم اللصق في برنامج وورد تكون الحقول في منسقة كما هي في جدول و جزاكم الله خيراً

شكرا على ردك واهتمامك.. لابد ان تكون هناك طريقة ما .. لذا فأتمنى ممن سبق له العمل على مثال كهذا او حاول البحث ان يفيدنا .. أفاده الله ..

السلام عليكم ورحمة الله.. تحياتي ... شكراً أخ امجد على المثال الجميل .. رأيت المشاركة فظننت انها ما كنت احتاج .. ولو ان ظني خاب لكني متأكده اني سأجد عندكم مثال آخر جميل لما اطلب .. ما اريده هو البحث عن كلمة معينة و تغيير لون الخط لكل نتيجة داخل المربع النصي و تحياتي الخالصة :(

كل عام وانتم بخير ... هل تعني اخي تخصيص الهوامش برمجياَ .. إذا كان هذا ما تقصد أرجو مراجعة الموضوع التالي برمجة إعدادات الطابعة لأكسس 2002 Programming Printer Settings in Microsoft Access 2002 http://msdn.microsoft.com/library/default....10_Printers.asp في انتظار الرد.. وتحياتي

السلام عليكم ورحمة الله .. الوصلة التالية بها أداة لضبط حجم النموذج access form resizer http://jamiessoftware.tk/articles/resolution.html تحياتي