<%
TruePath=Server.MapPath("../pic" )'pic下面的所以文件
set fso=CreateObject("Scripting.FileSystemObject")
if fso.FolderExists(TruePath)then
Set theFolder=fso.GetFolder(TruePath)
For Each theFile In theFolder.Files
response.Write theFile.name
next
else
response.write "找不到文件夹!可能是配置有误!"
end if
%>
TruePath=Server.MapPath("../pic" )'pic下面的所以文件
set fso=CreateObject("Scripting.FileSystemObject")
if fso.FolderExists(TruePath)then
Set theFolder=fso.GetFolder(TruePath)
For Each theFile In theFolder.Files
response.Write theFile.name
next
else
response.write "找不到文件夹!可能是配置有误!"
end if
%>
任务可能不能完成,因为那个js写得很复杂
作者:Else 's Blog
地址:http://www.aixq.com/post/288/
版权所有。转载时必须链接形式注明作者和原始出处及本声明!
中查看更多“asp文件遍历代码”相关内容
中查看更多“asp文件遍历代码”相关内容
中查看更多“asp文件遍历代码”相关内容
中查看更多“asp文件遍历代码”相关内容
中查看更多“asp文件遍历代码”相关内容
中查看更多“asp文件遍历代码”相关内容最后编辑: Else 编辑于2006/06/19 02:50
mbsky的一个js
asp文件遍历代码的扩展


2006/06/19 02:46 | by 
