marduk2002
Programmer
Hi,
I am using the code below to read a text file .
The problem is that field 40 contains
"5260318470123951"
However when this is read into the Recordset it is read in as
5.26031847012395E+15
Any Ideas on what is going on ?, I need the record to be read exactly as it is in the text file
Thanks
''''''''''code''''''''''''''''
Private Sub getrsValue()
Dim cnSample As New ADODB.Connection
Dim rsSample As New ADODB.Recordset
cnSample.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" _
& "Dbq= C:\;" _
& "Extensions=asc,csv,tab,txt;HDR=NO;" _
& "Persist Security Info=False"
rsSample.Open "Select * From Feed1.txt", cnSample, 3, 3, adCmdText
Do While rsSample.EOF <> True
MsgBox rsSample(40)
rsSample.MoveNext
Loop
End Sub
I am using the code below to read a text file .
The problem is that field 40 contains
"5260318470123951"
However when this is read into the Recordset it is read in as
5.26031847012395E+15
Any Ideas on what is going on ?, I need the record to be read exactly as it is in the text file
Thanks
''''''''''code''''''''''''''''
Private Sub getrsValue()
Dim cnSample As New ADODB.Connection
Dim rsSample As New ADODB.Recordset
cnSample.Open "Driver={Microsoft Text Driver (*.txt; *.csv)};" _
& "Dbq= C:\;" _
& "Extensions=asc,csv,tab,txt;HDR=NO;" _
& "Persist Security Info=False"
rsSample.Open "Select * From Feed1.txt", cnSample, 3, 3, adCmdText
Do While rsSample.EOF <> True
MsgBox rsSample(40)
rsSample.MoveNext
Loop
End Sub