如何执行带参数的存储过程？

Question

如何执行带参数的存储过程？请举个例子说明。

Answer 1

http://expert.csdn.net/Expert/topic/3001/3001530.xml?temp=.4484217http://expert.csdn.net/Expert/topic/2810/2810745.xml?temp=.3625147自己不可以搜索一下嗎？

Answer 2

Private Sub RunSPButton_Click()
   Dim Qy As New ADODB.Command
   Dim Parm As New ADODB.Parameter
   Dim Parm2 As New ADODB.Parameter
   Dim rs As New  ADODB.Recordset   Set Qy.ActiveConnection = cn
   Qy(0)="1947"
   Qy(1)="1948" 
   Qy.CommandType = adCmdStoredProc
   Qy.CommandText = "AuthorByYearBorn"   Set rs = Qy.Execute(ShowRows)
   ADOGrid1.ShowData rs
End Sub