Problema campo memo

[Ciombe]

Ho questo codice nella pagina...

<%
Dim rsEditoriale__MMColParam
rsEditoriale__MMColParam = "31"
If (Request("MM_EmptyValue") <> "") Then 
  rsEditoriale__MMColParam = Request("MM_EmptyValue")
End If
%>
<%
Dim rsEditoriale
Dim rsEditoriale_cmd
Dim rsEditoriale_numRows

Set rsEditoriale_cmd = Server.CreateObject ("ADODB.Command")
rsEditoriale_cmd.ActiveConnection = MM_conn_STRING
rsEditoriale_cmd.CommandText = "SELECT Articoli.articolo, titoloArticolo, corpoArticolo, Articoli.autore, Autori.autore, Autori.nomeAutore, Autori.cognomeAutore, sezione, categoria, commento, COUNT(commento) as totale, datainserimentoArticolo, hitArticolo FROM (Articoli LEFT JOIN Autori ON Articoli.autore = Autori.autore) LEFT JOIN Commenti ON Articoli.articolo = Commenti.commento WHERE sezione = ? GROUP BY Articoli.articolo, Articoli.autore, Autori.autore, sezione, datainserimentoArticolo, titoloArticolo, categoria, corpoArticolo, nomeAutore, cognomeAutore, Commenti.commento, hitArticolo ORDER BY datainserimentoArticolo DESC" 
rsEditoriale_cmd.Prepared = true
rsEditoriale_cmd.Parameters.Append rsEditoriale_cmd.CreateParameter("param1", 5, 1, -1, rsEditoriale__MMColParam) ' adDouble

Set rsEditoriale = rsEditoriale_cmd.Execute
rsEditoriale_numRows = 0
%>
<div class="boxArticolo">
  <p class="categoria">editoriale</p>
  
      <h2>&amp;categoria=<%=(rsEditoriale.Fields.Item("categoria").Value)%>&amp;sezione=<%=(rsEditoriale.Fields.Item("sezione").Value)%>"><%=(rsEditoriale.Fields.Item("titoloArticolo").Value)%></h2>
      
      <%=left(rsEditoriale.Fields.Item("corpoArticolo").Value, 800)%>...
      
      

&amp;categoria=<%=(rsEditoriale.Fields.Item("categoria").Value)%>&amp;sezione=<%=(rsEditoriale.Fields.Item("sezione").Value)%>">CONTINUA</p>
      
      <div class="articoloNav">
      
        <div class="nomeautore floatleft">
         

di <%=(rsEditoriale.Fields.Item("nomeAutore").Value)%><%=(rsEditoriale.Fields.Item("cognomeAutore").Value)%></p>
        </div>
        
        

<span class="pubblicazione"><%=left((rsEditoriale.Fields.Item("datainserimentoArticolo").Value),10)%></span>
        [img]grafica/commenti.png[/img] (&amp;categoria=<%=(rsEditoriale.Fields.Item("categoria").Value)%>&amp;sezione=<%=(rsEditoriale.Fields.Item("sezione").Value)%>"><%=(rsEditoriale.Fields.Item("totale").Value)%>) &raquo; [img]grafica/letti.png[/img] (&amp;categoria=<%=(rsEditoriale.Fields.Item("categoria").Value)%>&amp;sezione=<%=(rsEditoriale.Fields.Item("sezione").Value)%>"><%=(rsEditoriale.Fields.Item("hitArticolo").Value)%>)
        </p>
        
    </div>
    
    </div>
    
<%
rsEditoriale.Close()
Set rsEditoriale = Nothing
%>

quando stampo a video, però anzichè prendermi i primi 800 caratteri del campo articolo...
me ne prende meno, circa 150....

perchè?

questo è il contenuto del campo memo su access... e la parte in grassetto è fino a dove mi stampa a video il risultato...

Donec pretium convallis nibh, ut ultricies mi dapibus eget. Sed porttitor, turpis quis ultrices gravida, neque ligula bibendum erat, id faucibus leo odio quis nunc.</p>




Quisque mollis, ante vel fringilla vulputate, sem nisl aliquet nisi, et lacinia nisl metus ornare massa. Nam eu urna vel nisi pharetra egestas. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas. Aliquam id faucibus urna. Proin aliquet faucibus tincidunt. Aliquam vitae lectus velit. Pellentesque luctus sem sed neque pellentesque pharetra. Aliquam sed cursus nisl. Donec auctor vestibulum eleifend. Curabitur id ligula sed justo fermentum ullamcorper sit amet ut velit.</p>




Morbi tincidunt placerat augue, id euismod velit faucibus ac. Vestibulum ante ipsum primis in faucibus orci luctus et ultrices posuere cubilia Curae; Maecenas eget justo felis. Sed viverra tincidunt magna, ut euismod urna auctor eget. Donec odio nunc, facilisis a lacinia eu, pharetra et nisi. Nam luctus dignissim metus, nec commodo ipsum commodo quis. Suspendisse id nibh nec nisl luctus faucibus. Nulla quis quam id mauris sodales vestibulum.</p>




Quisque porttitor elit vel lectus fringilla sed ullamcorper tortor dignissim. Aenean a ultricies libero. Sed eros dolor, dapibus nec laoreet eu, laoreet a odio. Aenean vehicula felis nec erat euismod pulvinar. Etiam volutpat cursus mauris, sit amet blandit ante aliquet in. In hac habitasse platea dictumst. Sed auctor, justo a mollis placerat, turpis mi adipiscing neque, a lacinia quam libero vel massa. Maecenas fermentum arcu eros. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas. Donec scelerisque, odio vitae bibendum hendrerit, turpis felis laoreet nibh, luctus elementum neque nunc ac erat. Nulla at gravida ligula. Maecenas id quam metus.</p>



Curabitur bibendum tellus at mauris consequat sollicitudin. Ut in sem nibh. Duis sem sem, gravida non laoreet vel, vehicula molestie ante. Cum sociis natoque penatibus et magnis dis parturient montes, nascetur ridiculus mus. Nunc imperdiet tellus sed dui convallis vestibulum iaculis enim varius.</p>

[optime]

a volte con i campi memo è utile passare per una variabile di comodo/appoggio

[Ciombe]

ovvero?

[optime]

ad esempio, invece di

response.write rs("campomemo")

fai

Dim a
a=rs("campomemo")
response.write a