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

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)