| Вопрос: найдите ошибку | Добавлено: 28.07.03 13:14 |
Автор вопроса:  NovichoK
|
|
FileName = "D:\doc\temp\Work_with_files.txt" FileNum = FreeFile Open FileName For Random As FileNum Do Until EOF(FileNum) Line Input #FileNum, StrokaText Loop |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  Padre  ICQ: 346632205 Вопросов: 25 Ответов: 215 |
Web-сайт: Профиль | | #1 | Добавлено: 28.07.03 13:40 |
| А зачем тебе режим Random, открывай как Input и всё будет нормально. | ||
|
Номер ответа: 2 Автор ответа:  univercal ICQ: 173084484 Вопросов: 5 Ответов: 76 |
Web-сайт: Профиль | | #2 | Добавлено: 28.07.03 13:45 |
|
Какого рода ошибку? - файл не закрывается (Close #FileNum). - не используются считываемые в цикле данные. То есть для чтения последней строчки прогоняется все содержимое файла, что очень нерационально. |
||
Если рассматривать этот фрагмент как самостоятельный модуль, то здесь есть такие глюки:|
Номер ответа: 3 Автор ответа:  NovichoKВопросов: 72 Ответов: 147 |
Профиль | | #3 | Добавлено: 28.07.03 13:50 |
|
to Padre: Что значит режим random? я использовал random мне там дальше еще коечто записать туда надо. Ошибку я нашел если написать for input. Так мне что2 раза надо открывать файл сначала для чтения, а потом - для записи?!?
|
||
Страница: 1 |