Ver Mensaje Individual
  #4 (permalink)  
Antiguo 24/01/2002, 04:05
FeReNZCy
 
Fecha de Ingreso: junio-2001
Mensajes: 110
Antigüedad: 24 años
Puntos: 0
Re: Links en noticias 2: El Retorno

Bueno, parece que al fin lo he conseguido... como no me ha contestado nadie entiendo que habrá mucha gente que no sepa cómo se hace esto así que voy a poner el código que he hecho (que no es el mejor del mundo pero funciona).
<BLOCKQUOTE><font size=1 face=arial>Citando:<hr height=1 noshade>&lt;script language=&quot;VBScript&quot;&gt;
public VLink,VSmile

sub Addlink()
MyURL=inputbox(&quot;Teclea una URL&quot;)
Mylink=inputbox(&quot;Teclea texto del link&quot;)
VLink=&quot;&lt;b&gt;&lt;a href=&quot; &amp; chr(34) &amp; &quot;http://&quot; &amp; MyURL &amp; chr(34) &amp; &quot;&gt;&quot; &amp; Mylink &amp; &quot;&lt;/a&gt;&lt;/b&gt;&quot;
formul.txt_noti.value=formul.txt_noti.value &amp; &quot;[Link]&quot;
end sub

sub Addsmile()
VSmile=&quot;&lt;img src=&quot; &amp; chr(34) &amp; &quot;midirectoriodeimagenes/smile.gif&quot; &amp; chr(34) &amp; &quot;&gt;&quot;
formul.txt_noti.value=formul.txt_noti.value &amp; &quot;[]&quot;
end sub

sub Validar()
formul.txt_noti.value=replace(formul.txt_noti.valu e,&quot;[Link]&quot;,VLink)
formul.txt_noti.value=replace(formul.txt_noti.valu e,&quot;[]&quot;,VSmile)
end sub
&lt;/script&gt;
&lt;/head&gt;

&lt;body background=&quot;midirectoriodeimagenes/bg.gif&quot; text=&quot;#FFFFFF&quot; link=&quot;#FFFFFF&quot; vlink=&quot;#FFFFFF&quot; alink=&quot;#FFFFFF&quot;&gt;
&lt;div align=&quot;center&quot;&gt;
&lt;form method=&quot;post&quot; action=&quot;guardarenBD.asp&quot; name=&quot;formul&quot;&gt;
&lt;div class=&quot;txtnoti&quot;&gt;Cabecera de la noticia:&lt;/div&gt;
&lt;input type=&quot;text&quot; name=&quot;txt_cab&quot; maxlength=&quot;25&quot;&gt;&lt;br&gt;
&lt;div class=&quot;txtnoti&quot;&gt;Texto de la noticia:&lt;/div&gt;
&lt;p&gt;
&lt;textarea name=&quot;txt_noti&quot; cols=&quot;60&quot; rows=&quot;8&quot; &gt;&lt;/textarea&gt;
&lt;br&gt;
&lt;input type=&quot;button&quot; name=&quot;Link&quot; value=&quot;Link&quot; onclick=&quot;Addlink&quot;&gt;
&lt;input type=&quot;button&quot; name=&quot;Smile&quot; value=&quot;Smile&quot; onclick=&quot;Addsmile&quot;&gt;
&lt;/p&gt;
&lt;p&gt;
&lt;input type=&quot;submit&quot; name=&quot;btn_ok&quot; value=&quot;Aceptar&quot; onclick=&quot;Validar&quot;&gt;
&lt;/p&gt;
&lt;/form&gt;
&lt;/div&gt;&lt;/body&gt;
&lt;/html&gt; [/QUOTE]

Espero que resuelva muchas dudas.
FeReNZCy