Foros del Web » Programando para Internet » ASP Clásico »

Contar palabras o caracteres

Estas en el tema de Contar palabras o caracteres en el foro de ASP Clásico en Foros del Web. Quiero ver si me pueden ayudar con esto Se trata de que traigo un campo de la base de datos.... es la descripcion de un ...
  #1 (permalink)  
Antiguo 01/04/2008, 11:16
Avatar de Maxon  
Fecha de Ingreso: diciembre-2001
Ubicación: Monterrey NL
Mensajes: 263
Antigüedad: 22 años, 6 meses
Puntos: 0
Contar palabras o caracteres

Quiero ver si me pueden ayudar con esto

Se trata de que traigo un campo de la base de datos.... es la descripcion de un producto... pero la descripcion es muy larga y donde la quiero mostrar solo quiero mostrar las primeras 20 palabras o los primeros 200 caracteres... como se puede hacer

rs.Fields("descripcion")

Gracias
  #2 (permalink)  
Antiguo 01/04/2008, 11:22
Avatar de mc_quake  
Fecha de Ingreso: enero-2006
Ubicación: www.ecocargo.cl
Mensajes: 683
Antigüedad: 18 años, 4 meses
Puntos: 8
Re: Contar palabras o caracteres

Cita:
Iniciado por Maxon Ver Mensaje
Quiero ver si me pueden ayudar con esto

Se trata de que traigo un campo de la base de datos.... es la descripcion de un producto... pero la descripcion es muy larga y donde la quiero mostrar solo quiero mostrar las primeras 20 palabras o los primeros 200 caracteres... como se puede hacer

rs.Fields("descripcion")

Gracias
left(rs.Fields("descripcion"), 200)

se cuenta en caracteres en este caso 200
__________________
Mc_Quake

Para ayudar en lo que se pueda:Zzz:
  #3 (permalink)  
Antiguo 01/04/2008, 11:25
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Re: Contar palabras o caracteres

No la probe, porque no puedo correr asp aqui, pero a ver si no sale con un error

Código:
function cortaTexto(texto, palabrasNumero, agregaCaracter)
	Dim arr, i, intro
	arr = split(texto, " ")
	for i = 0 to uBound(arr)  
		intro = intro & arr(i) & " "
		if i + 1 >= palabrasNumero
			exit for
		end if
	next
	if len (intro) > 0 then
		intro = left(intro, len(intro)-1) & agregaCaracter
	end if
	cortaText = intro
end function

variable = cortaTexto(rs.Fields("descripcion"), 20, "...")
Saludos
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway

Última edición por u_goldman; 01/04/2008 a las 11:26 Razón: ups, me ganó mc_quake
  #4 (permalink)  
Antiguo 01/04/2008, 11:27
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 20 años, 7 meses
Puntos: 27
Re: Contar palabras o caracteres

maxon solo toma en cuenta que tambien hay gente que puede meterte un texto grande como una sola palabra por ejemplo copiassssssssssssssssssssssssssssssssssss y es una palabra.

suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
  #5 (permalink)  
Antiguo 01/04/2008, 12:35
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 22 años, 4 meses
Puntos: 146
Re: Contar palabras o caracteres

Cita:
Iniciado por u_goldman Ver Mensaje
No la probe, porque no puedo correr asp aqui, pero a ver si no sale con un error

Saludos
Pues a ojo de buen cubero .....


Código:
function cortaTexto(texto, palabrasNumero, agregaCaracter)
	Dim arr, i, intro
	arr = split(texto, " ")
	for i = 0 to uBound(arr)  
		intro = intro & arr(i) & " "
		if i + 1 >= palabrasNumero THEN
			exit for
		end if
	next
	if len (intro) > 0 then
		intro = left(intro, len(intro)-1) & agregaCaracter
	end if
	cortaTexto = intro
end function

variable = cortaTexto(rs.Fields("descripcion"), 20, "...")
Saludos camarada
  #6 (permalink)  
Antiguo 01/04/2008, 12:40
Avatar de u_goldman
Moderador
 
Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 22 años, 5 meses
Puntos: 98
Re: Contar palabras o caracteres

Cita:
Código:
		if i + 1 >= palabrasNumero THEN 
Saludos camarada
Eso es lo que C# deja lo otro lo deja el exceso de alcohol...gracias por la correcion (que fijado )
__________________
"El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway
  #7 (permalink)  
Antiguo 01/04/2008, 14:17
Avatar de Maxon  
Fecha de Ingreso: diciembre-2001
Ubicación: Monterrey NL
Mensajes: 263
Antigüedad: 22 años, 6 meses
Puntos: 0
Re: Contar palabras o caracteres

Muchas Gracias a todos..... ya quedo listo


Saludos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 13:41.