4-9.asp

来自「ASP+SQL Server动态网站开发从基础到实践教程」· ASP 代码 · 共 34 行

ASP

34 行

<html>
<head>
<title>4-9.asp</title>
</head>

<body>
<%
folderspec = "../chap4" 

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(server.mappath(folderspec))
Set fd = f.subfolders
response.write "<h2>目录</h2><blockquote>"
For Each whatever in fd

       response.write whatever.name & " - " & whatever.datecreated
       response.write "<br>"
Next
response.write "</blockquote><hr>"
response.write "<h2>文件</h2><blockquote>"
Set fc = f.files
For Each whatever in fc
       

       
       response.write whatever.name & " - " & whatever.datecreated
       response.write "<br>"
Next
response.write "</blockquote><hr>"
%>
</body>

</html>

4-9.asp - 源码说明

本页面展示了「ASP+SQL Server动态网站开发从基础到实践教程」中的 4-9.asp 源码文件，采用 ASP 编程语言编写，共 34 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Server相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?