ابو جودي

up ☺ ♥ ☺

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

لاحظ انى لو دخلت 100 سجل ما راح يكون هناك ترقيم فقط الرقم 100 اممممممم وماذا لو هناك خطأ واردت ان تعيد الترقيم اخبرنى ودعنا نناقش الفكرة لو تكرمت

وبعد الحفظ يقوم بتغيير القيمة الموجوده بالحقل A من 0 الى 1 حتى لا يتكرر الرقم طيب يبقى ايه لزوم اللفه الكبيره ده مافى كود ممكن تحطه وهو هيظبط لك الدنيا من غير اللف ده كله ارفق ملفك لو تكرمت وان شاء الله ممكن اضيف لك كود داخل النموذج مع زر الامر يفيدك فى هذه النقطه

الكود المستخدم Me.اسم الزر.Enabled = False

اتفضل عدم تفعيل الزر بعد الحفظ.rar

انا مش قادر افهم كويس المطلوب اللى فهمتى اى رقم اقل من صفر حضرتك مش محتاجه انه يظهر تمام بعد اذن الاستاذ جعفر ده التعديل على اد فهمى لو كنت انا فهمت المقصود 40.tast66.accdb_up.zip

مرفق لو تكرمت حتى نستطيع مساعدتك ومن فضلك فى المرات المقبله برجاء الحفاظ على قوانين المنتديات حتى يسهل متابعة موضوعك عنوان موضوعك هذا ارجو المساعدة على وجه السرعة من ادارة او اعضاء المنتدى تعارض مع هذا البند 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية و يرجى الابلاغ عن المشاركات المخالفة من خلال زر تقرير اسفل المشاركة 2-يجب استخدام خاصيةالبحث قبل طرح السؤال توفيرا للوقت و الجهد. 3-ضرورة كتابة عنوان واضح للموضوع يدل على محتواه ويعطي وصفاً مختصرا للسؤال. 4-ممنوع منعا باتاً كتابة عناوين سينمائية مثل عاجل ، نداء الي فلان ، الي الخبراء ، طلب مساعدة ، أريد حلا..... 5-يمكن استعجال الرد باستخدام تعبير -للرفع- و غير مسموح بالالحاح او اللوم فجميع الاعضاء يشاركون تطوعا طبقا لسعة وقتهم. ومخالفة ذلك تعرض الموضوع للحذف

طيب المرفقات التالية على الترتيب تقوم بالاتى المرفق الاول عند البحث يقوم بتظليل ما يطابق نتيجة البحث SearchHighlight.rar المرفق الثانى يقوم بالفرز تلقائيا اثناء الكتابه دون اى تدخل منك ولكن لا يقوم بالتظليل FindAsUType.rar ما اريده هو الدمج بين المثالين للحصول على مثال واحد يقوم بالبحث التلقائى والفرز والتظليل لما يطابق البحث وكل ذلك بطريقة اليه اثناء كتابة الحروف كما يحدث فى البحث والفرز بالمرفق الثانى

الله اعلم فى انتظار الرد من اساتذتنا الكرام

السلام عليكم ورحمة الله تعالى وبركاته المثال المرفق خاص بالبحث والتظليل طبعا تقدمت قبل ذلك بمثل هذا الموضوع ولكن للامانه اشرت اننى نقلت من مثال من موقع اجنبى بمساعد الاستاذ يوسف جزاه الله خيرا عندمى دلنى عليه ولكن انا قمت بالتعديل عليه لعمل فلتر تلقائى للحروف والكلمات التى تطابق التى تم كتابتها فى مربع النص الخاص بالبحث ولكن للامانه ايضا اكتشفت خللا نتيجة ذلك التعديل الذى قمت به ولم اكتشفه الا مع التجربة ومحاولة نقل النموذج من قاعدة لاخرى والان ارفق هذا المثال الاجنبى الاصلى فقط قمت بالتعديل على الفورم وطريقة عرض الحقول المطلوب من اساتذتى الكرام جزاهم الله عنا كل الخير مثلا انا لو اخترت البحث عن ContactName لو كتبت فر مربع نص البحث اوفيس ثم قمت بالضغط على مفتاح الـ Enter من لوحة المفاتيح يتم البحث والفرز واظهار النتائج المطابقة فقط كما فى الصورة التالية انا اريد ان يتم البحث والفرز تلقائيا اثناء كتابة احرف البحث داخل مربع البحث دون الضغط على مفتاح الـ Enter SearchHighlight.rar

لا ابدا يا استاذى الجليل انا فقط اختلط على الامر جزاكم الله كل الخير وأعتذر للاثقال عليكم

هو حضرتك تقصد ايه بردك هنا انا مش فاهم والرابط الغريب ده معناه ايه انا شايفه كود ومكتوب بصيغة رابط مش فاهم معناه ايه وعند الضغط عليه يقوم باعادة تحميل الصفحة

ممكن تضيف مرفق يحتوى على نماذج القاعده وجود النماذج حيسهل علينا مساعدة حضرتك

'//Name : AttachDSNLessTable '//Purpose : Create a linked table to SQL Server without using a DSN '//Parameters '// stLocalTableName: Name of the table that you are creating in the current database '// stRemoteTableName: Name of the table that you are linking to on the SQL Server database '// stServer: Name of the SQL Server that you are linking to '// stDatabase: Name of the SQL Server database that you are linking to '// stUsername: Name of the SQL Server user who can connect to SQL Server, leave blank to use a Trusted Connection '// stPassword: SQL Server user password Function AttachDSNLessTable(stLocalTableName As String, stRemoteTableName As String, stServer As String, stDatabase As String, Optional stUsername As String, Optional stPassword As String) On Error GoTo AttachDSNLessTable_Err Dim td As TableDef Dim stConnect As String For Each td In CurrentDb.TableDefs If td.Name = stLocalTableName Then CurrentDb.TableDefs.Delete stLocalTableName End If Next If Len(stUsername) = 0 Then '//Use trusted authentication if stUsername is not supplied. stConnect = "ODBC;DRIVER=SQL Server;SERVER=" & stServer & ";DATABASE=" & stDatabase & ";Trusted_Connection=Yes" Else '//WARNING: This will save the username and the password with the linked table information. stConnect = "ODBC;DRIVER=SQL Server;SERVER=" & stServer & ";DATABASE=" & stDatabase & ";UID=" & stUsername & ";PWD=" & stPassword End If Set td = CurrentDb.CreateTableDef(stLocalTableName, dbAttachSavePWD, stRemoteTableName, stConnect) CurrentDb.TableDefs.Append td AttachDSNLessTable = True Exit Function AttachDSNLessTable_Err: AttachDSNLessTable = False MsgBox "AttachDSNLessTable encountered an unexpected error: " & Err.Description End Function ده module يعنى وحده نمطيه

اين المرفق

جزاكم الله خيرا استاذنا الفاضل

> تعطى حالة الاحرف الكبيـــرة دائما < تعطى حالة الاحرف الصغيرة دائما

ممكن تحط التاتش بتاعك دايما التاتش بتاعك بيكون فنى بص يا استاذ جعفر انتم عامليين فى المنتدى هنا زى الفواكه كل واحد له طعم ولن غير التانى لكن فى النهايه كلكم كالفواكه الجميله بس الحق انت تاتشاتك ليها طعم تانى *_^ وانا مستنى تقولنا ماذا سيحدث ماذا سيحدث اذا وضعنا > في تنسيق النموذج وتنسيق الجدول لنفس الحقل

الاستاذ الجليل والمعلم القدير والفنان الكبيـــــــــر طبعا فنان كعادتك يا استاذنا الغالى ونسيت الامضاء جعفر الفنان

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

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

جزاكم الله خيرا انظر الى الكود فى هذا المرفق قمت بعمل هذا الكود بعد ما قمت بالاطلاع على المثال السابق جزاكم الله خيرا test.rar

طب ممكن مثال لو تكرمت انا مش فاهم اعمله ازاى

هل هناك كود او طريقة تجعل الكتابه داخل نماذج الاكسس small letters فقط حتى لو مفتاح الــ Caps Lock مفعل ومضاء