Re: Oracle proc. from VB in ADO

From: Niall Litchfield <n-litchfield_at_audit-commission.gov.uk>
Date: Fri, 19 Sep 2003 13:55:16 +0100
Message-ID: <3f6afcb5$0$15776$ed9e5944_at_reading.news.pipex.net>


What driver and version are you using? I suspect you need the Oracle ODBC driver and are using the MS provided one.

-- 
Niall Litchfield
Oracle DBA
Audit Commission UK

"Michel R." <michelr_at_hydro.qc.ca> wrote in message
news:moCab.22391$zL3.253860_at_wagner.videotron.net...

> Hello,
>
> I'm trying to call an Oracle stored procedure from a VBA module in ADO
> through an ODBC connection. My procedure just inserts a record based on
the
> 2 parameters. Here's the code:
>
> Private Sub InsertNew()
> Dim objDB As ADODB.Connection
> Dim objcmd As ADODB.Command
> Dim RS As ADODB.Recordset
> Dim prm1 As ADODB.Parameter
> Dim prm2 As ADODB.Parameter
>
> Set objDB = New ADODB.Connection
> Set objcmd = New ADODB.Command
> Set RS = New ADODB.Recordset
>
> objDB.Open "Data Source=ODBC_GDAI; User Id=LUORA1A; Password=LUORA1A;"
> objcmd.ActiveConnection = objDB
> objcmd.CommandType = adCmdStoredProc
> objcmd.CommandText = "Put_JSC" 'the name of my proc
>
> Set prm1 = objcmd.CreateParameter("p_code", adVarChar, adParamInput,
20,
> "7")
> objcmd.Parameters.Append prm1
> Set prm2 = objcmd.CreateParameter("p_desc", adVarChar, adParamInput,
32,
> "Bidon")
> objcmd.Parameters.Append prm2
>
> Set RS = objcmd.Execute
>
> Set RS = Nothing
> Set objcmd = Nothing
> Set prm1 = Nothing
> Set prm2 = Nothing
> Set objDB = Nothing
> End Sub
>
> This should work, according to what I saw all over the web, but it does
not.
> I get this message: ODBC driver does not support the requested properties.
>
> I tried various other methods of calling a procedure with parameters but
> with no luck. I need help! Thank you all!
>
> Michel R.
>
>
>
>
>
Received on Fri Sep 19 2003 - 14:55:16 CEST

Original text of this message