Função para exibir somente parte de um texto

Este recurso é muito útil para quando voce quizer exibir apenas parte de um determinado texto na tela. Ele corta o texto no tamanho que voce passar pela função.

A função se encontra comentada, confira.

<%
function tamTexto(texto, y)
	if len(trim(texto)) > y Then  'Só executa se o texto for maior que o tamanho determinado
		Aux = mid(texto, 1, y) 'Pega a parte do texto do tamanho que voce determinou na chamada da função...
		Aux = Aux & " ..."  'Acrescenta as reticências
	else
		Aux = texto  'Exibe o texto sem cortes
	end if
	tamTexto = Aux  'Passa o valor para a função.
end function

texto="Este recurso é muito útil para quando voce quizer exibir apenas parte de um determinado texto na tela..."

response.write "Texto original: " & texto & "
"
response.write "Tamanho do texto: " & len(trim(texto)) & "
"

response.write "
Texto a ser exibido pela função
" & tamTexto(texto,30) & "
"


  %>
 

Tags:

• ASP,
• String