تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مساعدة من اساتذة الفيجوال بيسك 2008
#1
Exclamation 
السلام عليكم ورحمة الله
منذ فترة وانا اسوي برنامج بلغة الفيجوال بيسك مع قاعدة بيانات أكسس 2010
وسوي فورم لادخال البيانات ولكن عندما أشغل البرنامج يخرج لي خطألم استطع ايجاد حل له
هذا كود زر الحفظ
Dim con As New OleDbConnection("provider = microsoft.ace.oledb.12.0;data source=C:\Users\HP\Desktop\mydb.accdb")
Dim da As New OleDbDataAdapter("INSERT INTO * workles", con)
Dim dt As New DataTable()
If (String.IsNullOrEmpty(TextBox1.Text) AndAlso String.IsNullOrEmpty(TextBox2.Text) AndAlso String.IsNullOrEmpty(ComboBox1.Text) AndAlso String.IsNullOrEmpty(TextBox3.Text) AndAlso String.IsNullOrEmpty(DateTimePicker1.Value) AndAlso String.IsNullOrEmpty(TextBox4.Text) AndAlso String.IsNullOrEmpty(TextBox5.Text) AndAlso String.IsNullOrEmpty(TextBox6.Text) AndAlso String.IsNullOrEmpty(TextBox7.Text) AndAlso String.IsNullOrEmpty(ComboBox2.Text) AndAlso String.IsNullOrEmpty(DateTimePicker2.Value) AndAlso String.IsNullOrEmpty(TextBox12.Text) AndAlso String.IsNullOrEmpty(PictureBox1.Text)) Then
MessageBox.Show("يجب ملئ جميع الحقول")
Return
End If

Dim str As String = String.Format("Insert into workles (الرقم الوطني,الاسم رباعي,الجنس,الجنسية,تاريخ الميلاد,اسم الام رباعي,الحالة الاجتماعية,المؤهل العلمي,التخصص,تاريخ الحصول عليه,مكان الاقامة,رقم الهاتف,البريد الالكتروني,الصورة الشخصية,تاريخ التسجيل بالمنظومة,)valeus ('{0}','{1}','{2}','{3}','#{4}#','{5}','{6}','{7}','{8}','{9}','#{10}#','{11}','{12}','{13}')", TextBox1.Text, TextBox2.Text, ComboBox1.Text, TextBox4.Text, DateTimePicker1.Text, TextBox4.Text, TextBox5.Text, TextBox6.Text, TextBox7.Text, ComboBox2.Text, DateTimePicker2.Text, TextBox12.Text, PictureBox1.Text, DateTimePicker3.Text)
Dim cmd As New OleDbCommand(Str)
cmd.Connection = con
con.Open()
cmd.ExecuteNonQuery()
con.Close()
MessageBox.Show("تم التسجيل بنجاح")
TextBox1.Text = String.Empty
TextBox2.Text = String.Empty
TextBox4.Text = String.Empty
TextBox5.Text = String.Empty
TextBox6.Text = String.Empty
TextBox7.Text = String.Empty
TextBox12.Text = String.Empty

وهذه صورة الخطأ


الملفات المرفقة صورة/صور
   
الرد
تم الشكر بواسطة:
#2
حمل اكسس 2007 أو 2010 أو 2013

انت لديك فقط 2003

تحياتي
الرد
تم الشكر بواسطة:
#3
الاكسس اللي عندي هو 2010
الرد
تم الشكر بواسطة:
#4
هذه المشكلة موجودة في الإصدارات القديمة من الفجوال بيسيك التي قبل 2010

ولحلها غير خصائص المشروع إلى x86
تجدها بعد النقر مرتين على My Project في مستكشف المشروع
بعدها تذهب إلى Compile ويوجد فيها زر اسمه advanced compile options وهناك غير target cup إلى x86

هذه المشكلة موجودة في الإصدارات القديمة من الفجوال بيسيك التي قبل 2010

ولحلها غير خصائص المشروع إلى x86
تجدها بعد النقر مرتين على My Project في مستكشف المشروع
بعدها تذهب إلى Compile ويوجد فيها زر اسمه advanced compile options وهناك غير target cup إلى x86
الرد
#5
(18-02-15, 09:58 PM)ameerah كتب : هذه المشكلة موجودة في الإصدارات القديمة من الفجوال بيسيك التي قبل 2010

ولحلها غير خصائص المشروع إلى x86
تجدها بعد النقر مرتين على My Project في مستكشف المشروع
بعدها تذهب إلى  Compile ويوجد فيها زر اسمه advanced compile options وهناك غير target cup إلى x86


هذه المشكلة موجودة في الإصدارات القديمة من الفجوال بيسيك التي قبل 2010

ولحلها غير خصائص المشروع إلى x86
تجدها بعد النقر مرتين على My Project في مستكشف المشروع
بعدها تذهب إلى  Compile ويوجد فيها زر اسمه advanced compile options وهناك غير target cup إلى x86


شكرا ameerah تم حل المشكلة بارك الله فيك
وجزاك الله ألف خير
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في موقع panels على الفورم ؟؟؟ abdullhadi999 2 63 16-02-19, 02:45 AM
آخر رد: أحمد النجار
Information [VB.NET] مساعدة : حساب الناتج الاجمالي georgos 4 81 15-02-19, 11:35 PM
آخر رد: georgos
  تغيير كلمة المرور في الفيجوال بيسك مع قواعد البيانات عبدالله اااا 4 106 14-02-19, 06:46 PM
آخر رد: عبد العزيز البسكري
  [VB.NET] ربط الفجوال بيسك بمكينة البصمة _M.Nasser 0 63 12-02-19, 08:13 PM
آخر رد: _M.Nasser
  مساعدة بمشكلة مكتبات الوورد و الاكسل محمد خيري 0 41 12-02-19, 12:39 AM
آخر رد: محمد خيري
  تغيير كلمة المرور في الفيجوال بيسك مع قواعد البيانات عبدالله اااا 3 97 11-02-19, 11:39 PM
آخر رد: princelovelorn
  مساعدة هامة احتاج كود يقوم بعمل طباعة تلقائية ل ReportViwer مجرد فتح الفورم mohamedgadain61 1 89 11-02-19, 09:47 AM
آخر رد: mohamedgadain61
  مساعدة في اتمام المشروع georgos 0 78 11-02-19, 01:32 AM
آخر رد: georgos
  مساعدة بخصوص امر show سمير جمال 3 108 07-02-19, 03:53 AM
آخر رد: حريف برمجة
  [VB.NET] مساعدة في كود الحفظ Hamoody 2 97 06-02-19, 02:45 AM
آخر رد: Hamoody

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم