首页 > 解决方案 > 从访问表单插入到表中

问题描述

我有以下代码:

Private Sub Command134_Click()

    Dim strInsert As String
    Set db = CurrentDb()
    strInsert = "INSERT INTO [SEMP Documentation] (Staff_Name) VALUES " & (Staff_Name.Value) & ");"
    MsgBox (strInsert)

    Debug.Print staffname
    db.Execute staffname, dbFailOnError
End Sub

Staff_Name 是 Microsoft Access 表单上的一个组合框,其中包含 10 个人左右的姓名,每个人都有自己的索引。

消息框有 Staff_Name.Value 调用产生索引而不是实际的文本名称。作为参考,组合框中的值是从表中提取的,其中第一列是员工的索引,第二列是员工的姓名。

用户选择他们是谁。

其次,db.Execute 语句失败;表名是我试图插入的 SEMP 文档 - “Microsoft Access 数据库引擎找不到输入表”

任何帮助

标签: sqlms-accessinsert

解决方案


尝试这个

 "INSERT INTO [SEMP Documentation] (Staff_Name) VALUES ('" & (Staff_Name.Value) & "');"

第二个问题是

db.Execute staffname, dbFailOnError

应该 db.Execute strInsert, dbFailOnError


推荐阅读