Свойства объекта FSO (файл)
DateCreated возвращает дату и время создания этой папки
DatelaStacced возвращает дату и время последнего доступа к файлу
Datelastmodified возвращает дату и время, когда файл был в последний раз изменен
Диск возвращает объект диска диска, где проживает файл
Установить или вернуть имя файла
ParentFolder возвращает объект папки родительской папки файла
Путь возвращает абсолютный путь в файл и может использовать длинное имя файла
ShortName возвращает имя файла в форме стиля DOS 8.3
Шортчанка возвращает абсолютный путь файла в форме DOS Style 8.3
Размер возвращает размер (байты) файла
Введите, если это возможно, верните строку описания для типа файла
Метод объекта FSO File (файл)
Использование метода объекта FSO -файла
CopyFile Copy один или несколько файлов в новый путь
CreateTexTfile создает файл и возвращает объект TextStream
DeleteFile DELETE файл
OpenTextFile открывает файл и возвращает объект TextStream для чтения или добавления
Переименовать файл:
Кода -копия выглядит следующим образом:
Переименование функций (SourceName, DestName)
Dim Ofso, Ofile
set ofso = server.createobject ("scripting.filesystemobject")
SET OFILE = ofso.getFile (server.mappath (sourcename))
ofile.name = destname
Наборсо = ничего
Набор Ofile = ничего
Конечная функция
Удалить файл:
Кода -копия выглядит следующим образом:
Функция fsodel (имя файла)
Dim fso, f
SET FSO = server.createObject ("scripting.filesystemobject")
f = server.mappath (имя файла)
Если fso.filexists (f), то
fso.deletefile f, true
конец, если
Установить f = ничего
Установить FSO = ничего
Конечная функция
Замените струны в файле:
Кода -копия выглядит следующим образом:
Функция fsoreplace (имя файла, цель, Repstring)
Dim objfso, objcountfile, filetempdata
Установить objfso = server.createObject ("scripting.filesystemobject")
Установить objcountfile = objfso.opentextfile (server.mappath (имя файла), 1, true)
FileTempData = objcountfile.readall
objcountfile.close
FileTempData = reply (fileTempData, Target, Repstring)
Установить objcountfile = objfso.createtextfile (server.mappath (имя файла), true)
objcountfile.write filetempdata
objcountfile.close
Установить objcountfile = ничего
Установить objfso = ничего
Конечная функция
<%
'************************************************************
'Имя функции: CreateFolder (Spath)
'Функция: создать каталог
«Путь: Spath: созданный путь относительного каталога
'Return Value: Успешное True, Fail False
'************************************************************
'response.write createfolder ("/dgsunshine/uploadfile/demo1/")
Функция CreateFolder (Spath)
При ошибке резюме следующим
Dim FSO, Arrfolder, Folder, i, J
Если spath = "" then
CreateFolder = false
Выходная функция
Конец, если
Если осталось (Spath, 1) = "/" Тогда
Folder = "/"
Spath = Mid (Spath, 2, Len (Spath))
Еще
Folder = "./"
Конец, если
Если справа (Spath, 1) = "/" Тогда Spath = слева (Spath, Len (Spath) -1)
Arrfolder = split (spath, "/")
SET FSO = server.createObject ("scripting.filesystemobject")