Afficher l'URI du script/page en cours en ASP + Compter les array

N'ayant pas trouvé d'équivalence à PHP_SELF ($_SERVER['PHP_SELF']) en ASP, voici comment récupérer le nom du fichier courrant dans un script ASP.

 'on recupère l'URL d'accès du script en cours…
      URL = Request.ServerVariables("SCRIPT_NAME")

'on split l'url avec "/"
      arrText = Split(URL,"/")

'On compte le nombre de valeur du tableau généré par split()
      NbArray=UBound(arrText)
'On ressort la dernière valeur du tabelau
      ScriptCourant = arrText(NbArray)
'On affiche le nom du script courrant
      Response.write(ScriptCourant)