| Вопрос: Чтение из текстового файла. | Добавлено: 13.05.05 00:18 |
Автор вопроса:  ZoomerSD | ICQ: 148640473 |
|
Подскажите пожалуйста, как мне через через FSO прочитать многострочный текст из обыкновенного *.txt файла,так чтобы го можно было на страничку напечатать.
Когда-то давно я это делал, но вспомнить несмог :( |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  Morpheus Вопросов: 224 Ответов: 3777 |
Web-сайт: Профиль | | #1 | Добавлено: 13.05.05 00:48 |
|
А так
Dim FN as Integer
FN = FREEFILE Dim FName as String FName = "C:\tmp\index.txt" Open FName For Input As #FN Text1.Text = Input(LOF(FN), #FN) Close #FN не пойдёт? |
||
|
Номер ответа: 2 Автор ответа: KEP Вопросов: 44 Ответов: 119 |
Профиль | | #2 | Добавлено: 13.05.05 11:23 |
|
dd = FreeFile
Open App.path & "1.txt" For Input As #dd Do Until EOF(dd) Line Input #dd, txt alltxt = alltxt + txt + vbCrLf Else alltxt = alltxt + txt End If Loop Text1.Text = alltxt Close #dd |
||
|
Номер ответа: 3 Автор ответа: ZoomerSDICQ: 148640473 Вопросов: 135 Ответов: 270 |
Профиль | | #3 | Добавлено: 13.05.05 12:21 |
| Сам виноват... забыл озвучить, мне нужно код для ASP, собственно даже топик специально в этом разделе создал... | ||
|
Номер ответа: 4 Автор ответа:  ZagZagICQ: 295002202 Вопросов: 87 Ответов: 1684 |
Профиль | | #4 | Добавлено: 17.05.05 09:46 |
|
АСП и ФСО очень не дружат. Лучше храни текст в БД.
|
||
|
Номер ответа: 5 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #5 | Добавлено: 16.06.05 18:40 |
| Ребят, форум по скриптам, а пишите VBшные коды. Через FSO - есть такая вешь как TextStream. Там все просто и понятно, посмотри контекстную подсказку. | ||
Страница: 1 |