fso的中文路径问题!
以下是一段很简单的代码,目的是列出某个文件夹下的所有子目录。
其中红色部分的路径名是英文时一切正常,只要包含中文就会显示无法找到路径的错误。
用了server.urlencode后依然不起作用,大家帮帮忙吧。
<%
Set objFSO= Server.CreateObject("Scripting.FileSystemObject")
call showfolderlist("F:\校内数字资源库\VideoBank")
Public Function ShowFolderList(FolderSpec)
response.Write(FolderSpec)
Dim f, f1, fc, s
Set f = objFSO.GetFolder(FolderSpec)
Set fc = f.SubFolders
For Each f1 in fc
s = s & f1.name
s = s & "|"
Next
response.write s
End Function
%>