Ver Mensaje Individual
  #13 (permalink)  
Antiguo 08/06/2004, 18:56
Avatar de CHuLoSoY
CHuLoSoY
 
Fecha de Ingreso: febrero-2002
Ubicación: Ribeira (Galicia)
Mensajes: 1.900
Antigüedad: 23 años, 2 meses
Puntos: 29
Hay un error en el código de escribir.asp. No es un error de código fuente, sino que al ponerlo aquí, se han convertido las etiquetas en negrita, cursiva, enlace, subrayado... pero lo pongo ahora bien.

Código:
<%
cookie=request.cookies("cookie")
%><html><head>
<script language="javascript" src="funciones.js"></script>
<script>
function storeCaret(text) { 
if (text.createTextRange) {
text.caretPos = document.selection.createRange().duplicate();
}
}

function meter(text) {
var postopic=document.frmEntrada.mensaje
if (postopic.createTextRange && postopic.caretPos) {      
var caretPos = postopic.caretPos;      
caretPos.text = caretPos.text.charAt(caretPos.text.length - 1) == ' ' ?text + ' ' : text;
}
else postopic.value += text;
postopic.focus(caretPos)
}

function codigo(accion)
{
switch(accion)
{
case "bold":
negras = prompt("Texto en Negrita", "");
if(negras)
{
negras="(b)"+negras+"(/b)"; /***---> sustituir los () por []
meter(negras);
}
break;
case "italics":
italics = prompt("Texto en cursiva", "");
if(italics)
{
italics="(i)"+italics+"(/i)"; /***--> sustituir los () por []
meter(italics);
}
break;

case "url":
url = prompt("Dirección para enlace (con http://)", "http://");
urltxt = prompt("Texto para mostrar en el enlace",url);
if(url)
{
url="(url)"+url+"[txturl]"+urltxt+"(/url)"; /*** idem
meter(url);
}
break;


case "imgurl":
url = prompt("Dirección para enlace (con http://)", "http://www.direccion.com");
img = prompt("Dirección exacta de la imagen","http://www.direccion.com/imagen.gif");
if(url)
{
url="(url)"+url+"(txturl)(img)"+img+"(/img)(/url)"; /****idem
meter(url);
}
break;



case "imagen":
imagen = prompt("Dirección exacta de la imagen", "http://");
if(imagen)
{
imagen="[img]"+imagen+"[/img]";
meter(imagen);
}
break;
/*** fin del código de CHuLoYo**/

case "cita":
code="[cita]  [/cita]";
meter(code);
break;
case "subrayado":
subrayado = prompt("Texto subrayado", "");
if(subrayado)
{
subrayado="(u)"+subrayado+"(/u)"; /*** y aquí
meter(subrayado);
}
break;
default:
meter(accion);
break;
}
}


  function textCounter(field, countfield, maxlimit) {
   if (field.value.length > maxlimit)
    field.value = field.value.substring(0, maxlimit);
   else 
    countfield.value = maxlimit - field.value.length;
  }

</script></head>
<body topmargin="10">
<div align="center">
<center><table width="700" border="0" cellspacing="0" cellpadding="4" style="border-left-style: solid; border-left-width: 1"><tr><td width="700" valign="top" bgcolor="#F5F5F5" style="border: 1 solid #C0C0C0"><table border="0" width="689" cellspacing="0" cellpadding="0"><tr><td width="371">
<i><b><font face="Times New Roman" size="5" color="#800000">Escribir</font><br><font color="#0000ff" face="Times New Roman" size="3"><%
      if request.querystring("a")="n" then
          response.write("Iniciar tema")
      else
          response.write("Responder")
      end if%></font>
</b></i></td><center>
<td width="314" valign="bottom"><p align="right"><a href="javascript:adminforo()" class="adminforo">Administración</a> | <a href="foro.asp?id=<%=request.querystring("f")%>" class=adminforo>Inicio</a></td></tr></table><form action="<%
    if request.querystring("a")="n" then
           response.write("nuevomsg.asp?a=n")
    else
    		 response.write("nuevomsg.asp?a=r")
    end if
    %>" name="frmEntrada" method=post><input type="hidden" name="foroid" value="<%=request.querystring("f")%>">
    <input type="hidden" name="msgid" value="<%=request.querystring("id")%>"><table border="0" width="100%" style="background-color: #E4E4E4; border: 1 solid #808080" cellspacing="0" cellpadding="5"><tr><td width="19%"> </td><td width="11%">Nombre: </td>
<td width="70%"><input type="text" name="nombre" size="20" value="<%=cookie%>" style="font-family: Tahoma; font-size: 8pt; background-color: #F5F5F5; border: 1 solid #C0C0C0"></td></tr>
<tr><td width="19%"> </td>
<td width="11%">Asunto: </td><td width="70%"><input type="text" name="asunto" value="<%
        if request.querystring("a")="r" then
        set rst = Server.CreateObject("ADODB.Recordset")
set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data source="&Server.MapPath("foros.mdb"))
sql = "Select * from mensajes where id="&request.querystring("id")&""
rst.Open sql,cnn,3,3

asunto=rst("asunto")

rst.close
cnn.close
        response.write("RE: "&asunto)
        
        end if%>" size="50" style="font-family: Tahoma; font-size: 8pt; background-color: #F5F5F5; border: 1 solid #C0C0C0"></td></tr><tr><td width="19%"> </td><td width="11%"> </td>
<td width="70%"><font face="Times New Roman"><a href="javascript:meter('[font times]TEXTO[/font]')">Times New Roman</a></font> - <font face="Verdana"><a href="javascript:meter('[font verdana]TEXTO[/font]')">Verdana</a></font>
          - <font face="Tahoma"><a href="javascript:meter('[font tahoma]TEXTO[/font]')">Tahoma</a></font> - <font face="Courier New"><a href="javascript:meter('[font courier]TEXTO[/font]')">Courier
          New</a></font> / <a href="javascript:meter('[color verde]TEXTO[/color]')"><font color="#008000">Verde</font></a> -
          <a href="javascript:meter('[color rojo]TEXTO[/color]')"><font color="#FF0000"> Rojo</font></a> -
          <a href="javascript:meter('[color azul]TEXTO[/color]')"><font color="#0000FF"> Azul</font></a></td></tr>
<tr><td width="19%" valign="top"><table border="0" width="100%" cellspacing="0" cellpadding="8">
<tr><td width="33%" align="center"><a href="javascript:meter('[1]')"><img border="0" src="caras/1.gif"></a></td><td width="33%" align="center"><a href="javascript:meter('[2]')"><img border="0" src="caras/2.gif"></a></td>
<td width="34%" align="center"><a href="javascript:meter('[3]')"><img border="0" src="caras/3.gif"></a></td>
</tr><tr><td width="33%" align="center"><a href="javascript:meter('[4]')"><img border="0" src="caras/4.gif"></a></td>
              <td width="33%" align="center"><a href="javascript:meter('[5]')"><img border="0" src="caras/5.gif"></a></td>
              <td width="34%" align="center"><a href="javascript:meter('[6]')"><img border="0" src="caras/6.gif"></a></td></tr>
<tr><td width="33%" align="center"><a href="javascript:meter('[7]')"><img border="0" src="caras/7.gif"></a></td>
<td width="33%" align="center"><a href="javascript:meter('[8]')"><img border="0" src="caras/8.gif"></a></td><td width="34%" align="center"><a href="javascript:meter('[9]')"><img border="0" src="caras/9.gif"></a></td>
</tr><tr><td width="33%" align="center"><a href="javascript:meter('[10]')"><img border="0" src="caras/10.gif"></a></td>
<td width="33%" align="center"><a href="javascript:meter('[11]')"><img border="0" src="caras/11.gif"></a></td>
<td width="34%" align="center"><a href="javascript:meter('[12]')"><img border="0" src="caras/12.gif"></a></td></tr><tr><td width="33%" align="center"><a href="javascript:meter('[13]')"><img border="0" src="caras/13.gif"></a></td>
<td width="33%" align="center"><a href="javascript:meter('[14]')"><img border="0" src="caras/14.gif"></a></td><td width="34%" align="center"><a href="javascript:meter('[15]')"><img border="0" src="caras/15.gif"></a></td>
</tr><tr><td width="33%" align="center"><a href="javascript:meter('[16]')"><img border="0" src="caras/16.gif"></a></td><td width="33%" align="center"><a href="javascript:meter('[17]')"><img border="0" src="caras/17.gif"></a></td><td width="34%" align="center"><a href="javascript:meter('[18]')"><img border="0" src="caras/18.gif"></a></td></tr><tr><td width="33%" align="center"><a href="javascript:meter('[19]')"><img border="0" src="caras/19.gif"></a></td>
              <td width="33%" align="center"><a href="javascript:meter('[20]')"><img border="0" src="caras/20.gif"></a></td>
              <td width="34%" align="center"><a href="javascript:meter('[21]')"><img border="0" src="caras/21.gif"></a></td></tr><tr><td width="33%" align="center"></td><td width="33%" align="center"></td><td width="34%" align="center"></td></tr>
<tr><td width="33%" align="center"></td><td width="33%" align="center"></td><td width="34%" align="center"></td></tr>
<tr><td width="33%" align="center"></td><td width="33%" align="center"></td><td width="34%" align="center"></td></tr></table>
 </td><td width="11%" valign="top"> <a href="javascript:codigo('bold')">Negrita</a>
<p><a href="javascript:codigo('italics')">Cursiva</a></p><p><a href="javascript:codigo('subrayado')">Subrayado</a></p><p><a href="javascript:codigo('cita')">Cita</a></p>
<p><a href="javascript:codigo('url')">Enlace</a></p><p><a href="javascript:codigo('imagen')">Imagen</a></p>
<p><a href="javascript:codigo('imgurl')">Enlace con imagen</a> </td><td width="70%"> <textarea rows="20" name="mensaje" onKeyUp="textCounter(this.form.mensaje,this.form.remLen,21000);"  cols="89" style="background-color: #F5F5F5; font-family: Tahoma; font-size: 8pt; border: 1 solid #C0C0C0"></textarea> </td></tr><tr><td width="19%" valign="top"> </td><td width="11%"> </td><td width="70%">Tienes <input readonly type=text name=remLen size=4 maxlength=3 value="21000" style="background-color: #E8E4E8; font-family: Tahoma; font-size: 10pt; border-style: solid; border-color: #DFE3DF"> caracteres en el mensaje.</td></tr><tr>
  <td width="19%" valign="top"> </td><td width="11%"> </td>
  <td width="70%"><input type="submit" value="       E N V I A R       " style="background-color: #F5F5F5; font-family: Tahoma; font-size: 8pt; border: 1 solid #C0C0C0">&nbsp;
<input type="reset" value="       B O R R A R       " style="background-color: #F5F5F5; font-family: Tahoma; font-size: 8pt; border: 1 solid #C0C0C0"></td></tr></table></form></td></tr></table></div>
</body></html>
__________________
ESQUIO Dominios y Hosting
Las mejores características con los mejores precios.