Vous pouvez obtenir le chemin d'accès virtuel au fichier de l'une des variables du serveur - essayez soit:
Request.ServerVariables("PATH_INFO")
Request.ServerVariables("SCRIPT_NAME")
(mais pas INSTANCE_META_PATH
comme suggéré précédemment - cela vous donne le chemin de méta base, pas le chemin virtuel que vous attendez). Une variable du serveur vous donnera le chemin virtuel incluant tous les sous-répertoires et le nom du fichier - dans votre exemple, vous obtiendrez "/ répertoire_virtual/sous-répertoire/fichier.asp". Si vous voulez juste le répertoire virtuel, vous devrez dépouiller tout après la deuxième barre oblique en utilisant la méthode que vous préférez pour plumer un répertoire d'un chemin, comme:
s = Request.ServerVariables("SCRIPT_NAME")
i = InStr(2, s, "/")
If i > 0 Then
s = Left(s, i - 1)
End If
ou:
s = "/" & Split(Request.ServerVariables("SCRIPT_NAME"), "/")(1)