psqlodbc driver issue
am 11.05.2009 11:33:55 von Zahid Khan--0-1927574124-1242034435=:99730
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
Hi,
=A0I
am using psqlodbc driver with VB.and when i fetch data from table (
text column ) i get the result but when i try to get same column 2nd
time then i get the empty value.Following is the code sample=20
=A0 Dim L_Result=A0 As rdoResultset
=A0 Dim SQL As String
=A0 SQL =3D "SELECT col1 FROM test"
=A0 Set L_Result =3D RDOConnect.OpenResultset(SQL, 3, rdConcurReadOnl=
y)
=A0 i =3D 0
=20
=A0 'Remark: The L_Result("col1") value missing in while loop second =
interation
=A0 While i <> 5
=A0 MsgBox "Loop " & i & " >>> " &
L_Result("col1")
=A0 i =3D i + 1
=A0 Wend
Exit Sub
Note:-
at first iterantion of while loop i get the valid value but at the
second iteration of loop i get the empty value.It is only for text
column .
Thanks,
Zahid K.
=0A
--0-1927574124-1242034435=:99730
Content-Type: text/html; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
top" style=3D"font: inherit;"> |
; font-size: inherit; line-height: inherit; font-size-adjust: inherit; font=
-stretch: inherit;" valign=3D"top">Hi,
I
am using psqlodbc driver with VB.and when i fetch data from table (
text column ) i get the result but when i try to get same column 2nd
time then i get the empty value.Following is the code sample
=
Dim L_Result As rdoResultset
Dim S=
QL As String
SQL =3D "SELECT c=
ol1 FROM test"
&nbs=
p; Set L_Result =3D RDOConnect.OpenResultset(SQL, 3, rdConcurReadOnly=
)
i =3D 0
&nbs=
p; 'Remark: The L_Result("col1") value missing in while loop second i=
nteration
While i <> 5 r> MsgBox "Loop " & i & "=
>>> " &
L_Result("col1")
i =3D i + 1=
Wend
Exit Sub
Not=
e:-
at first iterantion of while loop i get the valid value but at the
second iteration of loop i get the empty value.It is only for text
column .
Thanks,
Zahid K.
--0-1927574124-1242034435=:99730--