"FSO 운영과 함께 작성된 클래스"
여전히 개선되고 있으며 기본 기능이 이미 제자리에 있습니다.
초보자를위한 튜토리얼로도 사용할 수 있습니다.
프로그램 코드
<%
'************************************************* CDS 시스템 FSO 작동 클래스 베타 1 ****************************
'호출 방법 : setobj = newfsocontrol
'모든 경로는 절대 경로 여야합니다. 변수를 정의하기 전에 Server.mappath 메소드를 사용하여 경로를 변환하십시오.
'------ Filerun ---------------------------------------
'
'필수 매개 변수 :
'FilePath ----- 프로세스 파일 경로
'
'선택적 매개 변수 :
'fileallowtype -------- 파일의 허용 유형을 처리하고, 정의 방법 예 : gif | jpg | png | txt
'FileNewDir--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'FileNewName--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
'coverpr ------- 기존 파일을 덮어 쓸지 0이 아니에요 1 is yes default는 1입니다.
'deletepr ------ 원래 파일을 삭제할지 여부는 0입니다 1은 1입니다. 기본값은 1입니다.
'------------------------------------------------------------------------
'------- Updir (Path)는 PART의 상위 디렉토리를 가져옵니다
'경로는 파일 또는 디렉토리 일 수 있습니다
'------- getPrefixName (Path)은 파일 이름을 접두사합니다
'경로는 파일이거나 전체 경로 또는 별도의 파일 이름 일 수 있어야합니다.
'------ getFileName (Path) 파일 이름을 얻으려면
'경로는 파일이거나 전체 경로 또는 별도의 파일 이름 일 수 있어야합니다.
'------ getextensionName (Path)은 파일 이름 접미사를 가져와 "포함하지 않습니다".
'경로는 파일이거나 전체 경로 또는 별도의 파일 이름 일 수 있어야합니다.
'------- 파일은 파일입니다
'그렇다면 true를 반환하지 않으면 false를 반환하십시오
'------ 폴더 크리트 (경로)
'------ FolderDelete (Path, FileIf)
'----- filecopy (path_from, path_to, coverif)
'----- FileMove (path_from, path_to, coverif)
'----- FiledElete (Path)
'----- FilerEname (OldName, NewName, Coverif)
Classfsocontrol
Dimfso
privatefile_path, file_allowtype, file_newfolder_path, file_newname, file_coverif, file_deleteif
PublicpropertyletFilePath (strtype)
file_path = strtype
엔드 프로페티
Publicpropertyletfileallowtype (strtype)
file_allowtype = strtype
엔드 프로페티
Publicpropertyletfilenewdir (strtype)
file_newfolder_path = strtype
엔드 프로페티
PublicPropertyletfilenewname (strtype)
file_newname = strtype
엔드 프로페티
PublicPropertyletcoverpr (lngsize)
ifisnumeric (lngsize)
file_coverif = clng (lngsize)
endif
엔드 프로페티
PublicPropertyletdeletePr (lngsize)
ifisnumeric (lngsize)
file_deleteif = clng (lngsize)
endif
엔드 프로페티
privatesubclass_initialize ()
setfso = createobject ( "Scripting.FilesyStemObject")