Try to use ADO

Dim con as ADODB.Connection
set con = new ADODB.Connection
con.Open "DRIVER={PostgreSQL};
                SERVER=ipaddress; port=5432;
                DATABASE=dbname;
                UID=username;PWD=password;"

con.BeginTrans
con.Execute "UPDATE accounts SET balance = balance + 100.00
                     WHERE acctnum = 12345"
con.Execute "UPDATE accounts SET balance = balance - 100.00
                     WHERE acctnum = 7534"
Con.CommitTrans


---------------------------(end of broadcast)---------------------------
TIP 3: Have you checked our extensive FAQ?

               http://www.postgresql.org/docs/faq

Reply via email to