مرحبا
يعطيكم الف عافيه على هالجهود الطيبه ، جعله الله في ميزان اعمالكم ...
اليكم معاناتي ياطويلين العمر
أنا مسويه مشروع بالاكسس ورابطته بالفجوال بيسك 6 ، وكل التقارير والنماذج اوكي تمام
بس عندي مشكله وحده واتمنى تفيدوني
اذا بغيت أدخل اسم عميل مثلا وهذا الاسم موجود عندي مسبقا في الجدول ، وضغطت على زر حفظ ابيه يطلع لي رساله تقول انه الاسم موجود مسبقا (ابي هذا الكوووود ) تكفووووون باسرع وقت ماباقي شئ اقل من اسبوع
خايفه تراني:(
في انتظاركم على احر من الجمر
سلااااام
هذه طريقة
بس ماادري تصلح لك او لا لأني ما اعرف طريقة الربط اللي عندك
بس اهم شي الفكره
while not rs.eof if text1.text = rs!name then msgbox "هذا العميل موجود من قبل" exit sub end if rs.movenext wend
تم تعديل هذه المشاركة بواسطة MaTaRi في 15 مايو 2005 في 00:01
لاحقاً نرجو أن تكون عناوين المواضيع دالة على محتواها ..
نرجو قراءة قوانين المنتدى قبل المشاركة ..
بالتوفيق ..
السلام عليكم ورحمة الله وبركاته........
كما قال الاستاذ عبدالله فتحى يجب ان يكون عنوان الموضوع دالا على المحتوى حتى لايتعرض الموضوع للغلق وبالنسبة للسؤال فالاجابة كما اوضحها الاخ MATARI مع اضافة بسيطة جداً وهى كتابة السطر rs.MoveFirst فى اول الكود ليصبح الكود كالتالى
rs.MoveFirst while not rs.eof if text1.text = rs!name then msgbox "هذا العميل موجود من قبل" exit sub end if rs.movenext wend
فى حفظ الله :rolleyes:
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
يعطيكم الف عافيه جميعا على سرعة الرد
وعذرا للخلل الذي تم
سيتم تفاديه في المشاركات القادمه باذن الله
بروح اجرب الكود الحين واتمنى يضبط
لكم مني جزيل الشكر والعرفان
حاولت بالكود بس مع الاسف ماضبط
طريقة الربط (قاعدة بيانات اكسس مربوطة بالفجوال بيسك بواسطة أداة datacontrol)
جربت اكتب الكود التالي ونفس المشكله ماضبط معي
Data1.Recordset .MoveFirst
While Not Data1.Recordset.EOF
If Text1.Text = Data1.Recordset![ÑÞãÇáÚãíá] Then
MsgBox "åÐÇ ÇáÚãíá ãæÌæÏ ãä ÞÈá"
Exit Sub
End If
Data1.Recordset.MoveNext
Wend
End Sub
وانا مسوية اسماء الحقول بالعربي بحيث حقل الرقم اسمه (رقم العميل)
بسم الله
اختي الكريمة
بالنسبة للاخوة اللي اعطوك الاكواد السابقة فهي صيحيحة % :)
ما قلتي لنا ايش الخطأ اللي بيطلع لك .... :(
بصراحة ما اعرف ايش الغلط بالضبط .... :s ..... لكن احتمال يكون اسم الحقل اللي بالعربي ...
ليش ما تجربي تغيري اسم الحقل الى انجليزي .... يمكن ينفع معاك :rolleyes:
اذا ما نفع حوالي ان تعملي عند بداية الكود النقطة الحمرا ( break point) ثم الضغط على ( f8) لتتبع البرنامج ومعرفة اين الخطأ وماهي رسالة الخطأ ...
ثم ارسلي رسالة الخطأ وان شاء الله ان الاعضاء قادرين على معرفة الحل ...
المبرمج الطيب :)
إذا كان ترك الدين يعني تقدما ***** فيا نفس موتي قبل أن تتقدمي
اعط الفقير سمكة يشبع يوما * * * * علمه الصيد يشبع مدى الحياة
قتل امرئٍ في غابةٍ ***** جريمة لا تغتفـر
وقتل شعبٍ بأكمله ****** مسألةٌ فها نظر
حتى الكلاب إذا رأت يوماً فقيراً ماشياً *** نبحت عليه وكشرت أنيابها
اخت سمسومه ارفقي لنا المثال ونصححه ان شاء الله
تم تعديل هذه المشاركة بواسطة سمسومه في 15 مايو 2005 في 19:35
اقتباسوانا مسوية اسماء الحقول بالعربي بحيث حقل الرقم اسمه (رقم العميل)
معقولة :) حوالي ان تكتبي الاسماء باللغة الانكليوية ... فهي أفضل ..
أما عن فشل الارفاق فقومي بضغط الملفات ياحدي برامج الضغط ..
و من ثم حاولي الارفاق ....
و نرجوا :) أن يكون العنوان دالاً علي المحتوي لتجنب إغلاق المشاركة ...
تم تعديل هذه المشاركة بواسطة إبراهيم الطيب في 15 مايو 2005 في 19:34
تم الالارفاق الخي الكريم
أعتقد انه يجب عليك تسمية الحقول بالإنجليزي أفضل يا سمسومة وبعدين اعملي العمليات اللي تريدينها ...
مع خالص تحياتي للجميع ...
بس انا اشتغلت على الاكواد الباقي كلها حقولها بالعربي وماشيه
!
...............
مازلت بانتظاركم ....
بصراااحه انا لم استخدم طريقة الربط data
وانا لم اشتغل بها من قبل
لكن اذا تبين اعمل الفورم بطريقة ado
انا مستعد (h)
تم تعديل هذه المشاركة بواسطة MaTaRi في 16 مايو 2005 في 03:05
ها ياأصحاب الخبرات افيدوني افادكم الله :)
مشكور اخ matari
بس المشكله راح انسال في البرزنتيشن اخاف اني اتوهق عرفت كيف
يعطيك العافيه ماقصرت والله
ها شصار معاكم انا للحين ابحث ومالقيت اللي ابي:(
اخت سمسومه
انا ارفقت لك البرنامج في المشاركة السابقة وهو البرنامج الي تبينه
وشغال 100%
حفظ
تعديل
حذف
بحث
اذا في اي مشكله ردي علي
يعطيك العافية اخ matari
انا شفت ردك ومره استفدت منه
لكن طلبي في هذي المشاركه يختلف
ابي كود المنع ؟؟
اقرا اول المشاركة اخوي وراح تفهم طلبي
كود المنع موجود فى المشاركة الثانية للاخ MATARI وهو مكتوب بطريقة صحيحة فهل جربتيه؟! :rolleyes:
تم تعديل هذه المشاركة بواسطة ghost2010 في 17 مايو 2005 في 21:45
إن قلت قال الله قال رسولـه همزوك همز المنكر المتعالي
أو قلت قد قال الصحابة والألـى تبعاً لهم بالقول والأعمال
أو قلت قـال الشافعي وأحمد و أبو حنيفة والإمام الغالي
صدوا عن وحي الإله ودينـه واحتالوا على حرام الله بالإحلال
يا أمةً لعبت بدين نبيها كتلاعب الصبيان في الأوحال
حاشا رسول الله يحكم بالهوى تلك إذاً حكومة الضلال
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…