koao

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

السلام عليكم ورحمة الله وبركاته لعل في المرفق ما تريد وبالتوفيق koao_tel.zip

السلام عليكم ورحمة الله وبركاته أرجو أن يجدا موضوعي المتواضعين التاليين مكانة ... بجانب مواضيع أساتذتي الذين تعلمت منهم الكثير ............................................ الموضوع : 207 فكرة لإستغلال ملف الإكسيل كتقرير لعرض البيانات من قاعدة البيانات صاحب المل…

السلام عليكم ورحمة الله وبركاته أخي الكريم جرب هذا التعديل koao_HideImgTxt.zip

السلام عليكم ورحمة الله وبركاته أخي الكريم يتم ذلك بإستخدام دالة Round ولها معاملين الأول الرقم الذي تريد تقريبه والثاني إختياري ويمثل عدد المنازل العشرية للرقم الناتج وإذا تجاهلته تكون قيمته 0 ولنضرب أمثلة لنعرف طريقة عمل الدالة Round(12.50,0) الناتج هو 12 Ro…

السلام عليكم ورحمة الله وبركاته أخي الكريم هذه الصورة العامة للتأكد من وجود ملف من عدمه .. تستطيع تغييرها لما يناسبك Dim fs As Object Set fs = CreateObject("Scripting.FileSystemObject") If fs.FileExists("D:\1.txt") Then MsgBox "File exists." Else MsgBox "File …

السلام عليكم ورحمة الله وبركاته أخي الكريم أضف الكود التالي إلى أكواد النموذج tr Private Sub xx1_AfterUpdate() Me.ZZ = Null Me.ZZ.RowSource = "select [nor] from tr where [name] = '" & Me.xx1 & "'" Me.ZZ.Requery Me.ZZ = Me.ZZ.ItemData(1) Me.ZZ.SetFocus Me.ZZ.Dr…

بارك الله بك أخي الكريم ونفع الله بعلمك على المثالين الرائعين

كل عام وأنت بخير يا مشرفنا الغالي ومشكور على المثال الرائع وعلى مشاركاتك المميزة لا حرمنا الله منها .. ونسأل الرحمن ان يمن عليك بالصحة والعافية وعلم الدنيا والآخرة

السلام عليكم ورحمة الله وبركاته أخي الكريم أضف مربع نص في تذييل التقرير Report Footer وأسند الكود التالي لخاصية "مصدر عنصر التحكم" =Sum([A5]*[A8])

أخي wail_brg أشكر لك كلامك الجميل أخي w1w1w1 .. يعلم الله أنني أنهيت فكرة التنبيه بورود رسالة جديدة منذ ردك الأخير .. ولكن عرقلتني جزئية فبحثت عن حل لها لمدة يومين فلم أوفق لحل كامل للمشكلة .. لذا أرجو منك دعوة طيبة لأخوك الفقير إلى ربه في البرنامج أضفت حقل في…

وعليكم السلام اخي w1w1w1 .. وحلال عليك البرنامج .. وعلى كل مسلم .. جمعنا الله وإياكم ووالدينا في الفردوس الأعلى.

الشكر موصول لك أخي أبوعنان .. لتشريفك موضوعي ودعمك لي بردك الجميل.

وإياك أخي mrnooo2000 .. وشاكر لك مرورك الكريم أخي team2000 أشكر لك كلماتك الجميلة .. وهنا ردي على ملاحظاتك بالتفصيل ليس لسبب إلا لإعطاء أكبر كم من الأكواد التي يستفيد منها من يجرب البرنامج .. ولك أن تزيل الكود المسبب لذلك لم يظهر لأنك فتحت نموذج New Message من…

وإياك أخي أبو رهف .. وأسأل الله أن يجمعنا وأياك ومن يقرأ بدار كرامته

وإياك أخي dbprog .. وننتظر رأيك بعد التجربة

بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته مقدمة : كنوع من العرفان أقدم هذا البرنامج للمنتدى الذي تعلمنا من أعضائه الكثير .. وهو عبارة عن بريد إليكتروني لمنشئة, أجهزة الحاسب فيها مرتبطة بشبكة داخلية Intranet. أنا أعرف أن أغلب الشركات الآن مرتبطة با…

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

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

أخي الكريم كما قلت .. لاتظهر المشكلة عندي ويحسب البرنامج بدون مشاكل وحاولت أن نحسب الرقم المسلسل بطريقة أخرى .. وكنت أحسب الموضوع سهل كالتقارير .. نستخدم 1+= وإنتهى الموضوع ولكن لم ينجح .. وأخوك مازال يتعلم .. وأحاول أن نجد طريقة أخرى لحساب المسلسل ولكن لعل غي…