ADO with postgreSQL

Hi,

Thank you for the previous help (INNER BETWEN MORE THAN ONE DATABASES).

In the Visual Basic 6.0:
Dim dbConn as Connection, rs as recordset, strSQL as string, strConn as string

strConn = "Provider=MSDASQL.1;Extended Properties=""DRIVER={PostgreSQL};DATABASE=MyDataBase;SERVER=MyServer;PORT=5432;ReadOnly=0;Protocol=6.4"""

set dbConn = new connection
dbConn.CursorLocation = adUseServer
dbConn.Open strConn, "MyUser", "MyPasswd"

strSQL = "select * from table1 where id = 1234"
set rs = new recordset
rs.open strSQL, dbConn, adOpenDynamic, adLockBatchOptimistic

In table1 the field 'field1' is of type 'money'

The next command
rs!field1 = ccur(form1.field1.text)
rs.update

cause the following message:
ERROR: Attribute 'field1' is of the tupe 'money' but expression is of type 'float8'.
You will need to rewrite or cast the expression.

My PostgreSQL version is 7.1.
How I do to work in 'ODBC ambient' with no large changes ?

Silvio
2000Info