Contar palabras o caracteres

[Maxon]

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

[mc_quake]

Iniciado por Maxon

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

[u_goldman]

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

[JuanRAPerez]

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

[Myakire]

Iniciado por u_goldman

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

[u_goldman]

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 )

[Maxon]

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


Saludos