如何用ADO 修改数据?

zhengjialon

rs.Fields("f5") = 1

的后面要加一句：rs.update吧

zhengjialon

你的代码贴全了就是这样啊？那少了：        Dim con As Object

        Set con = Application.CurrentProject.Connection'或者改成其它的数据库连接

        '打开记录集没有数据库连接：        rs.Open stSql, con, 3,3

zhengjialon

以下是引用sunredday在2004-7-12 12:25:35的发言：



rs.Open "select 报价表.* from 报价表"

一个从该表而来的查询是窗体的数据源,该窗体开着,就是当前窗体

这样也可以的，你只要用RecordsetClone的属性就行了。