作者puregon (puregon)
看板Web_Design
标题Re: [问题] 如何让网页自动产生连结？
时间Wed Aug 30 12:11:21 2006
※ 引述《holybug (胖子)》之铭言：
: 请问各位，假如我只是想单纯的建立一个页面，让我用FTP上传档案後，页面就会
: 自动产生该档案的连结，以供使用者下载。请问我该如何写这个网页呢？
: 我目前的作法是直接什麽网页都不放，让APACHE 自动列出目录下的档案，但是这样
: 有点丑，而且我想要用 GOOGLE Analytics来分析下载行为，不知有没有什麽好的建议？
这段asp给你参考罗 ^^
若是你使用iis开ftp帐号给人上传，
这段asp会将该资料夹的档案资料列出来，并产生相对应的连结供人下载罗
<%
Set fsoFL = Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = fsoFL.GetFolder (Server.mappath("5Downloads/upload"))
Set objFiles = objFolder.Files
For Each file in objFiles
sfilename=file.name
idate=file.DateCreated
fsize=file.size
sExt = lcase(right(sfilename,4))
response.write "<a
href='5Downloads/S_login.asp?filename="&sfilename&"'>"&sfilename& "</a><BR>"
'response.write "<a href=5Downloads/ "&sfilename&"</a>"
'response.write " 档案大小:"&fsize
&" 建档日期:"&idate &"<br>"
'接下来用select case来判断副档名,计算数量
Next
%>
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 163.22.22.75