vb.net中如何实现向access中插入一条记录？
下列代码有错吗？这是别人给我的代码，可以运行成功，但是我换了一个数据库和数据表，把代码中相应的部分改过之后却运行不成功，为什么？我是了好多遍都不行，急死了！请高手帮帮忙！谢谢！
Dim ex As IntegerOleDbConnection1.Open()
OleDbDataAdapter1.InsertCommand.CommandText = "insert into 计01B104(姓名04,性别04,出生年月04,住址04) values('" & Trim(TextBox1.Text) & "','" & Trim(TextBox2.Text) & "','" & Trim(TextBox3.Text) & "','" & Trim(TextBox4.Text) & "')"
Try
ex = OleDbDataAdapter1.InsertCommand.ExecuteNonQuery()
Catch
MsgBox("不能插入相同的记录")
End Try

DataSet11.Clear()
OleDbDataAdapter1.Fill(DataSet11)
OleDbDataAdapter1.Update(DataSet11)
OleDbConnection1.Close()

什么错误得说出来呀!

你换了数据库.那么你的连接也得换呀

我觉得用OleDb.OleDbCommand就可以了
你试试这个
Dim objConn As New OleDb.OleDbConnection
Dim objCmd As New OleDb.OleDbCommand
objConn.ConnectionString=strConn '你的连接
objCmd.CommandText=sqlCommand '你的SQL命令
objCmd.Connection=objConn
objConn.Open()
objCmd.ExecuteNonQuery()

我在我的程序中可以插入记录。
其中最后一句
objCmd.ExecuteNonQuery()

也可以用DataAdapter的InsertCommand.ExecuteNonQuery()进行插入.
你遇到错误估计94修改数据库后
1.连接字符串没写对
2.SQL的INSERT写错了, 看看字段,数据类型,限制这些方面 检查一下