Re: ODBC & Transactions?
От | Hiroshi Inoue |
---|---|
Тема | Re: ODBC & Transactions? |
Дата | |
Msg-id | 3BEB330C.551AF8F0@tpf.co.jp обсуждение исходный текст |
Ответ на | Re: ODBC & Transactions? ("Mike Miller" <mmiller@pooka.otago.ac.nz>) |
Ответы |
Re: ODBC & Transactions?
|
Список | 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 по дате отправления: