Contagem De Caracteres

[rcnery]

Na pagina principal do meu site aparece texto aleatórios que estão sendo limitados em 220 caracteres, o problema é que alguns casos a palvra fica cortada ao meio, existe alguma maneira de fazer com que a palavra só apareça se estiver completa.

Obrigado

Ricardo

[ursolouco]

Tipo, você quer os 220 caractere e não quer que a palavra termine cortada..... você pode pegar os 220 e tentar procurar o proximo espaço, depois você escreve na tela... mas até o momento, não vi nenhuma função para isso..

Não serve os 3 pontinhos (...) ?

[rcnery]

Urso,

Eu coloquei os 3 pontinhos, mas se tivesse alguma função ficaria melhor, eu vi que você utilizou a contagem de caracteres para dividir uma mátéria, você teve esse tipo de problema?

[ursolouco]

Urso,

eu vi que você utilizou a contagem de caracteres para dividir uma mátéria, você teve esse tipo de problema?

Já ajudei alguns caras no forum que precisaram de algo semelhante...tipo:

<%
Response.Write(Left(Rs("Mensagem"),220) & "<b>Veja Mais.... </b>"%>

[rcnery]

Urso, valeu mas é exatamente isso que estou utilizando que tem alguns textos que aparce só um letra ou meia palavra no final...

Isso é só um detalhe, valeu pela força.

[rockbilly]

usa esta função, ele não deixa partir as palavras:

Function delimita(frase,num)

trata = split(frase," ")

  for i = 0 to num

  trat = trat & trata(i) & " "

  next

  delimita = trat & "..."

End Function

frasex = "bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla bla "

pega = delimita(frasex,15)

Response.write "TOTAL : " & "<b>" & pega &"</b>"

[rockbilly]

valeu pela força.

De nada!