تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ربط فيجول بيسك بقاعدة البيانات
#1
Imports System.Data, System.Data.OleDb
----------------------------------------------------------
Public Class Form1
    Dim constr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\DataBase.mdb"
    Dim Con As New OleDbConnection(ConStr)
    Dim DataSet1 As New DataSet
--------------------------------------------------------------------------------------------------------------------------------------------------------
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\hhhhh\Desktop\salmon.accdb"
    End Sub
--------------------------------------------------------------------------------------------------------------------------------------------------------

ذزر الاضافة هل الكود صيح لانه لا يستجيب معي  من خلال رسالة تفيد error in Insert into statement  l ;l كما موضح بل الكتابة باللون الاحمر  
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Con.Open()

        'Try


        Dim cmdinser As New OleDbCommand
      ححح  cmdinser.Connection = Con
        cmdinser.CommandText = "INSERT INTO person (txt_id,txt_name,txt_nanb,com_tp,txt_ph,com_cou,txt_fa,txt_are,com_fa,com_fs,txt_po,com_pty,txt_su,txt_fee,txt_fom,txt_ado1,txt_ado2,DateTimePicker1.).values('" + txt_id.Text + "','" + txt_name.Text + "','" + txt_nanb.Text + "','" + com_tp.Text + "','" + txt_ph.Text + "','" + com_cou.Text + "','" + txt_fa.Text + "','" + com_fs.Text + "','" + txt_po.Text + "','" + com_pty.Text + "','" + txt_su.Text + "','" + txt_fom.Text + "','" + txt_ado2.Text + "'," + txt_ado2.Text + "','" + txt_date.Text + ")"
         cmdinser.ExecuteNonQuery()
        MsgBox("تمت الاضافة بنجاح")

        'Catch ex As Exception
        '    MessageBox(ex.Message.ToString)

        'End Try

        Con.Close()

    End Sub
الرد }}}}
تم الشكر بواسطة:
#2
ممكن ترفق مثال مصغر للتوضيح أكثر
 

"" بارك الله لكل من استفاد و أفاد بعلمه ""
hamada salah
الرد }}}}
تم الشكر بواسطة:
#3

.rar   fkh.rar (الحجم : 409.34 ك ب / التحميلات : 64) اشكرك جزيل الشكر اخي الكريم hamada salah على الاهتمام
هو برنامج لاحصاء وحصر التصديقات في ادارتنا انشات قاعدت بيانات اكسس وفورم بالبيانات بالفيجول بيسك 2010 فتحت قاعدة البيانات بالاكواد لكن
ذر اضافة لا يستجيب بادخال البيانات الى القاعدة بالرغم من وضع الكود ومراجعته اكثر من مره نرجو المساعدة ان امكن
سارفق لك جزء من البرنامج .....
نرجو المساعدة ..... بااارك الله فيك وفي والديك
الرد }}}}
تم الشكر بواسطة:
#4
يا أخي جملة Insert غير صحيحة
وتوجد العديد من الأخطاء والحقول المنسية
تم التصحيح ومرفق المثال بعد التعديل

وفقنا الله واياكم


الملفات المرفقة
.rar   fkh.rar (الحجم : 407.95 ك ب / التحميلات : 78)
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  بحث و إظهار صورة من قاعة البيانات علىPictureBox ahmed_elwerfalli 0 36 29-11-16, 01:34 AM
آخر رد: ahmed_elwerfalli
  [VB.NET] مثال على جلب ارقام من قاعدة البيانات وحفظها في مصفوفة بدر إشتية 4 343 02-11-16, 02:42 AM
آخر رد: Ahmad ahmed
  كيفية الاتصال بقاعدة بيانات Access على الشبكة المحلية warda saeed 7 7,193 27-10-16, 09:53 PM
آخر رد: thevirus
  استفسار حول طريقتي في قاعدة البيانات صبري زينوبي 0 76 29-09-16, 04:35 PM
آخر رد: صبري زينوبي
  ربط فجول بيسك مع php محمد غراب 4 226 16-09-16, 05:35 PM
آخر رد: atefkhalf2004
  تسمية قاعدة البيانات قبل انشائها aiman 3 167 15-09-16, 09:12 PM
آخر رد: Abu Ehab
  [Acces2003] المساعدة في كود لحذف البيانات من الاستعلام محمد خلف زكي 2 138 28-08-16, 11:24 AM
آخر رد: محمد خلف زكي
  [VB.NET] الفيجوال بيسك لا يحفظ البيانات محمد خلف زكي 1 214 02-08-16, 05:54 AM
آخر رد: سعود
  لماذا لايتم حفظ الثواني مع باقي القيم الى قاعدة البيانات؟ سعود 2 383 01-08-16, 11:15 AM
آخر رد: أبوبكر سويدان
  مساعدة بحفظ محتوى داخل combox داخل قاعدة البيانات او فكرة مقاربه المثال مرفق رهف العريفي 24 730 17-06-16, 03:05 AM
آخر رد: رهف العريفي

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


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