6-8.asp

而他65 人引入一45同意4yuh7iu7若他其二分3儿·56一6y65y7u7

<%
   Set fso=Server.CreateObject("Scripting.FileSystemObject")
   Set MF=fso.GetFolder("c:\abc")
   Set f=MF.Files

   Response.Write("c:\abc目录下共有" & f.Count & "个文件。<br>")
   set g=f.Item("t1.txt")               '此处返回了一个File对象,使得可对此文件进行操作
   Response.Write("文件的名字：" & g.Name & "<p>")   '显示刚在File对象定义的文件名
  
   '下面循环显示c:\abc下所有文件的名字
   For Each g in f
	Response.Write("此目录下有文件: " & g.Name & "<br>") 
   Next
%>