|
vbs чтение из файла
| ☑ |
0
CalvinKlein
04.07.13
✎
14:05
|
Подскажите, плиз, как проверить пустой ли файл?
Хочу прочитать его с помощью ReadAll
Код
Set f = fso.OpenTextFile(direct & "test.txt",ForReading,True,Unicode)
TxtContent = f.ReadAll
f.close
ошибка: Ввод данных за пределами файла
|
|
1
Маратыч
04.07.13
✎
14:07
|
Через FileSize делать и не заморачиваться :)
|
|
2
Jaap Vduul
04.07.13
✎
14:13
|
|
|
3
CalvinKlein
04.07.13
✎
14:18
|
цикл решает.
Как-то делать через сравнение байтовое не камильфо)
|
|
4
Маратыч
04.07.13
✎
14:22
|
(3) Чойта не комильфо? Пустой файл - по определению файл размером 0 байт, все дела. Тем более FileSize гораздо быстрее, чем чтение файла.
|
|
5
Маратыч
04.07.13
✎
14:25
|
+(4) Да и нельзя читать пустой файл, кстати. Это особенность VBS. Только через атрибут Size или функцией FileSize.
|
|
6
CalvinKlein
04.07.13
✎
14:43
|
(5) Ок. Спасибо))
|
|
7
Jaap Vduul
04.07.13
✎
15:03
|
А чем штатный способ проверки из (2) не устраивает?
|
|