Consejo sobre formateo campo memo

[almaluz]

Bueno hasta aqui es hasta donde llego.

El siguiente codigo que dejo tiene los siguientes fallos:

1º-Los enlaces de las primeras paginas no funcionan, sencillamente no hacen nada al pulsar sobre ellos. ( la ultima página si funciona)

2º- me divide el texto en paginas (bien) pero faltan caracteres entre pagina y pagina, o sea, el texto de la 2ª pagina no es la continuación de la primera, faltan palabras.

Ah, con este codigo se ve el texto que corresponde a la primera pagina directamente, sin tener que pulsar el 1.


<pre>
&lt;%
If request.QueryString(&quot;texto&quot;)&lt;&gt;&quo t;&quot; Then ' si recibo datos a traves del queryString los asigno a texto
texto=Request.QueryString(&quot;texto&quot;)
End If
filtro=Request.QueryString(&quot;id&quot;)
Dim con, rs, sql, campos
Set con=Server.CreateObject(&quot;ADODB.Connection&quo t;)
Set rs= Server.CreateObject(&quot;ADODB.RecordSet&quot;)
sql = &quot;SELECT * FROM articulos WHERE id=&quot;&amp;filtro&amp;&quot; ;&quot;
con.Open &quot;noticias&quot;
rs.Open sql, con


strCampoMemo = rs(&quot;noticia&quot;)
limite = 1000
longitud = len(strCampoMemo)
parrafo = &quot;&quot;
palabras = split(strCampoMemo,&quot; &quot;)
contador = 0
j = 0
for each elemento in palabras
parrafo = parrafo &amp; elemento &amp; &quot; &quot;
contador = contador + 1
if contador = limite then
j = j + 1
%&gt;
&lt;a href=&quot;ver.asp?texto=&lt;%=parrafo%&gt;&amp;id =&lt;%= filtro%&gt;&quot;&gt;&lt;%=j%&gt;&lt;/a&gt;
&lt;%
contador = 0
parrafo = &quot;&quot;
end if
next
if contador&lt;&gt;limite and contador&lt;&gt;0 then
j = j + 1 %&gt;
&lt;a href=&quot;ver.asp?texto=&lt;%=parrafo%&gt;&amp;id =&lt;%= filtro%&gt;&quot;&gt;&lt;%=j%&gt;&lt;/a&gt;
&lt;%
end if


If trim(texto)=&quot;&quot; Then

StrCampoMemo = replace(StrCampoMemo, chr(013),&quot;&lt;br&gt;&quot;)
StrCampoMemo = left(StrCampoMemo,1000)
Response.Write StrCampoMemo &amp; &quot;...&quot;
End If
rs.Close
Set rs=Nothing
con.Close
Set con=Nothing


%&gt;
Aqui mostramos el texto &lt;%= texto%&gt;

</pre>

En fin.,
Otro dia seguire intentandolo... :(

Juan.