ASP menggunakan FSO untuk mengimplementasikan pergerakan file
FunctionMovefefiles (SFOLDER, DOFORER)
OnerrorresumeNext
dimfso
setFSO = server.CreateObject ("Scripting.FilesystemObject")
ifffso.folderexists (server.mappath (sfolder)) andfso.folderexists (server.mappath (dfolder)) lalu
fso.copyfolderserver.mapath (sfolder), server.mapath (dfolder)
moveFiles = true
kalau tidak
moveFiles = false
setfso = tidak ada
callalertbox ("Sistem tidak menemukan jalur yang ditentukan [" & sfolder & "]!", 2)
endif
setfso = tidak ada
fungsi endfungsi
AspModify nama folder
functionameFolder (SFOLDER, DOFORER)
OnerrorresumeNext
dimfso
setFSO = server.CreateObject ("Scripting.FilesystemObject")
ifffso.folderexists (server.mappath (sfolder)) lalu
fso.movefoldserver.mappath (sfolder), server.mappath (dfolder)
RenameFolder = true
kalau tidak
RenameFolder = false
setfso = tidak ada
callalertbox ("Sistem tidak menemukan jalur yang ditentukan [" & sfolder & "]!", 2)
endif
setfso = tidak ada
fungsi endfungsi
ASP Periksa apakah ada folder
FunctionCheckFolder (Spath)
OnerrorresumeNext
dimfso
setFSO = server.CreateObject ("Scripting.FilesystemObject")
ifffso.folderexists (server.mappath (spath)) lalu
checkfolder = true
kalau tidak
checkfolder = false
endif
setfso = tidak ada
fungsi endfungsi
ASP Periksa apakah ada file
FunctionCheckFile (Spath)
OnerrorresumeNext
dimfso
setFSO = server.CreateObject ("Scripting.FilesystemObject")