Consulta de campos tipo texto..

[RonaldMM]

Saludos a todos,

Estoy haciendo inserciones y consultas sobre una BD Access. Todos mis campos son de tipo texto. Las inserciones funcionan bien, pero cuando hago consultas y recorro el RecordSet los datos devueltos son truncados a la mitad. No se que puede pasar, me pregunto si tiene que ver algo la compresión Unicode, aunque con compresion o sin ella no funciona, la verdad no tengo ni idea. Soy nuevo con ASP así que puede ser algo fácil.

Cualquier comentario es muy valioso para mí,

Gracias.

[Korrikalari]

Hola RonaldMM:

Podrías mostrar el código que utilizas para mostrar esos campos en la página ?

Tal vez así nos sea más fácil ayudarte.

Korrikalari

[dimoito]

Deduczo por lo que dices que los datos los muestras en un input, ya que es la única manera que se corte el texto si no usas comillas.

<input value="<%=rs("valor")">
en lugar de:
<input value=<%=rs("valor")>

Es eso?

[RonaldMM]

Gracias por sus respuestas,

No uso Input para mostrar, el código es el siguiente:

--------------------------
SQLStr ="SELECT Id, Nit, ClientName, IsEmailOrFax " &_
"FROM Dispatcher " &_
"ORDER BY Id"

Set Rs = GetRecordset( Session("ConnString"), SQLStr )

Rs.PageSize = CInt( RowsNumber )

if ( Rs.EOF = false ) then
Rs.AbsolutePage = CInt( PageNumber )

Do While ( RS.EOF = False ) and
( Counter < Rs.PageSize )

Response.Write "<td align=center width=20% class=tdReportes>" & Rs("Nit") & "</td>" & _
"<td width=55% class=tdReportes>" & Rs( "ClientName" ) & "</td></tr>"

Rs.MoveNext()
Loop

Function GetRecordSet(byval strConnectionString, byval strSQL)

Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strConnectionString

Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.CursorLocation = adUseClient
objRS.Open strSQL, _
objConn, _
adOpenForwardOnly, _
adLockBatchOptimistic

Set objRS.ActiveConnection = Nothing
objConn.Close
set objConn = Nothing
Set GetRecordSet = objRS

End Function

------------------

Gracias por su ayuda.

[buliwyf]

jejeje, jamas habia visto tanta cantidad de codigo para sacar un recordset...

bueno, amigo, tu error esta aqui!
<%
Do While ( RS.EOF = False ) and
( Counter < Rs.PageSize )
%>

le estas diciendo que haga un loop mientras los registros no se acaben O MIENTRAS COUNTER SEA MENOR QUE PAGESIZE.

entonces:
Paso 1: Cambia esa linea por simplemente
<%do while not rs.eof%>

Paso 2: Leete la documentacion acerca de paginacion de registros.

Saludos

[RonaldMM]

Hola buliwyf

La verdad no entiendo, precisamente leí la documentación de paginación y creo que estoy en lo correcto. La condición debe ser que el counter sea menor que el támaño de la página para que muestre únicamente los registros de esa página. Además, not Rs.EOF es lo mismo que Rs.EOF=False.

Y si la condición que me dices está mal, entonces por qué me funciona BIEN la paginación. Creo que el problema no tiene que ver con la paginación porque todo funciona excepto que corta a la mitad las cadenas.

PD. La función GetRecordSet hace parte de un include y sólo son 4 instrucciones, la idea era hacerlo una vez en toda la aplicación. Hay alguna otra forma más corta?

Gracias.