В этой статье в основном представлены обще используемые функции работы файла в объектах файловой системы. Я надеюсь, что соответствующие знания и материалы, составленные редактором, будут полезны для вас.
1. Корень
Формат функции root ()
Описание функции возвращает переменную строки пути
Код приложения 'Образец строки = c:/intels/jingcaichunfeng/'
Публичная функция root ()
root = request.servervariables ("appl_physical_path")
Конечная функция
2. URL
Формат функции url ()
Описание функции возвращает переменную строки URL
Код приложения 'Пример string = http://www.intels.net/filesys.asp'
Публичная функция url ()
url = "http: //" & request.servervariables ("server_name")
& Request.servervariables ("script_name")
Конечная функция
3. Mkdir
Формат функции mkdir (dirname)
Описание функции Создание каталога и возврата информации
Код приложения публичная функция mkdir (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.folderexists (xvar), то
msg = "Извините, этот каталог уже существует!"
Еще
Sys.createfolder (xvar)
MSG = "Поздравляю, каталог был создан успешно!"
Конец, если
Установить Sys = ничего
mkdir = msg
Конечная функция
4. Rmdir
Формат функции rmdir (dirname)
Описание функции удаляет каталог и возвращает информацию
Код приложения публичная функция rmdir (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.folderexists (xvar), то
Sys.deletefolder (xvar)
MSG = "Поздравляю, каталог был успешно удален!"
Еще
MSG = "Извините, этот каталог еще не был создан!"
Конец, если
Установить Sys = ничего
rmdir = msg
Конечная функция
5. Isdir
Формат функции isdir (dirname)
Описание функции проверяет, существует ли каталог и возвращает информацию
Код приложения публичная функция isdir (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.folderexists (xvar), то
msg = true
Еще
msg = false
Конец, если
Установить Sys = ничего
isdir = msg
Конечная функция
6. cpdir
Формат функции cpdir (dirname, назначение, перезапись)
Функция Описание Копировать папку и вернуть информацию
Код приложения публичная функция cpdir (xvar, yvar, Zvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.folderexists (xvar), то
Sys.copyfolder xvar, root & yvar, zvar
MSG = "Поздравляю, каталог был успешно скопирован!"
Еще
MSG = "Извините, каталог, который вы хотите, не был найден!"
Конец, если
Установить Sys = ничего
cpdir = msg
Конечная функция
7. Mvdir
Формат функции mvdir (dirname, назначение)
Описание функции перемещает папку и возвращает информацию
Код приложения публичная функция mvdir (xvar, yvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.folderexists (xvar), то
Sys.MoveFolder XVAR, Root & Yvar
MSG = "Поздравляю, папка каталогов была перемещена!"
Еще
MSG = "Извините, каталог, который вы хотите, не был найден!"
Конец, если
Установить Sys = ничего
mvdir = msg
Конечная функция
8. Isfile
Формат функции ISFILE (имя файла)
Описание функции проверяет, существует ли файл и возвращает информацию
Код приложения публичная функция isfile (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
msg = true
Еще
msg = false
Конец, если
Установить Sys = ничего
ISFILE = MSG
Конечная функция
9. Wfile
Формат функции wfile (имя файла, перезапись, строка)
Описание функции Записать строку в файл и вернуть информацию
Код приложения публичная функция wfile (xvar, yvar, Zvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если ивар, тогда
Установите txt = sys.opentextfile (xvar, 2)
Txt.write (zvar)
Txt.close
MSG = "Поздравляю, файл был создан успешно и сохранен!"
Еще
Если sys.filexists (xvar), то
msg = "Извините, файл уже существует!"
Конец, если
Установить Sys = ничего
wfile = msg
Конечная функция
10. rfile
Формат функции rfile (имя файла)
Описание функции считывает файл и возвращает информацию
Код приложения публичная функция rfile (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
Установите txt = sys.opentextfile (xvar, 1)
msg = txt.readall
Txt.close
Еще
msg = "Извините, файл не существует!"
Конец, если
Установить Sys = ничего
rfile = msg
Конечная функция
11. Afile
Формат функции Afile (имя файла, строка)
Описание функции добавить строку в файл и вернуть информацию
Код приложения публичная функция Afile (xvar, Zvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
Установите txt = sys.opentextfile (xvar, 8)
Txt.write (zvar)
Txt.close
msg = "Поздравляю, файл был успешно добавлен и сохранен!"
Еще
msg = "Извините, файл не существует!"
Конец, если
Установить Sys = ничего
afile = msg
Конечная функция
12. cpfile
Формат функции cpfile (имя файла, назначение, перезапись)
Описание функции Скопируйте файл и возвращайте информацию
Код приложения публичная функция cpfile (xvar, yvar, Zvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
Sys.copyfile xvar, root & yvar, zvar
MSG = "Поздравляю, файл был успешно скопирован!"
Еще
msg = "Извините, копия файла не удалась!"
Конец, если
Установить Sys = ничего
cpfile = msg
Конечная функция
13. mvfile
Формат функции mvfile (имя файла, пункт назначения)
Описание функции перемещает файл и возвращает информацию
Код приложения публичная функция mvfile (xvar, yvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
Sys.movefile xvar, root & yvar
MSG = "Поздравляю, файл был успешно перемещен!"
Еще
msg = "Извините, перемещение файла не удалось!"
Конец, если
Установить Sys = ничего
mvfile = msg
Конечная функция
14. rmfile
Формат функции rmfile (имя файла)
Описание функции удаляет файл и возвращает информацию
Код приложения публичная функция rmfile (xvar)
Set sys = server.createObject ("scripting.filesystemobject")
Если sys.filexists (xvar), то
Sys.deletefile (xvar)
MSG = "Поздравляю, файл был успешно удален!"
Еще
msg = "Извините, удаление файла не удалось!"
Конец, если
Установить Sys = ничего
rmfile = msg
Конечная функция
Выше приведено введение в обще используемые функции работы файла в объектах файловой системы. Я надеюсь, что соответствующие знания и материалы, составленные редактором, будут полезны для вас. Для получения дополнительного контента, пожалуйста, продолжайте обращать внимание на веб -сайт неправильного нового технологического канала!