Question

我一直在使用ADODB进行SQL查询以返回数据并将其从记录集复制到工作簿一段时间，新任务是更新记录但我不知道如何更新记录。

这是我的代码示例：

Dim con As ADODB.Connection
Dim rec As ADODB.Recordset

Set con = New ADODB.Connection
Set rec = New ADODB.Recordset

Dim sql As String

With con
    .Provider = "MSDASQL"
    .ConnectionString = "DSN=ukfast"
    .Open
End With

sql = "UPDATE crm_clients " & _
      "SET cheque_number = '" & chqNo & "' " & _
      "WHERE id = '' "

对于选择数据，它就像recordset.copyFromRecordset一样简单，但我不知道如何将更新推送回数据库。我尝试了.update方法，但这只适用于记录集本身而不是数据库。我也寻找某种执行方法，但是做得很短。

使用VBA更新记录的正确方法是什么？

Answer 1

您可以使用连接对象的Execute方法：

con.Execute(sql)

使用VBA ADODB连接更新SQL数据库

1 个答案: