Limitar na chamada até 80 caracteres

[eronventer 2]

Galera, beleza!

 

to pegando do banco o o texto da minha noticia, mas vou usar para uma chamada que vai estar na home, gostaria de chamar ela limitando em 80 caracteres e depois adicionar "..."

 

minha noticia eu chamo assim

ASP

[*]rs_not("texto")

[Marcelo Barcellos 0]

Texto = ORs("Texto")Response.Write Left(Texto,80) & "..."

[Mário Monteiro 179]

Texto = ORs("Texto")

Response.Write Left(Texto,80) & "..."

esse é o esquema mas se o registros tiver menos de 80 caracters ficaria estranho os pontinhos então voce pode adicionar mais um teste ai

 

Texto = ORs("Texto")

IF LEN(Texto) > 80 THEN

Response.Write Left(Texto,80) & "..."

ELSE

Response.Write Texto

END IF