小编Mat*_*iaz的帖子

前言：我使用 SQL Server 2008 R2 后端和 MS Access 2007 作为前端

我有一个类模块，它可以从 SQL Server 返回我想要的任何 ADO 记录集。然后我可以将其分配给任何表单RecordSource属性。

问题是，当我尝试编辑字段时，状态栏中显示“此表单是只读的” 。我希望表格可以编辑。

我有两种形式

1. 表单实体
2. 表单实体编辑

FormEntitiesEdit 表单不使用类模块。相反，所有代码都在表单本身中。

类模块的目的是避免冗余，只是能够使用类模块轻松地从 SQL Server 获取记录集。

首先是我的全局模块

    '默认错误消息。'eh' 代表错误处理程序
    公共 eh 作为字符串

    '通用的全局变量
    公共连接作为 ADODB.Connection
    公共 rs 作为 ADODB.Recordset
    公共com作为ADODB.Command

其次是类模块（名称为cADO）。该类模块使用上面的conn连接对象

    选项显式

    私有常量 CONST_LockType = 3
    私有常量 CONST_CursorType = 1
    私有常量 CONST_CursorLocationServer = 3
    私有常量 CONST_CursorLocationClient = 2

    私有 m_Recordset 作为 ADODB.Recordset
    '对于公共记录集功能
    私有cSQL$
    '******************************************************** **********************
    公共函数 cGetRecordset(ByRef sql) 作为 ADODB.Recordset …