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
