越详细越好,谢谢了

解决方案 »

  1.   

    sql写好了,调试好了,用任何的方法都可以。
      

  2.   

    create proc Test(@id int ,@name varchar(20) output)
    as
    begin
      select @name=customername from customers where customerid= @id
    End
        
        Dim cmd As ADODB.Command
        Dim par1 As ADODB.Parameter
        Dim par2 As ADODB.Parameter
        Set cmd = New ADODB.Command
        cmd.CommandText = "test"
        cmd.CommandType = adCmdStoredProc
        Set par1 = cmd.CreateParameter("a", adInteger, adParamInput, , 3)
        cmd.Parameters.Append par1
        Set par2 = cmd.CreateParameter("b", adVarChar, adParamOutput, 20)
        cmd.Parameters.Append par2
        Set cmd.ActiveConnection = cnDatabase
        cmd.Execute
        Debug.Print par2.Value
        Set cmd = Nothing
      

  3.   

    http://www.ourfly.com/forum/View.aspx?fbId=9&Id=123