请大侠帮助看一下该程序错在哪里,解决思路
日期：2014-05-17 浏览次数：20830 次
请大侠帮助看一下该程序错在哪里,急!!
<html>
<head>
<title> 显示目录及文件并做成链接 </title>
</head>
<body>
<%
dirto= "bbs/ "
set fs=createobject( "scripting.filesystemobject ")
set f=fs.getfolder(server.mappath(dirto))
set fd=f.subfolders
response.write " <h2> 目录 </h2> <blockquote> "
for each whatever in fd
response.write " <a href= ' "
response.write.request.servervariables( "script_name ")
response.write "?path= "&whatever.name
response.write " '> "
response.write whatever.name& "- "whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
response.write " <h2> 文件 </h2> <blockquote> "
set fc=f.files
for each whatever in fc
response.write " <a href= ' "
response.write dirto&whatever.name
response.write " '> "
response.write.whatever.name& "- "whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
%>
</body>
</html>
------解决方案--------------------
<html>
<head>
<title> 显示目录及文件并做成链接 </title>
</head>
<body>
<%
dirto= "adsjs/ "
set fs=createobject( "scripting.filesystemobject ")
set f=fs.getfolder(server.mappath(dirto))
set fd=f.subfolders
response.write " <h2> 目录 </h2> <blockquote> "
for each whatever in fd
response.write " <a href= ' "
response.write request.servervariables( "script_name ")
response.write "?path= "&whatever.name
response.write " '> "
response.write whatever.name& "- "&whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
response.write " <h2> 文件 </h2> <blockquote> "
set fc=f.files
for each whatever in fc
response.write " <a href= ' "
response.write dirto&whatever.name
response.write " '> "
response.write whatever.name& "- "&whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
%>
</body>
</html>
<html>
<head>
<title> 显示目录及文件并做成链接 </title>
</head>
<body>
<%
dirto= "bbs/ "
set fs=createobject( "scripting.filesystemobject ")
set f=fs.getfolder(server.mappath(dirto))
set fd=f.subfolders
response.write " <h2> 目录 </h2> <blockquote> "
for each whatever in fd
response.write " <a href= ' "
response.write.request.servervariables( "script_name ")
response.write "?path= "&whatever.name
response.write " '> "
response.write whatever.name& "- "whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
response.write " <h2> 文件 </h2> <blockquote> "
set fc=f.files
for each whatever in fc
response.write " <a href= ' "
response.write dirto&whatever.name
response.write " '> "
response.write.whatever.name& "- "whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
%>
</body>
</html>
------解决方案--------------------
<html>
<head>
<title> 显示目录及文件并做成链接 </title>
</head>
<body>
<%
dirto= "adsjs/ "
set fs=createobject( "scripting.filesystemobject ")
set f=fs.getfolder(server.mappath(dirto))
set fd=f.subfolders
response.write " <h2> 目录 </h2> <blockquote> "
for each whatever in fd
response.write " <a href= ' "
response.write request.servervariables( "script_name ")
response.write "?path= "&whatever.name
response.write " '> "
response.write whatever.name& "- "&whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
response.write " <h2> 文件 </h2> <blockquote> "
set fc=f.files
for each whatever in fc
response.write " <a href= ' "
response.write dirto&whatever.name
response.write " '> "
response.write whatever.name& "- "&whatever.datecreated
response.write " </a> <br> "
next
response.write " </blockquote> <hr> "
%>
</body>
</html>
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
