emad4000
Member
سلام
من می خوام دوتا کانکشن و دوتا آداپتر و دوتا دیتاست بسازم و با اونا کار کنم
ابتدای برنامه اینو گذاشتم
Imports System.Data
Imports System.Data.OleDb
بعد از شروع کلاس و دستور ارث پذیری فرم هم اینها رو تعریف کردم
Dim WorkDS As New DataSet
Dim WorkerDS As New DataSet
Dim WorkAdapter As OleDbDataAdapter
Dim WorkerAdapter As OleDbDataAdapter
Dim Conn As OleDbConnection
Dim connStr, sqlStr1, sqlStr2 As String
بعد هم توی سابروتین شروع فرمم این دستورا رو گذاشتم
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Database.mdb"
sqlStr1 = "SELECT ID,WorkerID,hour,Dastmozd,Date,Comment FROM WorkList"
sqlStr1 = "SELECT ID,FirstName,LastName,FatherName,CardID,Address FROM WorkerList"
'----------------------------------------------------------
Conn = New OleDbConnection(connStr)
Conn.Open()
WorkDS.Clear()
WorkAdapter = New OleDbDataAdapter(sqlStr1, IfConn1)
WorkAdapter.Fill(WorkDS, "WorkList")
Conn.Close()
'----------------------------------------------------------
Conn.Open()
WorkerDS.Clear()
WorkerAdapter = New OleDbDataAdapter(sqlStr2, Conn)
WorkerAdapter.Fill(WorkerDS, "WorkerList")
Conn.Close()
ولی موقع اجرا برنامه روی دستور یکی مونده به آخری توقف می کنه و پیغام زیر رو میده
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll
من اینا رو قبل از شروع کانکشن دوم گذاشتم
Conn = Nothing
Conn = New OleDbConnection(connStr)
ویا اینکه آداپتر ها رو داخل یه کانکشن تعریف کردم
ویا اینکه دو تا کانکشن متفاوت ساختم ولی بازم فایده نداشت . ولی اگه دستورات تعریف آداپتر دوم رو حذف کنم برنامه کار می کنه . یعنی به آداپتر اولی گیر نمی ده
اگه می دونید مشکلش چیه به منم بگید . کلی علافش شدم
ممنون
من می خوام دوتا کانکشن و دوتا آداپتر و دوتا دیتاست بسازم و با اونا کار کنم
ابتدای برنامه اینو گذاشتم
Imports System.Data
Imports System.Data.OleDb
بعد از شروع کلاس و دستور ارث پذیری فرم هم اینها رو تعریف کردم
Dim WorkDS As New DataSet
Dim WorkerDS As New DataSet
Dim WorkAdapter As OleDbDataAdapter
Dim WorkerAdapter As OleDbDataAdapter
Dim Conn As OleDbConnection
Dim connStr, sqlStr1, sqlStr2 As String
بعد هم توی سابروتین شروع فرمم این دستورا رو گذاشتم
connStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Database.mdb"
sqlStr1 = "SELECT ID,WorkerID,hour,Dastmozd,Date,Comment FROM WorkList"
sqlStr1 = "SELECT ID,FirstName,LastName,FatherName,CardID,Address FROM WorkerList"
'----------------------------------------------------------
Conn = New OleDbConnection(connStr)
Conn.Open()
WorkDS.Clear()
WorkAdapter = New OleDbDataAdapter(sqlStr1, IfConn1)
WorkAdapter.Fill(WorkDS, "WorkList")
Conn.Close()
'----------------------------------------------------------
Conn.Open()
WorkerDS.Clear()
WorkerAdapter = New OleDbDataAdapter(sqlStr2, Conn)
WorkerAdapter.Fill(WorkerDS, "WorkerList")
Conn.Close()
ولی موقع اجرا برنامه روی دستور یکی مونده به آخری توقف می کنه و پیغام زیر رو میده
An unhandled exception of type 'System.Data.OleDb.OleDbException' occurred in system.data.dll
من اینا رو قبل از شروع کانکشن دوم گذاشتم
Conn = Nothing
Conn = New OleDbConnection(connStr)
ویا اینکه آداپتر ها رو داخل یه کانکشن تعریف کردم
ویا اینکه دو تا کانکشن متفاوت ساختم ولی بازم فایده نداشت . ولی اگه دستورات تعریف آداپتر دوم رو حذف کنم برنامه کار می کنه . یعنی به آداپتر اولی گیر نمی ده
اگه می دونید مشکلش چیه به منم بگید . کلی علافش شدم
ممنون
