محمد طاهر عرفه

كود ممتاز ، و فكرة متميزة :d

السلام عليكم منتدي النقاش المؤقت http://www.officena.net/League/ أولي الخطوات نحو إنشاء الموقع و تأسيس الجمعية = من هنـــــــا فهرس المواضيع المطروحة للنقاش = من هنـــــــا

مثال علي البحث بالكود فى مجال معين و ليكن A1:A1000 و طبعا يمكن تغيير المجال الي مجال محدد باسم ثم الحصول علي عدد خلاياه و اتمام البحث بنفس الطريقة فى المثال المشار اليه هنا و التي كتبت بناء علي المجال A1:A1000 تم تعديل المثال بعد تنزيله 3 مرات ليتم تظليل الخلية المختارة Search.rar

بالنسبة للاولي (مشاركة الأخت سهيلة) أعتقد أن المشكلة لديك فقط و للتأكد يمكنك التجرب من جهاز آخر و الحل غالبا فى تحديث نشخة المتصفح اذا كان الويندوز 98 أو ان تستخدمي ويندوز اكس بي و أحد الاسباب ايضا أن تكون برامج الحماية مثل زون الارم فى حاجة الي تظبيط بعض الخيارات الداخلية بها و الثانية ( مشاركة الاخ نورش) لحفظ الصفحات يوجد زر صغير علي يمين الصفحة فى نفس مستوي أزرار تعقيب و الرد السريع و لكن علي اليمين اختار منه تنزيل الصفحة و صيغة وورد مع تحياتي

السلام عليكم ربما أنك تريد التقريب و بدرجة محددة ، فمطلوب دالة خاصة اما اذا كان تقريب عادي قستستخدم الدالة round راجع هذا الموضوع http://www.officena.net/ib/index.php?showtopic=634

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

عن نفسي لا أعرف حاليا طريقة للتحكم بعدد الاسطر و لكن دعنا نفكر فى الموضوع بصوت عالي السطر الجديد ينتج اما من امتلاء السطر الحالي ، و اكمال الكتابة أو ارسال ضغطة مفاتيح Enter او Ctr+Enter بحسب الاعدادات و الثانية يبدو من الممكن عدها ، اما الاولي فتبدو أصعب حيث أن العرض المخصص للحروف يختلف بحسب الحرف و يبدو الموضوع صعب التحقيق ، لكن .... كل شيء ممكن

فعلا الان عمل بصورة جميلة :d فتحت موضوع جديد فى القسم العام ليشارك باقي الاخوة فى نقاش الموضوع المفيد من هنا و شكرا علي المثال المتميز

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

لنفرض أن مربع النص اسمه t1 ضع فى حدث قبل التحديث لمربع النص الكود التالي Private Sub t1_BeforeUpdate(Cancel As Integer) If Len(Me.t1) > 1200 Then Cancel = True MsgBox "Legth can not exceed 1200 chrs", , "www.officena.net" End If End Sub

هل الصلاحيات بالكود ؟ أم بصلاحيات الاكسيس بصفة عامة ، لمنع التعديل فى السجلات السابق حفظها ( عدا اضافة سجل جديد) نضع الكود التالي فى حدث قبل التعديل لكل من عناصر التحكم المطلوب عدم تعديل بيانات السجلات بها Private Sub name_BeforeUpdate(Cancel As Integer) If Not Me.NewRecord Then Cancel = True SendKeys "{ESC}" End If End Sub و يمكن اضافة باسوورد مثلا ، أو مراجعة من المستخدم الحالي اذا كانت الصلاحيات بالكود مع تحياتي

وصلة من موقع ميكروسوفت http://msdn.microsoft.com/library/default....c_ac_olauto.asp و تشمل الاتي: مقدمة ارسال رسالة بالاوتلوك من الاكسيس اضافة موعد الي الاوتلوك اضافة مهمة أو تذكير للاوتلوك تسجيل جهة اتصال مرفق المثال المرفق بالمقال Automation.rar

السلام عليكم أولا جزاك الله خيرا علي هذا المثال المتقدم و الذي باذن الله سيفتح المجال للكثر من البرمجة بالاكسيس فيما يتعلق بالشبكة و المستخدمين ثانيا جربت المثال مع اوفيس 2003 و وويندوز اكس بي و تظهر لي دائما رسالة بالبحث عن Forms!MainForm!OptNamesOf و سأجرب ثانية باذن الله

موضوع مرتبط http://www.officena.net/ib/index.php?showtopic=1720

موضوع مرتبط http://www.officena.net/ib/index.php?showtopic=545

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

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

و قد سبق أن دار حوار حول الموضوع هنا http://www.officena.net/ib/index.php?showtopic=2932 و مرفق آخر تحديثات الاداة ، مع الشكر للاخ مهند و ياريت لو أمكن ارفاق مصدر الكود بيكون مفيد جدا ، لنحاول تطبيقه فى الاكسيس بدون ادوات خارجية MagicProperlyText-mohanad.rar

لم أر الكود للاداة فى المشاركة المشار اليها فاذا كنت تقصد استخدام الاداة فعليك أولا تسجيلها من tools activex register و تختار الملف ثم من وضع تصميم النموذج insert activex control , تختار الاداة ذات الاسم فى الملف المرفق ( مرفق أداة الأخ مهند ) فيظهر لك مربع نص و الحديد فيه هو خاصية المحاذاة الكلية

السلام عليكم أهلا بك فى المنتدي و نتمني أن تستمري فى الدروس و فى التفاعل مع الاعضاء فى المشاركات باذن الله مع استمرار الدروس و تقدمها سيتم تثبيت موضوع خاص بفهرس الدروس و الوصلات اليها و لكن نرجو أن تستمر الدروس أولا قبل التثبيت :( و أهلا بك مرة ثانية

جرب هذا الموضوع http://www.officena.net/ib/index.php?showtopic=206

عمل ممتاز ، و مثال مميز جدا جزاك الله خيرا

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

مرفق مثال علي تغيير قيمة قناع الادخال بالكود من الازرار أو بالاختيار من مربع تحرير و سرد ( combo ) و الكود المستخدم هو التالي : If Me.Combo4.Value = "Password Mask" Then Me.Text0.InputMask = "Password" ElseIf Me.Combo4.Value = "Phone Mask" Then Me.Text0.InputMask = "(###) ###-####" Else Me.Text0.InputMask = "No Mask" End If مع تحياتي ChangeInputMask.rar

ربما توجد مساحة كافية ، و لكن ليس علي البارتشين الذي به ملفات البرنامج أو ملفات الويندوز المؤقتة ( ال c مثلا ) او بحسب ما لديك