一个使用 fso 的 classe , 前面的文章也有提到。这里有比较多的一些实例。
<%
DimmyfileFolder
SetMyFileFolder = newFileFolderCls
'' Response.WritemyFileFolder.MoveAfile ("F: /123/4561.exe", "f: /123/4562.txt")
'' Response.WritemyFileFolder.MoveAdolder ("F:/456", "F:/DITG/456")
'' Response.WritemyFileFolder.ShowFilesystemType ("i:/")
'' Response.WritemyFileFolder.copyafile ("f: /123/4562.txt", "f: /123/4563.txt")
'' !!!!
'' Response.WritemyFileFolder.copyAfolder ("f:/123/", "f:/789/")
'' Response.WritemyFileFolder.ShowFolderList ("f:/ditg")
'' Response.WritemyFileFolder.ShowFilelist ("F:/123/123")
'' Response.WritemyFileFolder.DeleteAthile ("f: /123/4562.txt")
'' Response.WritemyFileFolder.DeleTeFolder ("F:/456/")
'' Response.WritemyFileFolder.CreateFolderDemo ("F:/147/")
'' Response.WritemyFileFolder.getFilesize ("f: /123/4563.txt")
'' Response.WritemyFileFolder.getFoldersize ("f: /123/123.txt")
'' Response.WritemyFileFolder.ShowFileAccessInfo ("f: /123/123.txt", 1) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("F: /123/123.txt", 2) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("F: /123/123.txt", 3) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("f: /123/123.txt", 4) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("f: /123/123.txt", 5) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("F: /123/123.txt", 6) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("F: /123/123.txt", 7) & "<br>"
'' Response.WritemyFileFolder.ShowFileAccessInfo ("f: /123/123.txt", 8) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("f:/123/", 1) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("f:/123/", 2) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("F:/123/", 3) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("f:/123/", 4) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("F:/123/", 5) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("f:/123/", 6) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("F:/123/", 7) & "<br>"
'' Response.WritemyFileFolder.ShowFolderAccessInfo ("F:/123/", 8) & "<br>"
'' Response.WritemyFileFolder.WritetXtFile ("F: /123/cexo.txt", "", 1) & "<br>"
'' Response.WritemyFileFolder.WritetxtFile ("F: /123/cexo.txt", "Cexowxfdw", 1) & "<br>"
'' Response.WritemyFileFolder.WritetXtFile ("F: /123/cexo.txt", Chr (13) e Chr (10)
& "Cexowxfdw", 2) & "<br>"
'' Response.WritemyFileFolder.ReadTxtFile ("F: /123/cexo.txt") & "<br>"
Response.WritemyfileFolder.DisplayLevelDepth ("F:/DITG/DITG/BUMEN/imagens") & "<br>"
ClassFileFolderCls
PublicFSO
Privatesubclass_initialize ()
Setfso = createObject ("script.filesystemoBject")