ASPにFSOファイル操作機能を導入し、ファイルを変更し、ファイルを削除し、ファイルを置き換えることができます。
FSOファイル（ファイル）オブジェクト属性
dateCreatedフォルダーの作成日と時刻を返します
datelaastaccessedファイルへの最後の訪問の日時を返します
datelaastModifyファイルの最後の変更の日付と時刻を返します
ドライブファイルが配置されているドライブのドライブオブジェクトを返します
名前設定またはファイル名を返します
ParentFolderは、ファイルの親フォルダーのフォルダーオブジェクトを返します
パスファイルの絶対パスを返し、長いファイル名を使用できます
shortnameはdos -style 8.3ファイル名の形式を返します
ShortPathはDOS -Style 8.3ファイルの形式絶対パスを返します
サイズはファイルのサイズ（バイト）を返します
タイプの場合、ファイルタイプ命令文字列を返します
FSOファイル（ファイル）オブジェクトメソッド
FSOファイルオブジェクトメソッドの使用
コピーファイル1つ以上のファイルを新しいパスにコピーする
createTextFileはファイルを作成し、テキストストリームオブジェクトを返します
DeleteFileファイルを削除します
OpenTextFileはファイルを開き、TextStreamオブジェクトを返して読み取りまたは追加します
レナ名ファイル：
コードは次のとおりです。
関数の名前の変更（Sourcename、destName）
dimso、ofile
set offso = server.createobject（scripting.filesystemobject）
ofiile = offso.getFile（server.mappath（source）））
ofile.name = destname
Set offso =何もない
セットオブリー=何も
エンド関数
ファイルの削除：
コードは次のとおりです。
functionfsodel（filename）
dim fso、f
fso = server.createObject（scripting.filesystemObject）を設定します
f = server.mappath（filename）
FSO.FILEEEXIST（f）の場合
FSO.DELETEFILE F、TRUE
ifを終了します
f =何も設定しません
FSO =何も設定しません
エンド関数
ファイル内の文字列を変更します。
コードは次のとおりです。
function fsoreplace（ファイル名、ターゲット、再ストリング）
dim objfso、objcountfile、filetempdata
objfso = server.createobject（scripting.filesystemobject）を設定します
objcountfile = objfso.opentextfile（server.mappath（filename）、1、trueを設定します）
filetempdata = objcountfile.readall
objcountfile.close
filetempdata =置換（filetempdata、ターゲット、repstring）
objcountfile = objfso.createTextfile（server.mappath（filename）、trueを設定します）
objcountfile.writ filetempdata
objcountfile.close
objcountfile = Nothingを設定します
objfso =何も設定しません
エンド関数
<％
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'機能名：CreateFolder（SPAD）
'関数：ディレクトリを作成します
'パラメーター：Spath：作成された相対ディレクトリパス
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'Response.Write CreateFolder（/dgsunshine/uploadfile/demo1/）
関数CreateFolder（SPI）
エラーの再開時に次に再開します
dim fso、arrfolder、フォルダー、i、j
space = thenの場合
createfolder = false
出口機能
ifを終了します
残っている場合（スパース、1）= /その後
folder = /
Spath = Mid（Spath、2、Len（Spath）））
それ以外
folder = ./
ifを終了します
右（spath、1）= / then spath = left（spad、len（spad）-1）
arrfolder = split（spath、/）
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（arrfolder）の場合
i = 0の場合
Folder = folder＆arrfolder（i）＆ /
それ以外
Folder = folder＆arrfolder（i）＆ /
ifを終了します
fso.foldrexists（server.mappath（フォルダー））= falseの場合
Response.write server.mappath（フォルダー）
fso.createfolder（server.mappath（フォルダー））
ifを終了します
次
FSO =何も設定しません
err.number <> 0の場合
err.clear（）
createfolder = false
それ以外
createfolder = true
ifを終了します
エンド関数
function getFile（paramfilepath）
fso = server.createObject（scripting.filesystemObject）を設定します
fso_read = fso.opentextfile（server.mappath（paramfilepath）、1、false、-2）をset set
getFile = fso_read.readall
fso_read = Nothingを設定します
FSO =何も設定しません
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：createfile（paramfilecontent、paramfilepath）
'関数：ファイルを作成します
'パラメーター：パラメーション環境'ファイルコンテンツ
「paramfilepath」ファイル名（パスを除く）
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
関数createfile（paramfilecontent、paramfilepath）
エラーの再開時に次に再開します
dim fso、fwrite
fso = server.createObject（scripting.filesystemObject）を設定します
fwrite = fso.createTextfile（server.mappath（paramfilepath）、true）を設定
fwrite.write paramfilecontent
fwrite.close（）
fwrite = Nothingを設定します
FSO =何も設定しません
err.number <> 0の場合
err.clear（）
createfile = false
それ以外
createfile = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：Delfile（Filepath）
'関数：ファイルを削除します
'パラメーター：filepath'ファイルパス複数のファイルのファイル|
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
function delfile（filepath）
エラーの再開時に次に再開します
dim fso、arrfile、i
getSafestr（filepath、）= thenの場合
createfolder = false
出口機能
ifを終了します
arrfile = split（filepath、| |）
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（arrfile）の場合
filepath = arrfile（i）
fso.fileexist（server.mappath（filepath））の場合
fso.deletefile server.mappath（filepath）
ifを終了します
次
FSO =何も設定しません
エラーの場合
err.clear（）
delfile = false
それ以外
delfile = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：Delfolder（FolderPath）
'関数：ディレクトリを削除します
'パラメーター：folderpath'ディレクトリパス 'マルチディレクトリエリミネーション|
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
関数delfolder（folderpath）
エラーの再開時に次に再開します
dim fso、arrfolder、i
getSafestr（folderpath）= thenの場合
delfolder = false
出口機能
ifを終了します
arrfolder = split（folderpath、|）
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（arrfolder）の場合
folderpath = arrfolder（i）
fso.foldrexists（server.mappath（folderpath））の場合
fso.deletefolder server.mappath（folderpath）
ifを終了します
次
エラーの場合
err.clear（）
delfolder = false
'ShowerRor削除ディレクトリが失敗しました、
それ以外
delfolder = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：isexistfile（filepath）
'関数：ファイルまたはディレクトリが存在するかどうかを判断します
'パラメーター：filepath'ファイルパス複数のファイルのファイル|
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
関数isexistfile（filepath）
エラーの再開時に次に再開します
dim fso、arrfile、i
getSafestr（filepath、）= thenの場合
isexistfile = false
ifを終了します
arrfile = split（filepath、| |）
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（arrfile）の場合
filepath = arrfile（i）
fso.fileexist（server.mappath（filepath））の場合
isexistfile = true
ifを終了します
fso.foldrexist（server.mappath（filepath））の場合
isexistfile = true
ifを終了します
次
FSO =何も設定しません
エラーの場合
err.clear（）
isexistfile = false
「ファイルまたはディレクトリが失敗するかどうかを判断するShowerRor、
それ以外
isexistfile = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：Delfile（Filepath）
'関数：ファイルまたはディレクトリを削除します
'パラメーター：filepath'ファイルパス複数のファイルのファイル|
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
function delfile（filepath）
エラーの再開時に次に再開します
dim fso、arrfile、i
getSafestr（filepath、）= thenの場合
createfolder = false
ifを終了します
arrfile = split（filepath、| |）
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（arrfile）の場合
filepath = arrfile（i）
fso.fileexist（server.mappath（filepath））の場合
fso.deletefile server.mappath（filepath）
ifを終了します
fso.foldrexist（server.mappath（filepath））の場合
fso.deletefolder server.mappath（filepath）
ifを終了します
次
FSO =何も設定しません
エラーの場合
err.clear（）
delfile = false
'ShowerRor削除ファイルまたはディレクトリが失敗しました、
それ以外
delfile = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：renamefile（oldname、newname）
'関数：ファイルまたはディレクトリの名前を変更します
'パラメーター：stroldname'オリジナルファイル名Multi -use |
'strnewname'新しいファイル名Multi -use |
「同じ2つのパラメーターを一貫して保管してください
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
関数renamefile（stroldname、strnewname）
エラーの再開時に次に再開します
dim fso、arrold、arrnew、i、oldname、newname
old = getSafestr（stroldname、）
newfile = getSafestr（strnewname、）
古い=またはnewFile = thenの場合
renamefile = false
出口機能
ifを終了します
arold = split（stroldname、|）
arrnew = split（strnewname、|）
ubound（arrold）<> ubound（arrnew）の場合
renamefile = false
出口機能
ifを終了します
fso = server.createObject（scripting.filesystemObject）を設定します
i = 0からubound（矢印）の場合
oldname = server.mappath（arrold（i））
newname = server.mappath（arrnew（i））
fso.fileexist（oldname）ではなく、fso.fileexists（newname）ではない場合
fso.movefile oldname、newname
'renamefile = true
ifを終了します
次
FSO =何も設定しません
err.number <> 0の場合
err.clear（）
renamefile = false
それ以外
renamefile = true
ifを終了します
エンド関数
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
'関数名：CopyFiles（Tempsource、Tempend）
'ファイル：ファイルまたはディレクトリをコピーします
'パラメーター：Tempsource'ソースファイル名Multi -Purpose |
'Tempend'不確実なファイル名Multi -Purpose |
'注：上記の2つのパラメーターと同じ2つのパラメーターを保管してください。どちらも完全なパスです。
'Server.Mappathメソッドが処理されました
'戻り値：成功真実、falseに失敗します
'******************************************* ******************************************** ******************************************** ******************************************** ******************************************** ************、******
function copyfiles（tempsource、tempend）
エラーの再開時に次に再開します
dim copyfso、arrsource、arrend
copyfiles = false
copyfso = server.createObject（scripting.filesystemObject）を設定します
tempsource =またはtempend = thenの場合
コピーファイルまたはディレクトリを間違えますが、条件は空です
copyfiles = false
出口機能
ifを終了します
arrsource = split（tempsource、|）
arrend = split（tempend、|）
ubound（arrsource）<> ubound（arbit）の場合
copyfiles = false
出口機能
ifを終了します
i = 0からubound（arrsource）の場合
srcname = arrsource（i）
tarname = arrend（i）
copyfso.filexists（srcname）であり、copyfso.fileexist（tarname）ではない場合
copyfso.copyfile srcname、tarname
copyfiles = true
ifを終了します
copyfso.foldrexist（srcname）ではなく、copyfso.foldrexist（tarname）ではない場合
copyfso.copyfolder srcname、tarname
copyfiles = true
ifを終了します
次
copyfso =何も設定しません
エラーの場合
'err.clear（）
copyfiles = false
ifを終了します
エンド関数
％>