怎样在ACCESS数据库中使用ADO操作本地数据库表？

SLLSX977824

我在一个ACCESS数据库中使用ADO操作本ACCESS数据库中的“资金发放表”。修改其中的记录。为什么运行时提示错误，应该怎么做？

错误代码如下：

Dim cn As New ADODB.Connection '定义一个Ado连接

Dim rs As New ADODB.Recordset '定义一个Ado记录集

Dim sql As String '定义一个字符串变量

Set cn = CurrentProject.Connection '定义cn等于当前连接

cn.Open

sql = "update 资金发放表 set  实发金额 =  '1000'  where 姓名 = 王五 " '给字符串赋值



cn.Execute sql

zyp

只是用於更新,不用建立記錄集對象"rs"，在"where 姓名=王五"中將王五用單引號括起來試試

coco4y4y

recrodset对象用于返回对表的查询,你只是更新数据库所以没有返回记录集!Dim cn As New ADODB.Connection '定义一个Ado连接

Dim rs As New ADODB.Recordset '定义一个Ado记录集

Dim sql As String '定义一个字符串变量

Set cn = CurrentProject.Connection '定义cn等于当前连接

cn.Open

sql = "update 资金发放表 set  实发金额 =  '1000'  where 姓名 = '王五' " '给字符串赋值cn.Execute sql问一下你的实发金额 怎么用字符串型的???用数值型好些!

ly

如果使用操作查询，应该使用command对象，而不是recordset对象。

再说，你的对象使用完全错误，在看看帮助

[此贴子已经被作者于2004-8-5 16:37:17编辑过]