السلام عليكم ورحمة الله وبركاته
اخوانى اعضاء المنتدى الكرام
فى المرفق يوجد زر امر للبحث Serch فى النموذج رقم 4 والذى يفتتح نموذج البحث رقم 5
المطلوب هو كيف يتم الاختيار للاسم بعد البحث عنه ( كود البحث انتهيت من عملة ) فى النموذج ليضع الكود للاسم فى النموذج 4؟؟
ارجوا ان يكون السؤال واضح يا اخوانى .
سوف ارفع لك الحل
لكن نصيحة ان كان هذا البرنامج سوف تستخدمه فى شغلك
لا انصحك به لإنه سوف يعطيك error
كثيرة جدآ لن تتوقعها
ارجو ان تتذكر نصيحتى
ويمكننى عمل هذا البرنامج لك بطريقة صحيحة وسليمة جدآ
شاهد هذا البرنامج التجريبى
من برمجتى http://www.gulfup.com/X10203rtj3a3li
للتواصل على الملف الشخصى
او الايميل madapop11@yahoo.com
مبرمج نظم معلومات
السلام عليكم ورحمه الله وبركاته
اخى العزيز Madapop
اولا شكرا على الاهتمام والرد من حضرتك
ثانيا البرنامج الذى اريد عملة هو لطباعة الشيكات وليس دليل تليفونات
انا بالفعل عامل ه
اسف لانقطاع النت ( تكمله )
السلام عليكم ورحمه الله وبركاته
اخى العزيز Madapop
اولا شكرا على الاهتمام والرد من حضرتك
ثانيا البرنامج الذى اريد عملة هو لطباعة الشيكات ( عبارة عن قاعدة بيانات لحفظ الشيكات الصادرة وكذلك طباعتها من البرنامج دون الكتابة اليدوية للشيك . عن طريق وضع الشيك فاضى فى الطابعة واختيار رقم الاوردر وتحديد البنك )
وليس دليل تليفونات
انا بالفعل عامل ده على الاكسس
ولكنى بحاول تعلم الفيجوال وبدأت بنفس برنامج طباعة الشيكات
سارفق لحضرتك ملف الاكسس لكى تصل لك الفكرة عن ما اريد
اسف على الاطالة اخى الكريم
ثالثا : ماشاء الله البرنامج بتاعك ( دليل التليفونات ) ممتاز ان شاء الله يدوم عليك التميز و بالتوفيق
مرفق ملف الاكسس
.........................*****...........
الملف مساحتة اكبر من 600 كيلو بعد الضغط
السلام عليكم
فاهم المطلوب بالضبط
لكن برنامج دليل الهاتف وضعته علشان تجربه وتقول رآيك
إما نصيحتى ان كان هذا البرنامج (الشيكات) سوف تستخدمه فى شغلك
لا انصحك به لإنه سوف يعطيك error
كثيرة جدآ لن تتوقعها
خصوصآ إذا كنت تريد عمله بالفيجوال
لو عايز ابرمج لك البرنامج واعطيك السور كود بمقابل بسيط جدآ
او لو عايز الحل بتاع مشكلة زر البحث الحل موجود
شوف انتا ايه رايك مش هنختلف
على السعر
كمان هصمم من الاول مش هعدل على القديم
مبرمج نظم معلومات
ضع في نافذة form5 زر command باسم cmdOK
والكود كالتالي
Private Sub cmdOK_Click()
Form4.Text7 = Adodc1.Recordset.Fields("Beneficiary_ID").Value
Unload Me
End Subطبعا طريقة مبسطة
في طريقة ثانية في حالة انك تستخدم نافذة البحث في اكثر من نافذة فلازم تعمل متغير من نوع Public في نافذة البحث وتسند لها ID
في ملاحظة بخصوص المسار لقاعدة البيانات في Form5 اكيد انت نسيت لاني شفت انك عامل حسابك له ( Sub PoolConnection() )
غير مسار مجلد مشروعك وشغل البرنامج وتأكد من كل النوافذ بتلاحظ المشكلة
وعفوا
تم تعديل هذه المشاركة بواسطة realdie10 في 3 أبريل 2012 في 23:56
وما من كاتب إلا سيفنى *** ويبقى الدهر ماكتبت يــداه
فلا تكتب بكفك غير شيء *** يسرك في القيامة ان تراه
لا تنسى تشجيعي بالنقر على
اذا كانت مشاركتي مفيدة السلام عليكم ورحمه الله وبركاته
استاذى الكريم ( REALDIE 10 )
جارى تجربة الكود
ويارب ما اتحرم من مساعداتك
اسف لو كنت تحملت عليك
بس انت عارف طالب العلم بيكون متعب للاخرين شوية
بكرر شكرى لشخصك الكريم
تقبل تحياتى
السلام عليكم
فاهم المطلوب بالضبط
لكن برنامج دليل الهاتف وضعته علشان تجربه وتقول رآيك
يوجد مشكلة فى مسار القاعدة
وقام العضو realdie10
بحل جميع المشاكل
لكن نصيحة ان كان هذا البرنامج سوف تستخدمه فى شغلك
سوف يعطيك error
كثيرة جدآ لن تتوقعها
فقط لا غير
تم تعديل هذه المشاركة بواسطة madapop في 5 أبريل 2012 في 02:49
مبرمج نظم معلومات