Sql 在VBA ACCESS中更新表

我需要帮助解决vba更新语句的问题：

在我的表单中，我有一个单击表单，当我单击它时，执行以下过程：

Dim strSQL As String
 Dim rst As New ADODB.Recordset

  strSQL = "UPDATE dbo.Firma_test SET Fax = " & Me![subforma_companie].Form!fax & _
          "[E-mail] = " & Me![subforma_companie].Form!email & _
          "WHERE Company_Code = " & Me![subforma_companie].Form!Cod

---

当我执行时，我告诉我他没有看到电子邮件字段，我能做什么？？？

在

WHERE

子句之前需要一个空格：

strSQL = "UPDATE dbo.Firma_test SET Fax = " & Me![subforma_companie].Form!fax & _
      ", [E-mail] = '" & Me![subforma_companie].Form!email & _
      "' WHERE Company_Code = " & Me![subforma_companie].Form!Cod

---

您也可以考虑某种形式的防止<代码> SQL注入<代码>，以防用户进入<代码>下拉表DB。FrimaMyTest< <代码> >代码> <代码>

您也可能希望引用字符串，比如电子邮件。mail@Sergio-检查我的编辑您将需要额外的

，

在发送电子邮件之前，如ta.speot.is声明，请添加电子邮件的报价感谢Darren的工作