나른한 오후~

<!--METADATA TYPE= "typelib"  NAME= "ADODB Type Library" FILE="C:\Program Files\Common Files\SYSTEM\ADO\msado15.dll"  -->

Set objCmd = CreateObject("ADODB.COMMAND")

With objCmd

        .ActiveConnection = 디비커넥션객체

        .CommandType = adCmdStoredProc

        .CommandText = "프로시저명"

        .Parameters("@입력파라미터").Value         = 값

        .Execute

        result      = .Parameters("@리턴값").Value

End With