VB2005向Access数据库中添加新记录啊，新手求助贴
Dim SQLstring As String
Dim TableName As String = "ID" '所需连接Table的名称
Con = New OleDb.OleDbConnection
Con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & "C:\Documents and Settings\Administrator\桌面\DataD\DataD\a.mdb" '默认没有权限限制的DataBase
Con.Open()
SQLstring = "SELECT * FROM " & TableName
Da = New OleDb.OleDbDataAdapter(SQLstring, Con)
Ds = New DataSet()
Da.Fill(Ds, TableName)
Dt = Ds.Tables(TableName) '至此，已建立连接，这个比较简单
连接好了，可是写入问题犯难了啊。
我参考 了许多，用了下面一个，但是没用啊
Dim dr As DataRow
dr = Dt.NewRow
dr("Date") = DateTimePicker1.Value
dr("Name") = TextBox1.Text
dr("Address") = TextBox2.Text
dr("rate") = HScrollBar1.Value
dr("source") = ComboBox1.ValueMember
Dt.Rows.Add(dr)
'dr = Dt.NewRow '建立一个行对象
'dr("Name") = TextBox1.Text
'dr("Address") = TextBox2.Text
'Ds.Tables("NO1").Rows.Add(dr)
'Ds.Tables("NO1").AcceptChanges()
Dim TableInsert As New OleDb.OleDbCommand
TableInsert.CommandText = "INSERT INTO NO1(Name,Address) VALUES (TextBox1.Text,TextBox2.Text)"
' 然后用相应的Parameter填补, 更新, 只是这里的Command应该设置的
Da.InsertCommand = TableInsert
求助 vb 数据库 VB2005 access --------------------编程问答-------------------- INSERT INTO NO1([Name],[Address]) VALUES (TextBox1.Text,TextBox2.Text)
这样试试 --------------------编程问答-------------------- TableInsert.ExecuteNonQuery() --------------------编程问答-------------------- 呃，试了下2#的，没用啊
--------------------编程问答-------------------- 急，自己顶一个
--------------------编程问答--------------------
好不容易找到一个相关帖子，却没有得到答案。这个问题的关键是table.Rows.Add(row)添加的新行怎样才能提交给数据适配器的Data Source，有知道的高手么？
顶一下！ --------------------编程问答-------------------- 单就楼主所提问题可以通过修改以下语句实现提交。
原语句：
Dim TableInsert As New OleDb.OleDbCommand
TableInsert.CommandText = "INSERT INTO NO1(Name,Address) VALUES (TextBox1.Text,TextBox2.Text)"
Da.InsertCommand = TableInsert
修改为：
dim insSql$ = "INSERT INTO NO1(Name,Address) VALUES (TextBox1.Text,TextBox2.Text)"
Dim insCmd As New OleDbCommand(insSql,Con)
insCmd.ExecuteNonQuery()
补充：.NET技术 , VB.NET
