Basic file i/o HELP PLEASE !!

[TRYP]

i need to read a file line by line
NO PROBLEM
However...
i need to include in the read any leading spaces

example:
input #1, temp
'on a line like this
xxxxx
should be
temp=" xxxxx"
but i get
temp="xxxxx"
any ideas ???


tryp

 

[dsi]

Use the Line Input command:

Dim sLine
Open "C:\Test.txt" For Input As #1
    Do While Not EOF(1)
        Line Input #1, sLine
        MsgBox sLine
    Loop
Close #1

 

[edderic]

'Trim (MyString) will remove leading and trailing spaces in MyString.
'LTrim (MyString) will remove only leading spaces in MyString.
'RTrim (MyString) will remove only trailing spaces in MyString
'For Example:

MyString = " MyText "
String1 = Trim(MyString) 'String1= "MyText".
String1 = LTrim(MyString) 'String1= "MyText ".
String1 = RTrim(MyString) 'String1= " MyText".

Eric De Decker
vbg.be@vbgroup.nl

Licence And Copy Protection AxtiveX
Source CodeBook for the programmer

http://www.createsoftware2000.com