Três pontinhos

[Alessancost 0]

Engraçado, eu utilizo esse código de três pontinhos há um tempo,nunca tive problema. Agora estou tendo problema em um código. Eu sempre fiz assim...

<%Function Resumindo(strBuf, intSize)

Dim i, strTmp

If Len(strBuf) < intSize Then

Resumindo = strBuf

Else

If Mid(strBuf, intSize, 1) = " " Then

strTmp = Left(strBuf, intSize - 1)

Else

strTmp = Left(strBuf, intSize)

For i = intSize + 1 To Len(strBuf)

If Mid(strBuf, i, 1) = " " Then Exit For

strTmp = strTmp & Mid(strBuf, i, 1)

Next

End If

Resumindo = strTmp & "..."

End If

End Function%>

<%= resumindo(RS("previo"), 26)%>

 

Ocorre esse erro

Microsoft VBScript runtime error '800a005e' Invalid use of Null

Obrigado

[Alessancost 0]

Não! É obrigatório o preenchimento do campo

[Alessancost 0]

lucasBR, eu já fiz isso, tem sim! Não estou entendendo nada http://forum.imasters.com.br/public/style_emoticons/default/upset.gif :wacko: :wacko:

AdrianoAlves, eu dei uma olhada na minha adm, os campos estão todos preenchidos http://forum.imasters.com.br/public/style_emoticons/default/upset.gif :wacko: :wacko:

[Alessancost 0]

Verdade! Mas se eu colocar assim rs("previo") funciona, mas sem o recurso.... e quando coloco resumindo(RS("previo"), 26)% da o erro. Deve ser algum problema de incompatibilidade entre os códigos :wacko: