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