解决方法
没有直接的等价物,甚至没有直接的方法来确定应用程序的虚拟路径.以下几个VBScript函数应该提供以下功能：
Function UrlContent(sUrl)
If InStr(1,sUrl,"~/") = 1 Then
UrlContent = ApplicationPath & Mid(sUrl,2)
Else
UrlContent = sUrl
End If
End Function
Function ApplicationPath()
Dim pos: pos = Len(Request.ServerVariables("INSTANCE_Meta_PATH")) + 6
ApplicationPath = Mid(Request.ServerVariables("APPL_MD_PATH"),pos)
End Function
