Re: ODBC & Transactions?

Поиск
Список
Период
Сортировка
Искать
От
Hiroshi Inoue
Тема
Re: ODBC & Transactions?
Дата
Msg-id
3BEB330C.551AF8F0@tpf.co.jp
Список
Дерево обсуждения
ODBC & Transactions? "Mike Miller" <mmiller@pooka.otago.ac.nz>
Re: ODBC & Transactions? Tom Lane <tgl@sss.pgh.pa.us>
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 по дате отправления
От: Mike Miller
Дата:
Сообщение: Re: ODBC & Transactions?
От: Mike Miller
Дата:
Сообщение: Re: ODBC & Transactions?
FAQ