محمد ايمن

Chr (code) تقوم الدالة Chr بتحويل رقم بين ( 0 - 255 ) الى كود ASCII المخزن في جدول هذه الدالة مثلا العبارة التالية: Hi, I'm "mubarmej" ستجد انه لايمكنك كتابتها بهذا الشكل myText = "Hi," & vbCrLf & "I'm "mubarmej"" لان البرنامج سيعتقد ان نهاية السلسلة النصية هي عند علامة الاقتباس التي تقع قبل كلمة mubarmej لذلك نستخدم الدالة Chr للتعبير عن علامات الاقتباس المزدوجة و بذلك تصبح العبارة السابقة myText = "Hi," & vbCrLf & "I'm " & chr(34) & "mubarmej" & chr(34) وفيما يلي اهم الارقام و مايقابلها في جدول ASCII chr(33) اشارة التعجب ! chr(34) علامة الاقتباس المزدوجة " chr(35) اشارة المربع # chr(36) اشارة الدولار $ chr(37) اشارة النسبة المئوية % chr(38) اشارة جمع السلاسل النصية & chr(39) علامة الاقتباس المفردة ' chr(40) اشارة القوس ( chr(41) اشارة القوس ) chr(42) اشارة النجمة * chr(44) اشارة الفاصلة , chr(58) النقطتين : chr(59) الفاصلة المنقوطة ; اتمنى ان أكون قد وفقت في الشرح منقول لعموم الفائدة

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

تفضل stu3.rar

عذرا اخي ابو خليل يبدو اننا تزامنا في الحل

تفضل اخي الكريم Database2.rar

هل من جديد ؟

تفضل اخي الكريم اسم المستخدم الافتراضي admin كلمة المرور الافتراضية admin بعد تسجيل الدخول تستطيع اضافة حسابات او حذفها stu3.rar

بارك الله فيك اخي الكريم يبدو ان صديقنا الاكسسز لا يحب الوقف عند حد معين

ولكن ما اعرفه ان اكسسز لا يسجل اي مكتبات !!!!!!!!!!!!!! اذا كنت تقصد الغاء الرسالة التي تظهر عند تشغيل اي برنامج كمسؤول فهذه و الله اعلم غير ممكنة بالاكسسز

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

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

لماذا لا ترسل مرفق ؟؟

اذا انت تريد استثناء عام قم فقط بادخال السنة db2.rar

هل تريد استثناء عام محدد ام تاريخ محدد ؟؟ مثلا هل تريد استناء العام 2001 ام تريد الاستثناء من 2001 الى 2003 ؟؟

تفضل شغل الاستعلام و ادخل العام الذي لا تريده db1.rar

للتوضيح النموذج main يحتوي على ثلاثة ازرار و هي تقوم بفتح النماذج frm1 - frm2 - frm3 و كل نموذج عند الفتح يقوم بتخزين قيمة في المتغير UName يوجد في كل نموذج رز ادخال قيمة المتغير و هو الذي ينفذ الكود التالي DoCmd.RunSQL ("insert into logaction (formname) values (uname)") SQLVariable.rar

هذا ما فعلته و لكن لم يعمل كود الادراج DoCmd.RunSQL ("insert into logaction (username) values (UName)") حيث تظهر الصورة السابقة دائما

اخي bluemaind المتغير Uname يتحكم به اكثر من نموذج فعند فتح اي نموذج يقوم هذا النموذج بوضع قيمة في هذا المتغير عند التجربة ظهرت لي هذه الصورة ( طبعا المتغير كان يحوي قيمة )

للرفع

ارجو التوضيح اكثر ان كنت تقصد انك تريد تخفيض مستوى الامان في اكسسز و هو منصب على ويندوز سفن فهذا ممكن هذه الاداة تقوم بالمطلوب يفضل تشغيل الاداة كمسؤول اما غير ذلك فارجو التوضيح open.rar

عمل رائع بارك الله فيك اخي الكريم

الاخوة الاكارم تحية طيبة الجملة التالية تقوم باضافة بيانات الى الجدول logaction DoCmd.RunSQL ("insert into logaction (username) values (UName)") المشكلة تكمن في UName لانه في كل مرة يحمل قيمة جديدة !!!! ماهو التعديل المطلوب لاستطيع استخدام هذا المتغير ملاحظة المتغير من نوع Variant

تطبيق جميل اخي الكريم ولكن ارغب في معرفة لماذا لا استطيع استعمال هذه الاداة مباشرة ؟؟

أخي الكريم ارسل المرفق للنظر في الموضوع

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