用OdbcCommandBuilder:
Dim strConnectionString As String = ""
Dim strSQL As String = ""
Dim objConnection As New OdbcConnection(strConnectionString)
Dim objCommand As New OdbcDataAdapter(strSQL, objConnection)
Dim objCommandBuilder As New OdbcCommandBuilder(objCommand)
然后使用objCommand填充DataSet,对数据进行处理以后就可以用
objCommand 的Update方法来更新数据库里的数据了。