السلام عليكم أخواني..
أرجو مساعدتي في هذه المشكلة ..
المشكلة في كود تسمية الحقول في الداتا جريد
تظهر لي الرسالة التالية
وعند تعطيل الكود لاتظهر
db.CursorLocation = adUseClient db.Provider = "microsoft.jet.oledb.4.0;" db.Open App.Path & "\data1.mdb" Rem rs.Open "table1", db, adOpenStatic, adLockPessimistic rs.Open "select no1 as ÇáÑÞã1,no2 as ÇáÑÞã2 from table1", db, adOpenDynamic, adLockOptimistic Set DataGrid1.DataSource = rs
السلام عليكم ورحمة الله وبركاته
ممكن اعرف الطريقه المتبعه لتسمية الحقول
بالتوفيق ..........
A7med_prof
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
ما فهمت قصدك أخي لكن أعتقد المرفق موضح ذلك والكود ايضاً
الأخ الفاضل ...
غير الكود الموجود فى حدث (Command2_Click) إلى
rs.AddNew rs![الرقم1] = Val(Text1.Text) rs![الرقم2] = Val(Text2.Text) rs.Update MsgBox "تم الحفظ بنجاح", , "حفظ"
لأنك فى (Form_Load) قمت بفتح الجدول بالجملة
rs.Open "select no1 as الرقم1,no2 as الرقم2 from table1", db, adOpenDynamic, adLockOptimistic
وبالتالى فإى تعامل بعد ذلك مع (no1) لابد أن يكون بالأسم (الرقم1) و (no2) لابد أن يكون بالأسم (الرقم2)، أى بدلاً من استخدام:
rs![no1] = Val(Text1.Text) rs![no2] = Val(Text2.Text)
أستخدم
rs![الرقم1] = Val(Text1.Text) rs![الرقم2] = Val(Text2.Text)
شكراً
تم تعديل هذه المشاركة بواسطة Eng. Usama El-Mokadem في 3 مايو 2007 في 13:14
Nothing is impossible, the word impossible itself says that: I M - Possible
السلام عليكم ورحمة الله وبركاته
اسف اخي لم اخذ في بالي الملف المرفق .
وهذا مرفقك بعد التعديل ............
المشكله سببها : كما وضح الاخ اسامه
بالتوفيق.................
A7med_prof
تم تعديل هذه المشاركة بواسطة A7med_prof في 3 مايو 2007 في 12:26
اقتباسآسف الدخول متقطع هذه القتره
اقتباس[يمين]
.[/يمين]
اخر مواضيعي 2007
االمثال مطبق على موقع بورصه سعودي
.
كيف تستخدم الـ OLE Drag Drop ؟ || سورس كود الفاتوره الذكية || سورس كوود مساعدك في حفظ وتسميع كلمات اللغة الانجليزية.
مواضيع مهمه ومطلوبه بكثره VB6
.
بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,.
أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .
.
</
بارك الله فيكم .. وجعله في ميزان حسناتكم..
هذا الموضوع مغلق.