how to connect/use oracle store procedure in VB

[tkyap]

Dear All
how to connect/use oracle store procedure in VB??

 

[Phathi]

Hi,


'How to call a function in oracle (and return a value)

'call function ORA_FUNC

strSQL = "{?=call ORA_FUNC ('" & strVar1 & "','" & _
         strVar2 & "')}"

' use the initialised command object

objCMD.ActiveConnection = OraDb
 [/code=]
[COLOR=green] ' set the properties of the command
 [/color]
 [code]
OraDb.BeginTrans
    blnTrans = True
    With objCMD
        .CommandText = strSQL
        .CommandType = adCmdText

' set the return value of the procedure

        Set objParam = .CreateParameter("RETURN_VALUE", _
                       adVarChar, adParamReturnValue, 500)
       .Parameters.Append objParam

' run the stored procedure

       .Execute

' extract the return value

       strErrReturned = .Parameters("RETURN_VALUE").Value
    End With
Set objCMD = Nothing

'How To Call A Stored Procedure in Oracle

'Call Stored Proc oracleprocname

strSQL="BEGIN oracleprocnname(inVar,inVar2); End;"

OraDB.execute strSQL

Ciao
Phathi >:O>

 

[Phathi]

Hi,


'How to call a function in oracle (and return a value)

'call function ORA_FUNC

strSQL = "{?=call ORA_FUNC ('" & strVar1 & "','" & _
         strVar2 & "')}"

' use the initialised command object

objCMD.ActiveConnection = OraDb

' set the properties of the command

OraDb.BeginTrans
    blnTrans = True
    With objCMD
        .CommandText = strSQL
        .CommandType = adCmdText

' set the return value of the procedure

        Set objParam = .CreateParameter("RETURN_VALUE", _
                       adVarChar, adParamReturnValue, 500)
       .Parameters.Append objParam

' run the stored procedure

       .Execute

' extract the return value

       strErrReturned = .Parameters("RETURN_VALUE").Value
    End With
Set objCMD = Nothing

'How To Call A Stored Procedure in Oracle

'Call Stored Proc oracleprocname

strSQL="BEGIN oracleprocnname(inVar,inVar2); End;"

OraDB.execute strSQL

Ciao
Phathi >:O>

 

[SLAbel]

Hello,

* What do you want to do?
* Do you want to insert/update/delete row(s)?
* Do you want to retrieve a recordset back from the Procedure?
* What version of ORACLE?
* What version of ADO?

scott #-)

 

[tkyap]

hi SLAbel, i want to manipulate data in oracle, may be insert or update, it will return a boolean variable to indicate the success or fail of transaction,
oracle 8,