RESOLVEURL/Url.Content等效于传统的ASP

Question

在表单/ MVC中，我们可以使用脚本和链接的， 脚本SRC = “Url.Content（ ”〜/脚本/ util.js中“）”

任何人都可以告诉我什么是经典的asp等价物？

Answer 1

没有直接的等价物，甚至没有直接的方法来确定应用程序的虚拟路径。以下几个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