请问如何在程序里调用存在ACCESS里的参数查询
ACCESS中的参数查询在打开时会弹出对话框提示用户输入相应的参数，用户输入参数值后，查询结果才会返回。
现在想要在程序里调用存在ACCESS里的参数查询对象，请问如何做？关键是如何在执行该查询之前，如何在程序里为该查询的参数传值？
另，存好的查询很复杂，不想在代码里重新写一遍，所以想每次调用这个存好的查询。
PS 我用的是ACCESS2003。
貌似找到答案了，以前做过笔记，忘掉了。
谁来接分分？
????
假设所存的查询名叫“查询1”，有一个参数，参数名叫“strA”，则可用以下代码在VBA程序里设置参数并执行给查询：
VB code:
Public Function AppendX()
Dim cmdByRoyalty As ADODB.Command
Dim prmByRoyalty As ADODB.Parameter
Dim rstByRoyalty As ADODB.Recordset
Dim intRoyalty As String
Set cmdByRoyalty = New ADODB.Command
cmdByRoyalty.CommandText = "查询1"
cmdByRoyalty.CommandType = adCmdStoredProc
intRoyalty = Trim(InputBox("输入参数:"))
Set prmByRoyalty = cmdByRoyalty.CreateParameter("strA", adChar, adParamInput, 255)
cmdByRoyalty.Parameters.Append prmByRoyalty
prmByRoyalty.Value = intRoyalty
Set cmdByRoyalty.ActiveConnection = CurrentProject.Connection
Set rstByRoyalty = cmdByRoyalty.Execute
End Function
我来晚了
啊?哈.
自己移动到非技术区结掉算了吧
技术区估�
相关问答：
IsSqlDataBase = 0 '主数据库类型(1=SQL，0=AC)
'===========================================================================
SqlDatabaseName = "ads365" '主数据库名
S ......
哪位大哥有ACCESS数据库 啊？
给小弟一个！
安装OFFICE时选择安装ACCESS
安装OFFICE时选择安装ACCESS
安装办公软件，选择自定义安装，然后选上ACCESS就可以了
office完� ......
我在模块里自定义了一个函数:stradd()
可是在adoquery1.sql.add('select stradd(author) from book');
时提示stradd未定义...
这个问题有什么办法可以解决的吗? 非常感激!
(在A ......
请问各位大师，我现在需要将XML的数据实时的存入到数据库中，我是用asp编的程序，大量们帮忙分析 一下！！！
下面是我的XML文件代码
XML code:
<?xml version="1.0" encoding="utf-8"? ......
