如何用VB的代码使用追加查询

Question

我的Access中的查询名称为"test",内容为:
INSERT INTO 表2 ( 字段1 )
SELECT 表1.字段1
FROM 表1;在Access运行时追加成功,但如何用VB的代码使用查询名称(不是将test的sql语句直接写入代码中)使她运行呢

Answer 1

在vb中运行，要注意字段的数据类型如：字符型 要用 ''  括起来
    日期时间要用 ＃＃
    等等仔细看看msdn或者access的帮助你就知道了

Answer 2

dim strSQL As Sting 
strSQL="Select * From tabble"cnn.execute strsql

Answer 3

是想用vb调用在Access中的查询"test"吧？

Answer 4

对不起，我没说清楚，我使用如下代码
db.Execute "select * from  test"
但执行时出错：
"动作查询不能作为行的来源"

Answer 5

RUKYO理解正确，是想用vb调用在Access中的查询"test",咋办?

Answer 6

假设你的test是第一个查询。Dim db as DAO.database
Dim rs As DAO.RecordsetSet db = OpenDatabase(App.Path & "\" & "AAA.mdb")
Set rs = db.QueryDefs(0).OpenRecordset
MsgBox rs.Fields(0).Value测试ok。

Answer 7

也可写成：Set rs = db.QueryDefs("test").OpenRecordset
MsgBox rs.Fields("name").Value结果一样的,好象更能直观一点。