一个使用 FSO 的 Classe , 前面的文章也有提到。这里有比较多的一些实例。
<%
Dimmyfilefolder
SetMyFileFolder = newFileFoldercls
'' Response.WritemyFileFolder.moveaFile ("F: /123/4561.exe", "F: /123/4562.txt")
'' Response.WritemyFileFolder.moveafolder ("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.Deleatile ("F: /123/4562.txt")
'' Response.WritemyFileFolder.Deleafolder ("F: / 456 /")
'' Response.WritemyFileFolder.CreateFolderDemo ("F: / 147 /")
'' Réponse.writemyfilefolder.getFilesize ("F: /123/4563.txt")
'' Réponse.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>"
'' Réponse.writemyfilefolder.writeTxtFile ("f: /123/cexo.txt", "cexowxfdw", 1) & "<br>"
'' Réponse.writemyfilefolder.writeTxtFile ("f: /123/cexo.txt", chr (13) & chr (10)
& "cexowxfdw", 2) & "<br>"
'' Réponse.writemyfilefolder.readtxtfile ("f: /123/cexo.txt") & "<br>"
Response.WriteMyFileFolder.DisplayLevelDepth ("F: / Ditg / Ditg / Bumen / Images") & "<br>"
Classfilefoldercls
Publicfso
PRIVATESUBCLASS_INITIALIZE ()
Setfso = createObject ("scripting.fileSystemObject")