请教SQL查询结果赋给变量问题

hlrong

下面是在EXCEL中用ADO查询的语句：

bh = "531199930008180" sqlstr = "SELECT @xx=sum(金额) FROM 表1 WHERE 编号=""" + bh + _ """ AND 日期>=#" + Format(Year(Date), "0") & "/1/1# ;"

此代码的原意为：从"表1"中查询“编号”为"531199930008180"和日期大于”2004/1/1"的“金额总计”，因只有一个值，我想把查询的这个值赋给变量xx,请问在ＡＤＯ中不用Recordset对象该如何实现？

hlrong

感谢版主的快速回复。

因为上面的代码只是获取一个值，基本思路：

1。就用ADO方法，ADO+SQL语句获取单一值该如何操作？

2。如果用ADO的recordset得用好几条语句才能得到最终结果，那么换一种思路，改用ODBC加载宏的函数SQL.REQUES或 VBA 中函数 SQLRequest来取值，又该如何写代码？

[此贴子已经被作者于2004-10-3 11:28:17编辑过]

hzg7818

第1个问题:

dim rst as new recordset

rst.open......

rst(0)'就是这个唯一值

第2个问题中我没有用过odbc加载宏，不知如何操作，另外vba中的库函数好像没有sQLrequest啊

hzg7818

不用recordset？ado主要靠他来操作啊！connection、command等对象关于数据也都是要返回recordset来执行的，为什么要不用呢？