Office中国论坛/Access中国论坛

标题: 请教新版主一条VBA中的SQL语句 [打印本页]

作者: 江平    时间: 2004-2-25 21:56
标题: 请教新版主一条VBA中的SQL语句
我有一个SQL查询语句:
SELECT 配方原料查询.配方编号 AS 配方编号1, 配方查询第一步1.牌号, 配方查询第一步1.是否有效, Linking('[配方]','配方查询第一步1','[配方编号]= "' & [配方原料查询].[配方编号] & '"','、') AS 配方
FROM 配方原料查询 INNER JOIN 配方查询第一步1 ON 配方原料查询.配方编号 = 配方查询第一步1.配方编号
WHERE (((配方查询第一步1.是否有效)=-1))
GROUP BY 配方原料查询.配方编号, 配方查询第一步1.牌号, 配方查询第一步1.是否有效
ORDER BY 配方查询第一步1.是否有效 DESC;

我现在想把这条SQL语句放到VBA中,但语句中的单引号和双引号很不好处理。特请教!
谢谢!
在线等待
作者: zhuyiwen    时间: 2004-2-26 01:47
Dim strSQL As String

strSQL = "SELECT 配方原料查询.配方编号 AS 配方编号1, 配方查询第一步1.牌号, 配方查询第一步1.是否有效, " & _
     "Linking('[配方]','配方查询第一步1','[配方编号]=""" & [配方原料查询].[配方编号] & """,'、') AS 配方 " & _
     "FROM 配方原料查询 INNER JOIN 配方查询第一步1 ON 配方原料查询.配方编号 = 配方查询第一步1.配方编号 " & _
     "WHERE (((配方查询第一步1.是否有效)=-1)) " & _
     "GROUP BY 配方原料查询.配方编号, 配方查询第一步1.牌号, 配方查询第一步1.是否有效 " & _
     "ORDER BY 配方查询第一步1.是否有效 DESC;"

=====================================
还真麻烦!哈哈……
[此贴子已经被作者于2004-2-25 17:54:13编辑过]






欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3