Re: ODBC & Transactions? - Mailing list pgsql-odbc

From Hiroshi Inoue
Subject Re: ODBC & Transactions?
Date
Msg-id 3BEB330C.551AF8F0@tpf.co.jp
Whole thread Raw
In response to Re: ODBC & Transactions?  ("Mike Miller" <mmiller@pooka.otago.ac.nz>)
Responses Re: ODBC & Transactions?
List pgsql-odbc
Mike Miller wrote:
>
> > Mumble, can you show us the exact VB code you are using to
> > send these queries? Maybe it can help... (well, it would be
> > excellent if you could post a stripped down test case starting
> > from connection, query execution, etc. that shows the behaviour
> > you are experiencing)
>
> '**********************************************************
>
> Dim adoConnection As ADODB.Connection
> Dim strADOConnection As String
>
> '**********************************************************
>
> Sub ConnectDB()
>
>    ' Create the ADO object
>    Set adoConnection = CreateObject("ADODB.Connection")
>
>    ' Set up the connection string to the database
>    strADOConnection = "DSN=PostgreSQL"
>
>    ' Open the connection
>    With adoConnection
>       .ConnectionString = strADOConnection
>       .Open
>    End With
>
> End Sub
>
> '**********************************************************
>
> Sub DisconnectDB()
>
>    ' Close connection
>    With adoConnection
>       .Close
>    End With
>
>    ' Clean up
>    Set adoConnection = Nothing
>
> End Sub
>
> '**********************************************************
>
> Function SQLCommand(strSQL As String) As Integer
>
>    ' Variables
>    Dim adoCommand As ADODB.Command
>    Dim lngRecordsAffected As Long
>
>    ' Create the ADO command object
>    Set adoCommand = CreateObject("ADODB.Command")
>
>    ' Set the connection, the command and execute it
>    With adoCommand
>       .ActiveConnection = strADOConnection

How about
    .ActiveConnection = adoConnection
?

regards,
Hiroshi Inoue

pgsql-odbc by date:

Previous
From: "Mike Miller"
Date:
Subject: Re: ODBC & Transactions?
Next
From: "Mike Miller"
Date:
Subject: Re: ODBC & Transactions?