OpenTextFile — это метод на языке asp. Он открывает указанный файл и возвращает объект TextStream. Файл можно читать, записывать или добавлять через этот объект.
OpenTextFile — метод на языке asp.
Открывает указанный файл и возвращает объект TextStream, с помощью которого файл можно читать, записывать или добавлять.
object.OpenTextFile(имя файла[, iomode[, create[, формат]]])
1. Редактор метода открывает указанный файл и возвращает объект TextStream, с помощью которого файл можно читать, записывать или добавлять.
object.OpenTextFile(имя файла[, iomode[, create[, формат]]])
2. Объект редактирования параметров
Необходимый. объект должен быть именем FileSystemObject.
имя файла
Необходимый. Строковое выражение, указывающее открываемый файл.
йомод
Необязательный. Может быть одной из трех констант: ForReading, ForWriting или ForAppending.
создавать
Необязательный. Логическое значение, указывающее, создавать ли новый файл, если указанное имя файла не существует. Значение True, если создается новый файл, и False, если он не создается. Если этот параметр опущен, новый файл не создается.
формат
Необязательный. Используйте одно из трех значений состояния, чтобы указать формат, в котором нужно открыть файл. Если этот параметр опущен, файл будет открыт в формате ASCII.
3. Установите и отредактируйте параметр iomode, который может иметь любое из следующих значений:
Описание постоянного значения
ForReading 1 открывает файл только для чтения. Этот файл не может быть записан.
ForWriting 2 Открыть файл для записи
ForAppending 8 открывает файл и начинает запись с конца файла.
Параметр формата может иметь любое из следующих значений:
описание значения
TristateTrue открывает файлы в формате Unicode.
TristateFalse открывает файл в формате ASCII.
TristateUseDefault Открывает файл, используя системные настройки по умолчанию.
4. Инструкции. Редактирование Следующий код показывает, как использовать метод OpenTextFile для открытия файла и добавления текста:
вар фс, а, ForAppending;
ДляДобавления = 8;
fs = новый ActiveXObject(Scripting.FileSystemObject);
//Может быть одной из трех констант: ForReading, ForWriting или ForAppending
//Их 1, 2, 8 соответственно
а = fs.OpenTextFile(c://testfile.txt, 2, false);
...
а.Закрыть();
Варианты использования в сценарии VBS
Открывает указанный файл и возвращает объект TextStream, который можно читать, записывать или добавлять в файл.
object.OpenTextFile(имя файла[,iomode[,создать[,формат]]])
параметр
объект
Необходимый. Должно быть именем объекта FileSystemObject.
имя файла
Необходимый. Строковое выражение, определяющее имя открываемого файла.
йомод
Необязательный. Режим ввода/вывода, одна из следующих трех констант: ForReading, ForWriting или ForAppending.
создавать
Необязательный. Логическое значение, указывающее, можно ли создать новый файл, если указанное имя файла не существует. Значение True, чтобы разрешить создание новых файлов, в противном случае — значение False. Значение по умолчанию — Ложь.
формат
Необязательный. Одно из трех значений Tristate, указывающих формат открытия файла. Если этот параметр опущен, файл открывается в формате ASCII.
Параметр iomode может иметь одно из следующих значений:
| постоянный | ценить | описывать |
| Для чтения | 1 | Откройте файл в режиме только для чтения. Этот файл не может быть записан. |
| Для письма | 2 | Откройте файл только для записи. Этот файл не может быть прочитан. |
| Для добавления | 8 | Откройте файл и напишите в конце файла. |
Параметр формата может быть одним из следующих значений:
| постоянный | ценить | описывать |
| TristateUseDefault | -2 | Откройте файл в формате системы по умолчанию. |
| TristateTrue | -1 | Откройте файл в формате Unicode. |
| TristateFalse | 0 | Откройте файл в формате ASCII. |
Примеры использования:
- СубОпентекстфилетест
- ConstForReading=1,ForWriting=2,ForAppending=8
- Димфсо,f
- Setfso=CreateObject(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(c:/testfile.txt,ForWriting,True)
- f.Написать Привет!
- е.Закрыть
- EndSub
- ВызовOpenTextFileTest
Функция, написанная Wulin.com.
- Димфсо
- Setfso=CreateObject(Scripting.FileSystemObject)
- setfn2=fso.GetFile(E:/webroot/vevb/index2.htm)
- flsize2=fn2.size
- fldate2=fn2.datelastmodified
- setfn=fso.GetFile(E:/webroot/vevb/index.htm)
- flsize1=fn.размер
- fldate1=fn.datelastmodified
- Iffso.FileExists(E:/webroot/vevb/index2.htm) иflsize2>50000andfldate2>fldate1Then
- 'Определите размер файла. Если html-файл перегенерирован, вам необходимо определить, был ли он обновлен, и размер файла не может быть меньше 50 КБ.
- fso.getfile(E:/webroot/vevb/index2.htm).copy(E:/webroot/vevb/index.htm)
- iferr.number=0thenWriteHistory успешная&now()&..........,log.txt
- конец
- 'Функция записи журнала
- SubWriteHistory(hisChars,путь)
- ConstForReading=1,ForAppending=8
- Димфсо,f
- Setfso=CreateObject(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(путь,ForAppending,True)
- f.WriteLinehisChars
- е.Закрыть
- EndSub