首页 > 解决方案 > VBA 上的更新错误。在 ADODB 记录集上执行

问题描述

我正在尝试通过我的文本框中的输入来更新 SQL DB 表。我遇到的问题可以通过下面看到的通用 VBA Sub 看到:

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
Dim rst As ADODB.Recordset
Set rst = New ADODB.Recordset

Dim strSql As String
Dim strADOCon As String

strADOConTechSub = "PROVIDER=SQLOLEDB;Data Source=______;Initial Catalog=______;User ID = _______; Password = ______;Trusted_Connection=Yes"

conn.Open strADOCon

strSql = "SELECT this " & _ 
         "FROM there  " & _
         "WHERE that <> ''"

Set rst = conn.Execute(strSql)

rst!this.Value = Me.Textbox1

conn.Close

我收到错误消息;

运行时错误“3251”:

当前记录集不支持更新。这可能是提供者或所选锁类型的限制。

任何帮助将不胜感激。

标签: sqldatabasevbams-accessadodb

解决方案


推荐阅读