Ver Mensaje Individual
  #8 (permalink)  
Antiguo 05/02/2007, 08:43
tocalasam
 
Fecha de Ingreso: julio-2003
Ubicación: Barcelona
Mensajes: 142
Antigüedad: 21 años, 7 meses
Puntos: 1
Re: ¿impimri solo unos cuantos caracteres de un registro

Este es el codigo entero, pero me muestra el campo respuesta con todos sus caracteres.
¿me podeis ayudar?


<%
set objCON = Server.CreateObject("ADODB.Connection")

objCON = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/cgi-bin/faqs.mdb")&";"
set objRS = Server.CreateObject("ADODB.Recordset")

objRS.open "SELECT pregunta,respuesta FROM faqs", objCON, 3, 1

Dim rndMax
rndMax = CInt(objRS.RecordCount)

objRS.MoveFirst

Dim rndNumber
Randomize Timer
rndNumber = Int(RND * rndMax)

objRS.Move rndNumber

respuesta = left(objRS("respuesta"),10) & "..."
response.write "<center><a href=""/faqs.asp""><img src=""/img/faqs_home.jpg"" border=""0""></a></center>"
response.write "<p class=""align""><font face=""verdana"" size=""1""><b>" & objRS("pregunta") & "</b><p class=""align"">" & objRS("respuesta") & "" %>