Сайт: http://www.frnet.narod.ru/
В некоторых случаях, при составлении программы, возникает необходимость проверки наличия файла на компьютере. Так иногда, отсутствие его может привести к ошибке, из-за которой возможно окончание работы программы. Такая необходимость возникает и при проектировании сайтов. Рассмотрим такой пример: вы сохраняете настройки для каждого отдельного пользователя на компьютере пользователя. При загрузке страницы считываете информацию из файла и в соответствии с полученными данными как-то подстраиваете сайт под пользователя (самое простое: меняете цвет текста, фона и т.п.). И все вроде бы хорошо, но тут оказывается, что пользователь на вашем сайте впервые, и файла с настройками нет. Мгновенно посетителю сайта выводится сообщение об ошибке. Это некрасиво, не правда ли? Значит надо сделать проверку наличия файла с настройками, чем мы сейчас и займемся.
Пусть вы сохраняете файлы в определенный файл, адрес которого храниться в переменной optfile. Напишем скрипт проверки на двух языках. По сути, мы будем управлять элементом ActiveX при помощи JavaScript и VBScript. Разницы между функциях нет, только в синтаксисе самих языков.
1. Реализация на VBScript
Function fStatus() ‘ название функции, передаем в качестве параметра адрес файла
Dim fso ‘ объявляем переменую fso – экземпляр FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject") ‘ создаем экземпляр объекта FileSystemObject
fStatus = fso.FileExists(optfile) ‘ возвращаем функции true или false, в зависимости от наличия файла
End Function ‘ конец функции
Из скрипта видно, что работу по проверке наличия файла выполняет метод FileExists, а в качестве его параметра используется адрес файла, который нужно проверить.
Dim fso ‘ объявляем переменую fso – экземпляр FileSystemObject
Set fso = CreateObject("Scripting.FileSystemObject") ‘ создаем экземпляр объекта FileSystemObject
fStatus = fso.FileExists(optfile) ‘ возвращаем функции true или false, в зависимости от наличия файла
End Function ‘ конец функции
2. Реализация на JavaScrtipt
function ReportFileStatus() {
var fso // объявляем переменую fso – экземпляр FileSystemObject
fso = new ActiveXObject("Scripting.FileSystemObject"); // создаем экземпляр объекта FileSystemObject
return(fso.FileExists(optfile)); // возвращаем функции true или false, в зависимости от наличия файла }
Все тоже самое, только на JavaScript.
var fso // объявляем переменую fso – экземпляр FileSystemObject
fso = new ActiveXObject("Scripting.FileSystemObject"); // создаем экземпляр объекта FileSystemObject
return(fso.FileExists(optfile)); // возвращаем функции true или false, в зависимости от наличия файла }
3. О переменной optfile
Переменная optfile для JavaScript должна содержать после знака диска двойной слеш, например: optfile=”c:\\site_files\option.ini”.
Для VBScript переменная optfile должна содержать одинарный слеш после зна диска, например: optfile=”c:\site_files\option.ini”.
4. Вместо заключения
Вот так, все очень просто. (!)Однако не забудьте объявить переменную optfile до того, как используете функции, то есть поместить ее объявление первой строкой скрипта.(!)
