时间戳

首页 > 解决方案 > 如何在 vba 中的“更新”sql 函数上修复“3464”

vba - 如何在 vba 中的“更新”sql 函数上修复“3464”

问题描述

我试图使用按钮中的“更新”方法修改表中的记录（如果有人知道这样做的更好方法，我会听到），但是当我单击按钮时，我得到一个“3464”错误

我认为问题出在 date() 值上，但我已经把它变成了一个字符串，我还把 ' 和 " 移到了另一个位置，试图更正代码但什么也没有

Dim strSQL As String
Set dbs = CurrentDb()
Dim fca As String
fca = Date

strSQL = "UPDATE Herramientas" & " SET Inventario = '" & y & "' ,Quien_solicita = '" & Me.lblusr.Caption & "' ,Fecha_Salida = '" & fca & "' WHERE Id = ' " & Me.txt_id & "';"

CurrentDb.Execute strSQL

Me.lst_hrm.Requery

我想更新表中的记录，但我得到了这个错误 idk 如何修复它帮助

标签： vbams-access

解决方案

使用Date()并且在数字上不加引号：

Dim strSQL As String
Set dbs = CurrentDb()

strSQL = "UPDATE Herramientas SET Inventario = " & y & ", Quien_solicita = '" & Me.lblusr.Caption & "', Fecha_Salida = Date() WHERE Id = " & Me.txt_id & ";"

CurrentDb.Execute strSQL

推荐阅读