como hago; [email protected]

[zangano]

Pues eso, así como esta en los perfiles de estos foros, quiero que al desplegar los mails de una db, omita la info que va despues del arroba, como se hace¡¡¡¡¡


Grazie de antemano al que me quiera ayudar
saludos

[urjose]

<%
Correo="[email protected]"
LugarArroba=Instr(Correo,"@")
LugarPunto=Instr(Correo,".")
LongitudCadena=Len(Correo)

Usuario=Left(Correo,LugarArroba)
Dominio=Len(Mid(Correo,LugarArroba+1,LugarPunto-1))
Terminacion=Right(Correo,LongitudCadena-LugarPunto+1)

Response.Write Usuario&"*******"&Terminacion
%>


Saludos



<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>

[zangano]

Gracias, pero pues soy medio wey y tengo un error bien chafa, jeje :P


Yo pongo esto, para sacar el mail de la db, y me manda error..

Correo=&quot;&lt;% = rs(&quot;email&quot;) %&gt;&quot;


..como va¡¡¡¡¡, ya le puse dobles comillas, le quite las comillas, comillas simples, le puse &amp;, y no me sale¡¡¡


Cual es la sintaxis correcta???, cualquiera, por favor ayuda¡¡¡¡

saludos e igual desde ya gracias

[AlZuwaga]

Gracias, pero pues soy medio wey

Yo diría wey del todo


&lt;%
Correo= rs(&quot;email&quot;)
LugarArroba=Instr(Correo,&quot;@&quot;)
LugarPunto=Instr(Correo,&quot;.&quot;)
LongitudCadena=Len(Correo)

Usuario=Left(Correo,LugarArroba)
Dominio=Len(Mid(Correo,LugarArroba+1,LugarPunto-1))
Terminacion=Right(Correo,LongitudCadena-LugarPunto+1)

Response.Write Usuario&amp;&quot;*******&quot;&amp;Terminacion
%&gt;

saludos

PD: Era un chiste lo anterior ;)