在VBA中给存储过程传递参数？

wangpeng692

点击comfahuo按钮后
1 打开存储过程fahuo
2 将本窗体上的［起始日期］、［终止日期］、［销售员］传递给存储过程 “fahuo"
3 打开的存储过程fahuo输出为EXCEL

主要目的是将符合该条件的数据导出到EXCEL
在论坛里搜索了一下，收获不是很大。。。
Private Sub Comfahuo_Click()
On Error GoTo Err_Comfahuo_Click
    Dim stDocName As String
    stDocName = "fahuo"
    'me![起始日期]
    'me![终止日期]
    'me![销售员]
   
    DoCmd.OpenStoredProcedure stDocName, acViewNormal
    DoCmd.RunCommand acCmdOutputToExcel
    DoCmd.Close
Exit_Comfahuo_Click:
    Exit Sub
Err_Comfahuo_Click:
    MsgBox Err.Description
    Resume Exit_Comfahuo_Click   
End Sub