Ruta de archivo absoluta a URL relativa

Question

He visto muchos tutoriales sobre la resolución de una URL relativa a una ruta absoluta, pero quiero hacer lo contrario: resolver un archivo de ruta absoluta del sistema en una URL relativa.

¿Hay una buena manera libre de truco para convertir una ruta de archivo como c:\my_website_root\images\picture_a.jpg en images/picture_a.jpg

que he tenido un vistazo a Uri.MakeRelative() pero yo no creo que vaya a ser de utilidad en este caso.

Edición: He implementado como este, todavía parece hacky (especialmente la línea # 2)

var urlPath = new Uri(@"c:\mywebfolder\images\picture1.jpg"); 
var urlRoot = new Uri(Server.MapPath("~")+"/"); 
string relative = urlRoot.MakeRelativeUri(urlPath).ToString(); 

Answer 1

Esto debería ayudarle, Absolute path back to web-relative path

Answer 2

En IIS, configurar un directorio virtual y el punto images a c:\my_website_root\images\.

Si su sitio web ya está dirigiendo a c:\my_website_root\, no necesita hacer nada.

Answer 3

Si es necesario convertir todos los URL relativos a las direcciones URL absolutas utilizar este fucntion:

Private Function ConvertALLrelativeLinksToAbsoluteUri(ByVal html As String, ByVal PageURL As String) 
    Dim result As String = Nothing 

    ' Getting all Href 
    Dim opt As New RegexOptions 

    Dim XpHref As New Regex("(href="".*?"")", RegexOptions.IgnoreCase) 

    Dim i As Integer 
    Dim NewSTR As String = html 
    For i = 0 To XpHref.Matches(html).Count - 1 
     Application.DoEvents() 
     Dim Oldurl As String = Nothing 
     Dim OldHREF As String = Nothing 
     Dim MainURL As New Uri(PageURL) 
     OldHREF = XpHref.Matches(html).Item(i).Value 
     Oldurl = OldHREF.Replace("href=", "").Replace("HREF=", "").Replace("""", "") 
     Dim NEWURL As New Uri(MainURL, Oldurl) 
     Dim NewHREF As String = "href=""" & NEWURL.AbsoluteUri & """" 
     NewSTR = NewSTR.Replace(OldHREF, NewHREF) 


    Next 

    html = NewSTR 

    Dim XpSRC As New Regex("(src="".*?"")", RegexOptions.IgnoreCase) 

    For i = 0 To XpSRC.Matches(html).Count - 1 
     Application.DoEvents() 
     Dim Oldurl As String = Nothing 
     Dim OldHREF As String = Nothing 
     Dim MainURL As New Uri(PageURL) 
     OldHREF = XpSRC.Matches(html).Item(i).Value 
     Oldurl = OldHREF.Replace("src=", "").Replace("src=", "").Replace("""", "") 
     Dim NEWURL As New Uri(MainURL, Oldurl) 
     Dim NewHREF As String = "src=""" & NEWURL.AbsoluteUri & """" 
     NewSTR = NewSTR.Replace(OldHREF, NewHREF) 


    Next 


    Return NewSTR 


End Function