|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
Many times we might need some part of code which will access all sub-folders of the server and also all files within the sub-folder. The following line of asp code will map to a specified folder and searches all the sub-folders (Not recursively, code can be extended to do) and reads all files(basically text files) one by one. You can specify any folder name, in the remarks given in the code (within " ") \\\'Create a File system Object set FileSystem=server.CreateObject("scripting.filesystemobject") dim dbconn folderpath=server.MapPath("main Folder path" ) set sfolder=Filesystem.GetFolder(folderpath).SubFolders for each FolderItem in sfolder set Files=FolderItem.Files for each FileItem in Files fname=server.MapPath( "main folder path" & FolderItem.Name & "" & FileItem.Name set File=FileSystem.OpenTextFile(fname,1,false) while File.AtEndofStream <> True record=split(File.Readline,"~") wend File.close FileSystem.DeleteFile(fname) next next 返回类别: 教程 上一教程: ASP字符串函数大全 下一教程: ASP OBJECT之:CONTENTTYPE 您可以阅读与"读取目录下的所有文件(源码)"相关的教程: · 读取目录下的所有文件(源码) · 列出指定目录下的所有文件和目录 · 读取目录下的文件得到一个数组 · 自动清空站点目录下所有文件 · 使用递归获取网站下的所有同类型文件 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |