Hello,
I have this code which works well except that when there are less than 8 lines
of text (sometimes the number of lines vary in the creation of the file) I
would like to prevent the extra commas from coming up and I would like to have
the full stop at the end.
Kindly assist.
Thanks.
Lennox.
Dim f as folderitem = DocumentsFolder.child("My Temp1 File")
Dim tis as TextInputStream = f.OpenAsTextFile
If tis is nil then
//check f.LastErrorCode
Return
End if
EditField10.text = tis.ReadLine + ", " + tis.ReadLine + ", " + tis.ReadLine +
", " + tis.ReadLine + ", " + tis.ReadLine + ", " + tis.ReadLine + ", " +
tis.ReadLine + ", " + tis.ReadLine + ". "
tis = nil //the file is closed when the object is destroyed
---------------------------------
Finding fabulous fares is fun.
Let Yahoo! FareChase search your favorite travel sites to find flight and hotel
bargains.
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
