如何利用带参数的存储过程导出EXCEL文件

小华　发表于：2014-05-17 18:02:26 　

我在窗体上放了一个文本框“批次号”，一个“导出EXCEL”按钮，目的是按批次号导出数据到EXCEL表格。导出的数据源是一个存储过程，名为"cx集采对接导出"，该存储过程带一个输入参数“批次号=@pch”。在“导出”按钮里写上：

Dim adocomm As New ADODB.Command
Set adocomm.ActiveConnection = CurrentProject.Connection
adocomm.CommandText = "cx集采对接导出"
adocomm.CommandType = 4
adocomm.Parameters.Item("@pch").Value = ““ & me!批次号 &””

adocomm.Execute

DoCmd.OutputTo acStoredProcedure, "cx集采对接导出", "MicrosoftExcelBiff8(*.xls)", "", False, "", 0

set adocomm = Nothing

结果弹出一个对话框要求输入参数pch,说明在导出过程中要调用"cx集采对接导出"，而参数并没有传递进去，请问如何解决，谢谢！

或者有没有其他的办法？

Top

李制樯发表于：2014-05-17 21:01:12

'建立输入参数

Set parInput2 = cmdObject.CreateParameter

parInput2.Name = "Para2" '

parInput2.Direction = adParamInput '

parInput2.Type = adDate '

parInput2.Value = "2014/5/5" '

cmdObject.Parameters.Append parInput2

Top

总记录：1篇页次：1/1 9 1 :

Access交流中心

如何利用带参数的存储过程导出EXCEL文件