= 2007-03-06 14:42 >>> Hello=20 i have a column N_GEN in postgreSql defined as text. In this coloumn = i insert a number 10 N_GEN (text) =3D 10=20 on error resume next Set oRs =3D oConn.Execute("SELECT N_GEN FROM MyTable ORDER BY = N_GEN DESC") If err <> 0 then 'If table not found GetFieldValue =3D "1" else GetFieldValue =3D oRs("N_GEN") + 1 End If But it doesn't add the 1 to my N_GEN How can i set the Recordset to convert the string to a number and = then add 1 to it?? Shavonne Wijesinghe http://www.studioform.it ------=_NextPart_000_01D5_01C76006.FF7CAEA0 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable

i figured it out

Set oRs =3D oConn.Execute("SELECT N_GEN = FROM " &=20 MyTable & " ORDER BY N_GEN::INT DESC")

thanks to everyone

----- Original Message -----
From:=20 Shavonne Marietta = Wijesinghe=20
To: pgsql-sql@postgresql.org =

Sent: Tuesday, March 06, 2007 = 3:32=20 PM

Subject: Re: [SQL] convert to a = string

when i try the

set oRs =3D=20 oConn.Execute("SELECT N_GEN::int FROM MyTable ORDER BY N_GEN DESC")=20

it returns 1 and for the rest i doens't = change. alsways=20 10

:(

----- Original Message -----
From:=20 Bart Degryse
To: pgsql-sql@postgresql.org =

Sent: Tuesday, March 06, 2007 = 2:54=20 PM

Subject: Re: [SQL] convert to = a=20 string

I assume GetFieldValue is the name of a VB function or = property=20 get?

Try either

  Set oRs =3D = oConn.Execute("SELECT=20 N_GEN::int FROM MyTable ORDER BY N_GEN DESC")

or

   GetFieldValue =3D=20 cint(oRs("N_GEN")) + 1

or

   GetFieldValue =3D=20 clng(oRs("N_GEN")) + 1

In the last two cases make sure that = the=20 function or property get returns an int or long

Also remember that if oRs("N_GEN") = is NULL the=20 sum will also be NULL

>>> "Shavonne Marietta=20 Wijesinghe" <shavonne.marietta@studioform.it> 2007-03-06 14:42 = >>>
Hello

i have a = column N_GEN=20 in postgreSql defined as text. In this coloumn i insert a number=20 10

N_GEN (text) =3D 10

on error resume = next
  Set oRs =3D=20 oConn.Execute("SELECT N_GEN FROM MyTable ORDER BY N_GEN=20 DESC")
  If err <> 0 then 'If table not=20 found
   GetFieldValue =3D=20 "1"
  else
   GetFieldValue =3D = oRs("N_GEN") +=20 1
  End If

But it doesn't add the 1 to my N_GEN
How can i set the = Recordset to=20 convert the string to a number and then add 1 to it??

Shavonne Wijesinghe
http://www.studioform.it

------=_NextPart_000_01D5_01C76006.FF7CAEA0--