em select com text area

[empirerock 0]

Criei um select que vem de um banco mysql.

Esse campo é gravado através de um form com text area.

Só que quando eu dava o select nesse campo, não respeitava quando pulava linha no text area, vinha tudo na mesma linha.

 

Aí pesquisando achei esse código que faz com que pule de linha igual ao digitado no form text area.

 

<%= Replace(rsSelect("observacao"), vbcrlf,"<br>")%>

 

O problema é que se o campo estiver vazio, dá esse erro:

 

" Uso inválido de Null: 'Replace' "

 

Alguém sabe como posso resolver esse problema?

[hargon 64]

Você tem que verificar antes se está nulo e armazenar em uma variável. Você não pode jogar direto o campo no replace.

[empirerock 0]

como seria então?

Assim? Sou nível básico em asp

 

 

varObs = rsSelect("observacao")

if varObs = null then

Response.write varObs

else 

Replace(varObs), vbcrlf,"<br>"

end if

Assim não dá certo, não sei como jogar a váriavel dessa maneira dentro de um replace.

Pode me ajudar?

[hargon 64]

Isso mesmo... só faltou uma correção...

varObs = rsSelect("observacao")

if varObs = null then
Response.write varObs
else
varObs = Replace(varObs), vbcrlf,"<br>"

end if

[empirerock 0]

Desculpe a demora pra responder.

 

Coloquei o código como me descreveu, más dá esse erro. Já tentei tirar as , más não adiantou.

 

 

Tipo de erro:

Erro de compilação do Microsoft VBScript (0x800A0401)

Fim da instrução esperado

/sacintra/vendas_informa_sistema.asp, line 279, column 24

varObs = Replace(varObs), vbcrlf,"<br>"

------------------------------^

[hargon 64]

Parentese no lugar errado.

varObs = Replace(varObs, vbcrlf,"<br>")