Ver Mensaje Individual
  #4 (permalink)  
Antiguo 02/08/2002, 05:34
Avatar de nazkatuta
nazkatuta
 
Fecha de Ingreso: julio-2002
Ubicación: EH - BCN
Mensajes: 222
Antigüedad: 22 años, 9 meses
Puntos: 0
Re: Urgente.¿que Significa Mid En Visual Basi?


Hola de nuevo

<%
Function FormatURL(strPath)
iPos = InStr(1,strPath,"wwwroot",1)
str = Mid(strPath,iPos+7,Len(strPath))
FormatURL = Replace(str,"\","/")
End Function
%>


Parece que lo que hace es, partiendo de una direccion url, buscar en este string(strPath) la posicion en la que se encuentra un substring ("wwwroot"), y luego mediante la función MID guarda en la variable str el contenido de strPath sin el "wwwroot" y lo que le precede.

luego substituye las \ por /.

Ejemplo, si tenemos como strPath = "http://wwwroot/tal/cual/yesto"
obtendremos
str = "tal\cual\yesto"

al menos eso creo, jeje
suerte