请问这个问题怎么解决啊
<body>
<%
dim fso,rs,ok
dim f
Set fso = Server.CreateObject("Scripting.FileSystemObject")
'rs=server.mappath("chap08")
f=fso.getfolder("d:\chapter05\chap08") 这个地址是没问题的,chap08是个文件夹
for each file1 in f.files%> 这就是16行 运行后出错:Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: 'D:\Chapter05\chap08'
/fso.asp, 第 16 行
<tr>
<td><%=File1.Name%></td>
<td width="25%">
<div align="center">
<%=File1.Type%></div>
</td>
<td width="5%">
</tr>
<% next
%>
</body>
[此贴子已经被作者于2007-8-10 12:11:55编辑过]