Ver Mensaje Individual
  #5 (permalink)  
Antiguo 11/11/2005, 06:44
rrufo
 
Fecha de Ingreso: enero-2002
Mensajes: 1.438
Antigüedad: 23 años, 2 meses
Puntos: 0
seguro q es mejor solucion que lo q hice.

<%
Function Listar(str)
If (str <> "") then
MM_Listar = "<LI>"&(Replace(str,".", ".</LI><LI>"))&"XXX"
Listar = (Replace(MM_Listar,".</LI><LI>XXX", ".</LI>"))
else
Listar =""
end if
End Function
%>

menuda chapuza