abdoawad كتب :قمت بانشاء قاعدة بيانات اسمها db1 وكلمة السر الخاصة بها هي tel2789942 ولكن عند تنفيذ البرنامج يظهر رسالة خطأ فما هو سبب رسالة الخطأ
حاول تجنب وضع اكواد في حدث اقلاع الفورم او في منطقة انشاء اعضاء الفورم
غالبا السبب هو connection string
لا تستخدم application.startuppath في منطقة تكوين اعضاء الفورم
ولو كنت ستعرف ال connection string في هذه المنطقة فاستخدم بدلا من ذلك
كود :
Public connection_string As String = "Data Source=|DataDirectory|db1.mdb"
واستخدم ال break points اثناء عملية debugging لتعرف متى حدث الخطا
Imports System.Data ' فضاء الاسماء Imports System.Data.OleDb Public Class Form1 Public ConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & _ Application.StartupPath & "\db1.mdb ;user id=admin ; jet oledb:database password=tel2789942 ;" Public CON As New OleDbConnection(ConStr) Public DS As New DataSet Public SQLstr As String = "SELECT * FROM table1 "
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try Dim DataAdapter1 As New OleDbDataAdapter(SQLstr, CON) CON.Open() DS = New DataSet() DataAdapter1.Fill(DS, "table1") DataGridView1.DataSource = DS.Tables(0) DataGridView1.AllowUserToAddRows = False
CON.Close() Catch ex As Exception MsgBox(ex.Message) End Try End Sub End Class
الخطأ كان في كلمة table حيث انك كنت مسمي الجدول table1 وفي الكود كاتب tabel او tabel1 وهذا خطأ كبير