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