Программирование |
Web мастеру |
3D Графика и анимация |
Сетевая безопасность |
Гостевая книга |
Форум |
Ссылки |
Услуги |
|
|
На главную страницу > > В раздел программирование > > В раздел VBScript |
Работа с содержимым файла. |
Для работы с содержимым фала
используется объект TextStream и его методы.
1. Открытие файла
1. Открытие файла может
осуществляться несколькими методами FSO - OpenTextFile и
OpenAsTextStream. OpenTextFile Синтаксис: FSO.OpenTextFile(filename[, iomode[, create[, format]]]) где filename – имя открываемого файла Необязательные параметры: iomode – режим открытия файла. Принимает значения:
create – логическая величина, определяющая, будет ли создан новый файл, если файла с указанным именем не существует. true – файл создается. format – кодировка
для открытия файла. VBScript: Set fso =
CreateObject("Scripting.FileSystemObject") JScript: fs = new
ActiveXObject("Scripting.FileSystemObject"); OpenAsTextStream Синтаксис: File.OpenAsTextStream([iomode, [format]]) где iomode – режим открытия файла. Принимает значения:
format – кодировка для открытия файла. Принимает значения:
Примечание. Перед использованием метода OpenAsTextStream объект File должен быть создан методом GetFile. После открытия файла и всех
изменений он должен быть закрыт методом Close. Запись в файл Запись информации в текстовый файл производится с помощью методом Write, WriteLine и WriteBlankLines. Методы: Write - записывает данные в файл в одну строку WriteLine – записывает данные, с переходом на новую строку. WriteBlankLines – записывает пустую строку. Например: VBScript: Set FSO =
CreateObject("Scripting.FileSystemObject") f.WriteLine "Файл создан VBScript!"
f.WriteBlankLines(3) f.Write "Это снова я!" f.Close JScript: FSO = new
ActiveXObject("Scripting.FileSystemObject"); f.WriteLine("Файл создан JScript!");
f.WriteBlankLines(3); f.Write("Это снова я!");
f.Close(); Чтение из файла Для чтения данных из файла используются методы Read, ReadLine, ReadAll, Skip и SkipLine. Методы: ReadLine – читает строку из файла ReadAll – считывает весь файл Skip – пропускает указанное количество символов SkipLine – пропускает
строку VBScript: Set FSO =
CreateObject("Scripting.FileSystemObject") f.WriteLine "Файл создан VBScript!"
f.WriteBlankLines(3) f.Write "Это снова я!" Set t_file = FSO.OpenTextFile("testfile.txt", 1)
source = t_file.ReadAll
MsgBox source t_file.Close JScript: FSO = new
ActiveXObject("Scripting.FileSystemObject"); f.WriteLine("Файл создан JScript!");
f.WriteBlankLines(3); f.Write("Это снова я!");
f.Close(); source = t_file.ReadAll();
WScript.Echo(source); t_file.Close(); |
На главную страницу > > В раздел программирование > > В раздел VBScript |