Office中国论坛/Access中国论坛

标题: [求助]一段代码的错误，请高手指教 [打印本页]

作者: darknesseye 时间: 2004-11-24 06:18
标题: [求助]一段代码的错误，请高手指教
Private Sub query()

Dim h As QueryDef

Dim sq As String

Set h = CurrentDb.CreateQueryDef("dddd")

sq="select * form 表1"

h.Execute sq

end sub

为什么运行时光标定在 h.Execute sq 这一行。并提示“数据类型转换错误”

[此贴子已经被作者于2004-11-23 22:18:48编辑过]

作者: NeilChen 时间: 2004-11-24 09:06
为什么不直接用docmd.runsql sq

作者: darknesseye 时间: 2004-11-24 17:56
Private Sub sss()Dim h As QueryDef

Dim i As StringSet h = CurrentDb.CreateQueryDef("dddd")sq = "select A from 表1"DoCmd.RunSQL sq

End Sub还是无法运行，提示需要SQL语句作参数，如果把 sq 改为 "sq" 则提示无效的SQL语句。

作者: hi-wzj 时间: 2004-11-25 21:04
"select * form 表1" 不是一个操作查询。Execute 命令是运行操作查询。

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