
07/02/2002, 15:59
|
 | | | Fecha de Ingreso: diciembre-2001
Mensajes: 5.286
Antigüedad: 23 años, 4 meses Puntos: 1 | |
Re: Detectar y convertir en url hola
hice de rapido un codigo que es la idea de lo que necesitas espero que te sirva de pauta para lograr lo que quieres, seria mejor pero me tengo que ir a clases jeje
bueno ahi va
<%
cadena="Hola este es mi sitio www.misitio.com"
dim arreglo()
arreglo=Split(cadena)
i=0
do until arreglo(i)=""
if instr(1,arreglo(i),"http://",1) and instr(1,arreglo(i),".com",1) Then
%>
<a href="<%=arreglo(i)%>"><%=ar reglo(i)%></a>
<%
End If
i=i+1
loop
%>
posiblemente traiga algunos errores pero seria cosa de que lo revisaras ademas de que noo comprobe que funcionara...
salu2 :) ;)
<embed src="http://www.autocar.com.mx/images/logo.swf" type="application/x-shockwave-flash" width="468" height="60" play="true" wmode="transparent" menu="false" loop="true"> |