VBS 에서는 아래와 같이 처리합니다. 참고하세요~

'상수 선언
Public Const adVarWChar     = 202
Public Const adVarChar         = 200
Public Const adInteger         = 3
Public Const adParamInput     = 1
Public Const adParamOutput     = 2
Public Const adParamReturnValue = 4
Public Const adExecuteNoRecords = &H00000080
Public Const adVariant = 13


Set objCmd = CreateObject("ADODB.Command")
    With objCmd
        .ActiveConnection = objCon_Ora
        .CommandText = "프로시저명"
        .CommandType = 4

         param1 = 100   '넘길변수값
         param2 = 200   '넘길변수값

        .Parameters.Append .CreateParameter("파라미터변수1" , adInteger, adParamInput, , param1)  '입력 파라메터
        .Parameters.Append .CreateParameter("파라미터변수2" , adInteger, adParamInput, , param2)  '입력 파라메터

        Set ObjRs = .Execute

        '데이터 처리

        ObjRs.Close
        Set ObjRs = Nothing
    End With
Set objCmd = Nothing

해결했습니다.

이런 방법도 있었군요

참고 하겠습니다. 감사합니다.