我为我所工作的公司开发了一个ASP安全页面.有一个登陆(登录页面),一旦您通过身份验证,您将进入一个包含多个子页面链接的页面.每个子页面都有一个文件夹结构.例如:有一个会议纪要标题,然后在下面,缩进是引用包含信息的PDF的链接.可能有3或4个标题,文档链接在下面.
原始版本有一个PHP脚本,它运行并将从文件夹结构同步到服务器上的实时站点,该文件夹结构将被模仿到实际站点上.因此,如果我有一个名为Folder1的文件夹和名为test1 test2 test3的子文件夹,则实时网站会相应地显示它们.由于该站点现在是ASP而不是PHP .. PHP脚本不再起作用(因为PHP不能很好地与ASP一起使用).
我发现一个在线片段有点适用于我想要实现的目标(即文件夹/子文件夹/文件名称结构),但是我现在停留在如何链接文件以便在单击时打开它们.我一直在文件名中看到%25.我知道%20与空格相同,因为我处理的是包含空格的文件和文件夹名称,这似乎是我的问题.我尝试添加%20但空格变为"%2520".
如果您查看下面的代码,则会在底部显示一个名为"MapURL"的链接.当我试图找出%25来自何处时,我现在已将该链接注释掉了.任何人都有任何想法如何让链接工作?
这是片段.
dim path
path = "PATH TO THE FOLDER ON THE SERVER"
ListFolderContents(path)
sub ListFolderContents(path)
dim fs, folder, file, item, url
set fs = CreateObject("Scripting.FileSystemObject")
set folder = fs.GetFolder(path)
'Display the target folder and info.
Response.Write("<ul><b>" & folder.Name & "</b>") '- " _
' & folder.Files.Count & " files, ")
'if folder.SubFolders.Count > 0 then
' Response.Write(folder.SubFolders.Count & " directories, ")
'end if
'Response.Write(Round(folder.Size / 1024) & " KB total." _
' …Run Code Online (Sandbox Code Playgroud) asp-classic ×1