'Read each line in fileIf CFile.OpenFileRead(FileName) Then fEncoding = CFile.ReadBOM() While Not CFile.Eof() 'Read line from file If (fEncoding = fe_ANSI) Then rc = CFile.ReadAnsiLine(inStrg) Else rc = CFile.ReadUnicodeLine(inStrg) End If If (rc = False) Then GoTo FILE_ERR Wend CFile.CloseFileEnd If