[Resolvido] trazer só 10 caracteres de um texto, usando LEFT, mas

[Dr. admin 0]

oi galera tenho uma página que mostra as noticias do site, com um link que leva para a página

que mostra a noticia inteira; nessa página que mostra as noticias eu estou colocando um left do vbscript para mostrar

só 15 caracteres da notícia mas está mostrando mais de 15 eu quiria saber aonde eu estou errando

o banco de dados é access.............

 

por favor me ajudem galera ok..........

 

 

aqui está o código ele tinha que mostrar os 15 caracteres inicial da noticia lincado, mas mostra mais de 15

 

CODE

<a href="noticias_b.asp?idd=<% = rsNoticias("noticias_id") %>"><% = rsNoticias(left("texto1",10)) %></a>

 

só relembrando o banco é access

 

campo:

 

"texto1" = Memorando

[Mário Monteiro 179]

em vez de

 

rsNoticias(left("texto1",10))

faça

 

left(rsNoticias("texto1"),10)

[Dr. admin 0]

Mais Uma vez cara Muito Obrigado, tanto você mário, e o salgado estão me ajudando muito............

 

 

a cara outra coisa, qual é o padrão de caracteres que vocês voltam no sistema de vocês só para ter um pre view da noticia, qual é o padrão?????

 

outra coisa

 

 

como eu escrevo no titulo aqui desse forum que está resolvido?????

 

olha pra você ter uma noção acessa a página ai...........

 

http://www.osmirmoreira.com/noticias.asp

[Mário Monteiro 179]

isso é relativo

 

depende da noticia e do tamanho da area que voce aloca para isso

[cafofoman 0]

Talvez isso ajude...

 

<%
Function CutWords(sFullText, nLong, sAddWord)
If Len(sFullText) > nLong Then
sReturn = ""
aCountWords = Split(sFullText, " ")
For Each iTemp In aCountWords
If Len(sReturn) <= nLong Then
if len(sReturn)>0 Then	sReturn = sReturn & " "
sReturn = sReturn & iTemp
End If
Next
Erase aCountWords:Set aCountWords=Nothing
CutWords = sReturn & sAddWord
Else
CutWords = sFullText
End If
End Function
%>

chame assim: <%=cutwords(Materia,100,"...")%>

sds

[Ted k' 126]

amigo cafofoman isso já foi resolvido, mais bom código!!