المشاركات : 5
المواضيع 1
الإنتساب : Oct 2014
السمعة :
1
الشكر: 0
تم شكره 110 مرات في 2 مشاركات
السلام عليكم ورحمة الله وبركاته
اذا كنت فهمت سؤالك
اول حاجة تعمل موديول جديد وتحط فيه :
كود الربط بين قاعدة البيانات والفيجوال
Public constr As String = ("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & Application.StartupPath & "\account.mdb")
الكونيكشن
Public con As New OleDbConnection(constr)
والداتا ادابتر
Public da As New OleDbDataAdapter
والداتا سيت
Public ds As New DataSet
بعد كده نروح علي الفورمة اللي انت عاملها وتكتب جوا ال بابلك صب
كود لو قاعدة البيانات مفتوحة يبقي تقفلها
if con.state=1 then con.close
نعرف متغير
dim sqlstr as string="select * from اسم الجدول جوا القاعدة "
بعد كده نفتح قاعدة البيانات
con.open
بعد كده نملي الداتا اداباتر بقاعدة البيانات
da.fill(ds,"اسم الجدول جوا قاعدة البيانات ")
بعد كده نقفل القاعدة
con.close
اتمنى انى اكون افدت حضرتك لاني مبتدأ لسه والله المستعان
اخوك ممدوح