Office中国论坛/Access中国论坛

标题: [求助]有关保存记录时，弹出 INSER INTO 错误的问题。 [打印本页]

作者: aabb33j 时间: 2006-9-20 00:57
标题: [求助]有关保存记录时，弹出 INSER INTO 错误的问题。
当为“保存记录”按钮写完代码后，点击保存记录，然后弹出“INSERT INTO”错误。

代码如下：

Private Sub 保存记录_Click()
On Error GoTo Err_保存记录_Click
'判断“日期”等文本框是否为空
If IsNull(Me![日期]) = True Then
      '弹出提示“日期”文本框不可以为空信息
      MsgBox "请输入“日期”，它不可以为空!", vbOKOnly, "输入“日期”"
      '把光标置于“货商ID”文本框内
      Me![日期].SetFocus
ElseIf IsNull(Me![付款单位]) = True Then
      MsgBox "请输入“付款单位”，它不可以为空!", vbOKOnly, "输入“付款单位”"
      Me![付款单位].SetFocus
ElseIf IsNull(Me![金额]) = True Then
      MsgBox "请输入“金额”，它不可以为空!", vbOKOnly, "输入“金额”"
      Me![金额].SetFocus
ElseIf IsNull(Me![开票价格]) = True Then
      MsgBox "请输入“开票价格”，它不可以为空!", vbOKOnly, "输入“开票价格”"
      Me![开票价格].SetFocus
ElseIf IsNull(Me![经办人]) = True Then
      MsgBox "请输入“经办人”，它不可以为空!", vbOKOnly, "输入“经办人”"
      Me![经办人].SetFocus
Else
      '为保存计划“查询语句”字符变量赋值
      STemp = "INSERT INTO 财务回款信息表"
      STemp = STemp & "( 日期,付款单位,金额,开票价格,经办人,今日总回款,备注)"
      STemp = STemp & "VALUES ('" & Me![日期] & "','" & Me![付款单位] & "',"
      STemp = STemp & "'" & Me![金额] & "','" & Me![开票价格] & "',"
      STemp = STemp & "'" & Me![经办人] & "','" & Me![今日总回款] & "',,'" & Me![备注] & "')"
      '使用DoCmd对象的RunSQL方法执行查询
      DoCmd.RunSQL STemp
      '刷新“财务表子窗体”子窗体
      Me![财务回款表子窗体].Requery
End If
Exit_保存记录_Click:
Exit Sub
Err_保存记录_Click:
MsgBox Err.Description
Resume Exit_保存记录_Click
End Sub

“财务回款信息表”为“对象－－表”中的表格。

财务回款表——为“对象——窗体”中的，此窗体含有一个子窗体。

不知道说清楚了没有，我刚学ACCESS，呵呵，大家见谅。

希望大家给予解决，谢谢！！

作者: aabb33j 时间: 2006-9-20 01:48
将 STemp = "INSERT INTO 财务回款信息表"
中的“财务回款信息表”更换名字为“财务信息表”也不行啊。

这是怎么回事，语法应该没有错误啊。

怎么老提示 “INSERT INTO” 语法错误啊。

作者: andymark 时间: 2006-9-20 04:27
日期类型的用两边加#，数字型的不需要加'

try:

STemp = "INSERT INTO 财务回款信息表"
      STemp = STemp & "( 日期,付款单位,金额,开票价格,经办人,今日总回款,备注)"
      STemp = STemp & "VALUES (#" & Me![日期] & "#,'" & Me![付款单位] & "',"
      STemp = STemp & "" & Me![金额] & "," & Me![开票价格] & ","
      STemp = STemp & "'" & Me![经办人] & "'," & Me![今日总回款] & ",," & Me![备注] & ")"

作者: aabb33j 时间: 2006-9-20 04:38
谢谢斑竹。

我把代码，全删除了，重新写了一遍，和开始的一样，居然没有问题了，晕死。

可能哪个地方多了空格什么的，反正很晕。

另外，感谢您的回答。

辛苦了。

谢谢。

另外，能推荐一本书么，最好不要全是如何操作ACCESS的，带上编程的知识在里面。

谢谢。

作者: andymark 时间: 2006-9-20 04:50

以下是引用aabb33j在2006-9-19 20:38:00的发言：

另外，能推荐一本书么，最好不要全是如何操作ACCESS的，带上编程的知识在里面。

谢谢。

《 Access 2002 开发实用全书》电子工业出版社

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)