Ricavare Indirizzo Virtuale da indirizzo fisico

[Giaco1993]

Salve programmatori vorrei porvi un'altra domanda dato il successo della prima =)

Io sto facendo una pagina di amministrazione in cui un admin specifica l'indirizzo FISICO in un banale campo testo di un' immagine e premendo sul tasto submit fa partire uno script che copia questa immagine da una directory a quella da cui un altro script la caricherà in un sito.
Io ho usato questo codice per spostamento dell' immagine:

Dim fso
		Set fso = CreateObject("Scripting.FileSystemObject")
   		call fso.MoveFile( Server.MapPath("..\Desert.jpg") ,                               Server.MapPath("..\Trash/Desert.jpg"))
		Set fso = Nothing

Quello che voglio è che l'admin non debba specificare l'indirizzo VIRTUALE (richiesto dalla MapPath) ma voglio che specifichi l'indirizzo FISICO del file.

Sunto finale: come converto un indirizzo fisico al suo corrispondente virtuale!?
Oppure: c'è un altro modo per fare quello che voglio? il campo di input type="file" ho provato ad usarlo ma con scarsi risultati =(

Grazie!!!

[Giaco1993]

Scusate! uso ASP, vbscript ed iis7!

[optime]

se hai il percorso fisico sei già a posto, quindi NON dervi mapparlo.

[br1]

Originariamente inviato da Giaco1993
Oppure: c'è un altro modo per fare quello che voglio? il campo di input type="file" ho provato ad usarlo ma con scarsi risultati =(

Ma tu stai parlando dell'indirizzo fisico sul pc dell'utente?

[Giaco1993]

Ho risolto! avevo fatto una gran confusione e basta =)

[optime]

----------------------------------------------------
nello spirito del forum, spiega come hai fatto, così aiuterai qualche altro forumista che dovesse avere lo stesso problema.
----------------------------------------------------

[Giaco1993]

La spiegazione è semplice! per farlo non mi serve fare quello che pensavo =) ho fatto casino e avevo capito mi servisse l'indirizzo virtuale invece per fare quello che volevo avevo bisogno di quello fisico =)
cmq il pezzo di codice è questo =)

titolo= request.form("titolo_news")
	contenuto = request.form("contenuto_news")
	path = request.form("immagine_news")
	if path <> "" Then
		vett = split(path,"\")
		immagine = vett(UBound(vett))
		Dim fso
		Set fso = CreateObject("Scripting.FileSystemObject")
		On Error Resume Next
		call fso.MoveFile( path , "C:\inetpub\wwwroot\simpac\pagine_includere\images\"&immagine)
set fso = Nothing

a posto =)