Ermitteln Sie eine absolute URL zu einer Ressource mithilfe von VBScript/classic asp

Question

Ich habe ein Pseudo-Benutzersteuerelement für eine Website erstellt in klassischen ASP geschrieben. Das Steuerelement ist einfach eine Asp-Seite (mit vollständigen HTML-Headern und Text), die sich in einem iframe auf der übergeordneten Seite befindet. Es ging darum, eine AJAX-ähnliche Oberfläche für das asynchrone Hochladen von Dateien zu erstellen (die übergeordnete Seite enthält ein großes Formular und ich wollte die Dateien nicht hochladen und den Rest des Formulars zur gleichen Zeit absenden).
Das Problem ist, ich habe eine Menge Probleme mit relativen URLs in der Iframe-Seite/Benutzer-Steuerelement verwendet. Je nachdem, welche Seite ist die iframe ein Kind, die relative URL Basis Lage nach dem Verzeichnis zu ändern scheint, dass bestimmte Seite in ist

. Beispiel: www.website.com/directory1/application1.asp

... 
<form> 
    <input> 
    ... 
    <iframe src="../controls/FileUpload.asp"/> 
    ... 
</form> 
... 

www.website.com/directory1/directory2/application2.asp

... 
<form> 
    <input> 
    ... 
    <iframe src="../../controls/FileUpload.asp"/> 
    ... 
</form> 
... 

www.website.com/controls/FileUpload.asp

... 
<form method="post" enctype="multipart/form-data" action="FileUpload.asp"><!--problem here--> 
    <input type="file"> 
    <input type="submit"/> 
</form> 

Die iframe src-Pfade funktionieren ordnungsgemäß (beachten Sie, dass der Pfad, der tiefer in ein Verzeichnis eingebettet ist, einen zusätzlichen doppelten Punkt enthält). Im Code für die Seite FileUpload.asp funktionieren relative URLs jedoch nicht konsistent. Die URL, die ich im Aktionsattribut für das Formular-Tag habe, funktioniert, wenn Sie die Seite einfach so wie sie ist laden, nicht in einem Iframe einer anderen Seite. Sie können es in "../controls/FileUpload.asp" ändern und es wird auf der ersten Anwendungsseite funktionieren, aber Sie müssen ein weiteres "../" hinzufügen, damit es auf der zweiten Anwendungsseite funktioniert.
Ich frage mich, ob es vielleicht einen Weg mit VBScript gibt, um die absolute URL zu einer bestimmten Datei zu finden. Ich benutze eine Include-Datei, in die ich das hart codieren könnte, aber ich würde lieber nicht, wenn das möglich ist. Irgendwelche anderen Ideen?

Answer 1

Sie könnten auch Geben Sie einfach einen absoluten Pfad vom Stammverzeichnis ein, z. B. action = "/ controls/FileUpload.asp"

Answer 2

Ich bin mir nicht sicher, ob Sie vielleicht suchen

<% 
Response.Write Server.MapPath("./foo.txt") 
%> 

Some usefull code von Thorarin , die ich gerade gesehen, in einem different post

Suchen Sie nach Thispage() Funktion