alireza_CBoy
سه شنبه 17 آبان 1384, 12:43 عصر
سلام
ایراد این کد چیه؟
Dim da As New OleDb.OleDbDataAdapter
Dim ds As New DataSet
Dim cm As New OleDb.OleDbCommand
cm.CommandText = "select * from Table1"
cm.Connection = OleDbConnection1
cm.CommandType = CommandType.Text
da.SelectCommand = cm
da.Fill(ds, "Table1")
Dim dr As DataRow
Dim dc As DataColumn
dr = ds.Tables("Table1").NewRow
dr.Item("A1") = 3
dr.Item("A2") = 33
ds.Tables(0).Rows.Add(dr)
da.Update(ds)
از da.Update(ds) خطای زیر رو میگیره:
http://tinypic.com/ff0qdg.jpg
ممنون میشم منو راهنمایی کنید...
ایراد این کد چیه؟
Dim da As New OleDb.OleDbDataAdapter
Dim ds As New DataSet
Dim cm As New OleDb.OleDbCommand
cm.CommandText = "select * from Table1"
cm.Connection = OleDbConnection1
cm.CommandType = CommandType.Text
da.SelectCommand = cm
da.Fill(ds, "Table1")
Dim dr As DataRow
Dim dc As DataColumn
dr = ds.Tables("Table1").NewRow
dr.Item("A1") = 3
dr.Item("A2") = 33
ds.Tables(0).Rows.Add(dr)
da.Update(ds)
از da.Update(ds) خطای زیر رو میگیره:
http://tinypic.com/ff0qdg.jpg
ممنون میشم منو راهنمایی کنید...