ACCESS用窗体按钮向数据表添加记录

2025-03-11 14:51:06

推荐回答（1个）

回答1：

strSql = "INSERT INTO 10-收样(收样单编号,收样人姓名,收样日期, 客户,送样联系人) "
strSql = strSql & "VALUES('"
strSql = strSql & [Forms]![样品流转-收样]![收样单编号]
strSql = strSql & "','" & [Forms]![样品流转-收样]![收样人姓名]
strSql = strSql & "‘,#" & [Forms]![样品流转-收样]![收样日期]
strSql = strSql & "#,'" & [Forms]![样品流转-收样]![客户]
strSql = strSql & "’,‘" & IIf(IsNull([Forms]![样品流转-收样]![送样联系人]), "Null", "'" & [Forms]![样品流转-收样]![送样联系人] & "'")
strSql = strSql & "’)"