最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
asp 显示文件夹下面所有文件代码
时间:2022-06-30 11:42:05 编辑:袖梨 来源:一聚教程网
<%   
Whichfolder=server.mappath("") &"/"  
Dim fs, f, f1, fc  
Set fs = CreateObject("Scripting.FileSystemObject")  
Set f = fs.GetFolder(Whichfolder)  
Set fc = f.files
For Each f1 in fc  
 Response.write (f1.name & "
")  
Next  
%>
实例二.
<%   
Whichfolder=server.mappath("") &"/cgi-bin/"  
Dim fs, f, f1, fc  
Set fs = CreateObject("Scripting.FileSystemObject")  
Set f = fs.GetFolder(Whichfolder)  
Set fc = f.files
For Each f1 in fc  
 Response.write (f1.name & "
")  
Next  
%>
好了就OK
相关文章
- 辉烬知世怎么配队 知世配队攻略 10-31
- 口袋斗罗大陆独孤博技能是什么 独孤博技能介绍一览 10-31
- 王者万象棋香香怎么玩 香香玩法介绍 10-31
- 王者万象棋阵容怎么搭配 阵容搭配攻略 10-31
- 王者万象棋怎么玩 新手玩法攻略 10-31
- 植物大战僵尸2万圣节版本有哪些新植物 万圣节版本新植物介绍 10-31
 
             
                                 
                                 
                                 
                                 
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                         
                                            
                                        