VBScript重定向到网络文件夹

时间:2015-06-21 03:23:53

标签: vbscript asp-classic

我最近接手了一个网页,我有一些编程知识,通常可以混淆我的方式,但我今天似乎无法得到它。

网站上有一段代码,当用户打开其中一个内部网页时,会在网络驱动器上打开一个文件夹。该文件夹是所有用户根据其网络登录名具有文件夹的位置。我希望它根据用户名打开网络驱动器上的用户个人文件夹,这样用户就不必搜索他们的文件夹。

我正在使用的当前代码如下,它打开了列出所有用户文件夹的网络驱动器

<SCRIPT language=VBScript> 
sub SF1 
    window.location = "\\path to user folders\"
end sub 
id = SetTimeOut("SF1",0,"VBScript")
</SCRIPT>

以下代码是我想要的,但由于某种原因无效

<SCRIPT language=VBScript> 
sub SF1 
    window.location = "\\path to user folders\" & username
end sub 
id = SetTimeOut("SF1",0,"VBScript")
</SCRIPT>

我正在使用以下内容来获取用户登录,其长度为6个字符

Right(Request.ServerVariables("LOGON_USER"),6)

但是,当我尝试使用它时,没有任何反应

<SCRIPT language=VBScript> 
sub SF1 
    window.location = "\\path to user folders\" & Right(Request.ServerVariables("LOGON_USER"),6)
end sub 
id = SetTimeOut("SF1",0,"VBScript")
</SCRIPT>

我已经尝试了几种排列,认为这是一个问题,引号可能没有正确传递,但我无法弄明白任何帮助将不胜感激。

此外,如果我输入用户文件夹的完整路径,它可以正常工作

<SCRIPT language=VBScript> 
sub SF1 
    window.location = "\\path to user folders\username\"
end sub 
id = SetTimeOut("SF1",0,"VBScript")
</SCRIPT>

1 个答案:

答案 0 :(得分:2)

Request.ServerVariables集合在服务器端可用,您必须将该值放入客户端脚本中:

window.location = "\\path to user folders\<%=Right(Request.ServerVariables("LOGON_USER"),6)%>\"
相关问题