udtræk af id nr. fra filnavn

Mit system opretter filer "on the fly". Hver gang der bliver oprettet noget nyt i min database oprettes der en asp fil der hedder det samme som id nr i databasen.
Jeg bruger derefter følgende til at finde id nr med:
<%
    strAddresse = Request.ServerVariables("SCRIPT_NAME")
    strAddresse = Right(strAddresse, Len(strAddresse) - InStrRev(strAddresse, "/"))
    strAddresse = Left(strAddresse, InStrRev(strAddresse, ".") - 1)
%>
Hvis jeg f.eks. vil kalde min fil "artikel12.asp" istedet for "12.asp" hvordan udtrækker jeg så id nr. ?!?

/Goose