اخواني ما حكاية هذه الرسالة!!عندما قمت بتشغيل المشروع على جهاز اخر تظهر هذه الرسالة علما ان (مرات الدخول) هي اسم اداه ado
بقي القول ان المشروع يحتوي قرابة 20 اداة مماثلة تظهر هذه الرسالة عند الدخول لبعض الفورمز وان فورز اخر يحتوي نفس الاداة يعمل جيا
ارجو المساعدة
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
اود اضافة استنتاج وذلك من بعد مقارنة ما يفتح وما لا يفتح فقد وجدت بان الفورم الذي يحتوي ولو تكست واحد يرتبط بقاعدة البيانات تظهر هذه المشكلة بمعنى اذا بقيت خانةال datasource للتكست معبئة بحقل القاعدة تظهر هذه المشكلة وعند تفريغها لا مشكلة اطلاقا!!
ما الحل في هذه الحالة علما اني احتاج في بعض الاحيان الى ابقاء خانة ال datasource معبئة لبعض التكست!!
ودمتم سالمين
تم تعديل هذه المشاركة بواسطة shadi77 في 11 مارس 2009 في 18:11
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
تامل الكود ادناه جيدا .. وضع مثله عند تشغيل كل Form يحوي الأداة ذاتها .. وطبعا مع تغيير اللازم
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb"
مع تفريغ قيمة خاصيتي الـ RecordSource والـ ConnectionString في وقت التصميم
واكتفي بملأهم وقت التشغيل بالكود فقط
اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي
فليقبل الجميع تقديري واحترامي .. ولكم تحياتي
حاضر يا استاز
جاري التطبيق ولي عودة عند اظهار النتائج
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
مزبطتش يا بروفيسور :(
الواد فجوال ده تعبني !! هوه موش زابط معايا ليه ايه الحكاية؟!!!
عملت زي ما طلبت يا بروفيسور مافيش فايدة معصلجة
هو كما قال احد الحكماء "لكل مبرمج خطة بديلة"
وحستخدم خطة تانية بس ايه هية؟؟ حمخمخ وطلع بيها ان شاء الله
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
إحذف كل ادوات الـ Adodc ثم قم بإضافة ادوات جديدة ايضا Adodc في نفس المكان وبنفس الإسم
ثم كرر السطر ادناه لكل اداة في اول حدث الـ Load للـ Form .. علما بأن الـ db1.mdb هي إسم قاعدة البيانات
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb"
وطبعا الـ App.Path هو مسار مجلد البرنامج ايا كان .. اذا قاعدة البيانات موضعها في مجلد البرنامج
ثم اتبع السطر اعلاه بالسطر ادناه .. وهو لملأ قيمة خاصية الـRecordSource
Adodc1.RecordSource = "info"
فهنا مثلا لفتح جدول إسمه info .. وعليك انت بتغيير اللازم
ومن بعدها قم بتعريف نوع الأمر .. فلو كما السابق يكون adCmdTable ولو جملة اختيار كاملة يكون adCmdText
Adodc1.CommandType = adCmdTable
والآن هذا دور الـ Refresh لتنفيذ ما سبق
Adodc1.Refresh
الطريقة صحيحة 100% .. في حالة فشلها ارفع مثال يحوي المشكلة
اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي
فليقبل الجميع تقديري واحترامي .. ولكم تحياتي
SQLs = select * from "info" If rs.State = adStateOpen Then rs.Close rs.Open SQLs, db, adOpenKeyset, adLockPessimistic If rs![id] > 0 Then Text1.Text = rs![id] End If
على قد ما حاولت احل بطريقتك الصحيحة مزبطتش فيه حاجة عندي غلط تمنع كودك يشتغل معايا , بس لما مخمخت ومن بعد تجربة دامت اكتر من 6 ساعات توصلت للكود اعلاه وزبط يا بروفيسور .. يعني يا سيد سكوال روح شفلي الجدول info وشوفلي بالمرة قيمة الحقل id فلو كانت قيمتو اكبر من صفر اعملي الحدث وهو اظهر قيمة الحقل بالتكست الفلاني...
بس ليا سؤال يا برو
يعني هو منطق الواحد يهرب من كود ما زبطش ويدور على كود تاني لنفس الغرض ويزبط؟ ولا لازم يفضل على الكود الموش زابط لحد يزبط؟؟
تم تعديل هذه المشاركة بواسطة shadi77 في 12 مارس 2009 في 14:00
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
اولا احييك على المحاولة الجيدة جدا وعلى ( مخمخت ) وربنا يقويك ويوفقك
ثانيا .. مش مسالة انه الواحد لازم تظبط معاه كل حاجه .. ليس هذا مقياسا
حتى لا تضيع وقتك في اشياء غير منطقية وعمرها مهتظبط برضه لانها غير منطقية
بس الصح ان الواحد مهيربش ويبحث عن الحل الأسهل والمطلق والقياسي .. انت صح هنا
بس انت ذكرت الحل ووضحته بالكود كمان لكن المشكلة نفسها مش واضحة :S
ارفع مثال فيه المشكلة وبعدين نشوف ليه بتظهر المشكلة ونشوف الحل الانسب فين :)
اعتذر عن عدم تمكني للمتابعه الدورية في وقتنا الحالي
فليقبل الجميع تقديري واحترامي .. ولكم تحياتي
mrx_ta7ady كتب:اولا احييك على المحاولة الجيدة جدا وعلى ( مخمخت ) وربنا يقويك ويوفقك
ثانيا .. مش مسالة انه الواحد لازم تظبط معاه كل حاجه .. ليس هذا مقياسا
حتى لا تضيع وقتك في اشياء غير منطقية وعمرها مهتظبط برضه لانها غير منطقية
بس الصح ان الواحد مهيربش ويبحث عن الحل الأسهل والمطلق والقياسي .. انت صح هنا
بس انت ذكرت الحل ووضحته بالكود كمان لكن المشكلة نفسها مش واضحة :S
ارفع مثال فيه المشكلة وبعدين نشوف ليه بتظهر المشكلة ونشوف الحل الانسب فين :)
حاضر يا استاز
النموذج قيد الانهاء وسارفقه قريبا
فأنت اخي المبرمج ..لا تبخل بعلمك عمن يطلبه فقد كنت يوما تبحث كما نبحث نحن.. واعلم لو حجب العلم عنك لما وصلت الى ما انت عليه الان.. فاتق الله في طالب العلم وتذكر ما منه الله عليك ولا تبخل بعلمك وما اوتيت من معرفة ليبارك الله علمك وينفعك به.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…