Uso Inválido De Null: 'replace'

[PhoEniXFirE 0]

Estou utilizando o seguinte código...

 

<% If rs("informacoes") <> "" ThenResponse.Write(Replace(rs("informacoes"), chr(10), "<br>" & chr(10)))End If%>

E o campo no banco esta com conteudo. Mas estou recebendo a seguinte msg de erro:

Erro de tempo de execução do Microsoft VBScript (0x800A005E)

Uso inválido de Null: 'Replace'

/enderecosuteis/endereco.asp, line 28

 

porque diz esta vazio se tem conteúdo? :blink:

[PhoEniXFirE 0]

Fiz uns testes aqui e vejam só!

 

quando uso só <%Response.Write(Replace(rs("informacoes"), chr(10), "<br>" & chr(10)))%> funciona!

Mas o campo informações n pode está vazio que dá erro.

 

Aquele If seria p impedir que dar erro, mas na verdade está atribuindo para rs('informacoes') um valor null, pois quando uso

<% If rs("informacoes") <> "" Then'Response.Write(Replace(rs("informacoes"), chr(10), "<br>" & chr(10)))Response.Write(rs("informacoes"))End If%>

N aparece nd

[jrcardozo 4]

tenta assim<% If isnull(rs("informacoes"))=false Thenou<% If len(rs("informacoes"))>1 Then

[PhoEniXFirE 0]

tenta assim<% If isnull(rs("informacoes"))=false Thenou<% If len(rs("informacoes"))>1 Then

Mesma coisa... Como se tivesse anulando o valor de Rs('informacoes'), qndo só peço p verificar...Pq isso?

[jothaz 1]

tenta assim<% If isnull(rs("informacoes"))=false Thenou<% If len(rs("informacoes"))>1 Then

Mesma coisa... Como se tivesse anulando o valor de Rs('informacoes'), qndo só peço p verificar...Pq isso?

Bom vou meter minha colher de pau na discussão! ahahahahaTenta assim:

If trim(rs("informacoes")) <> "" ThenOUIf len(trim(rs("informacoes"))) <= 0 Then

Pode ser que resolva seu problema.t+

[Daw 0]

Tente tbm...

 

If Not isEmpty(rs("informacoes")) Or Not isNull(rs("informacoes")) Then

[PhoEniXFirE 0]

Apenas o

If len(trim(rs("informacoes"))) <= 0 Then

não exibiu a msg de erro, mas tb n exibiu o conteúdo <_<

 

O será q está acontecendo, o campo Informacoes tem conteúdo.

[jrcardozo 4]

Apenas o

If len(trim(rs("informacoes"))) <= 0 Then

não exibiu a msg de erro, mas tb n exibiu o conteúdo <_<

 

O será q está acontecendo, o campo Informacoes tem conteúdo.

Não apareceu porque você está comparando assim

Se Valor for menor ou igual a 0 então escreve

Mas na verdade tem que ser

Se Valor for maior do que 0 então escreve

if len(trim(rs("informacoes"))) > 0 then

[PhoEniXFirE 0]

Apenas o

If len(trim(rs("informacoes"))) <= 0 Then

não exibiu a msg de erro, mas tb n exibiu o conteúdo <_<

 

O será q está acontecendo, o campo Informacoes tem conteúdo.

Não apareceu porque você está comparando assim

Se Valor for menor ou igual a 0 então escreve

Mas na verdade tem que ser

Se Valor for maior do que 0 então escreve

if len(trim(rs("informacoes"))) > 0 then

 

Continua sem exibir o campo Informacoes, mas fora do IF exibi...

[jothaz 1]

Apenas o

If len(trim(rs("informacoes"))) <= 0 Then

não exibiu a msg de erro, mas tb n exibiu o conteúdo <_<

 

O será q está acontecendo, o campo Informacoes tem conteúdo.

Não apareceu porque você está comparando assim

Se Valor for menor ou igual a 0 então escreve

Mas na verdade tem que ser

Se Valor for maior do que 0 então escreve

if len(trim(rs("informacoes"))) > 0 then

 

Continua sem exibir o campo Informacoes, mas fora do IF exibi...

 

Execute o comando:

response.write "|" & rs("informacoes") & "|"

E poste o resultado.

 

Posta tb o código do sey if.

 

t+

[Salgado 4]

Não sei o porquê, mas às vezes acontece umas loucuras desse tipo. Tente assim:

<%StrInformacoes = rs("informacoes")
If StrInformacoes <> "" Then

Response.Write(Replace(StrInformacoes, chr(10), "<br>" & chr(10)))

End If%>

[PhoEniXFirE 0]

A solução q encontrei (na verdade q deu certo, pois todas tentadas deveriam funcionar), foi esta:

<% Informacoes = Replace(rs("informacoes"), chr(10), "<br>" & chr(10))If rs("informacoes") = "" ThenResponse.Write(rs("informacoes"))ElseResponse.Write InformacoesEnd If%>

Se mudar qualquer coisa n funcionar. Vê se pode...

[Paulo de Tarso F. M. 24]

<% Informacoes = Replace(rs("informacoes"), chr(10), "<br>" & chr(10))If rs("informacoes") = "" ThenResponse.Write(rs("informacoes"))ElseResponse.Write InformacoesEnd If%>

Dúvida mto besta, só para garantir: o chr(10) é o código referente às quebras de linha, não é msm? :huh:

 

Nesse script, você diz q a variável Informacoes vai ser o conteúdo de rs("informacoes") com as quebras de linha em ASP (no caso, o tal do ch(10)) convertidas para HTML (<br>)... Certo?

 

Aí vem o If: Se o conteúdo q vem do banco for igual a nada (rs("informacoes") = ""), ele imprime na tela isso... (ou seja, nada).

Se não, ele imprime o conteúdo q vem do banco formatado (com as quebras de linha)... É isso msm?

 

Perguntei isso pq estou tentando entender direito como funciona os comandos em ASP e tals... E se essa solução descrita acima funciona, então é um material para se apoiar em ocasiões semelhantes no futuro... Legal isso...

 

Td mundo deveria fazer isso: colocar a solução final para q os demais tb possam ter ciência disso, e assim poder utilizar futuramente caso seja necessário...

 

Bom, se interpretei corretamente, por favor, me diga... Ou se não, me fale o q está errado em minha interpretação... (Desculpe a pergunta aparentemente simples, mas assim como um dia td mundo começou, eu tb estou fazendo isso hj... rsrsrsrs...)

 

Vlw!!!

[PhoEniXFirE 0]

Dúvida mto besta, só para garantir: o chr(10) é o código referente às quebras de linha, não é msm? :huh:

Tá viajando é cara? Olhe só qual eh a dúvida, NÃO tem nd haver com o REPLACE, e sim com o uso de IF ELSE, você devia ter lido desde o início deste tópico.

 

Flws

[Paulo de Tarso F. M. 24]

Na verdade, você naum entendeu meu objetivo ao fazer a pergunta... Eu te perguntei se minha interpretação do script estaria certa... Só isso... Não estou envolvendo o seu assunto, na verdade... Utilizei seu script só pra testar se estou interpretando a lógica corretamente, só isso...

 

E eu li o tópico desde o início... A diferença é q escrevi isso justamente pelo fato de eu naum conhecer ASP mto bem... Só pedi para me falar se estava certo o q interpretei, nada demais...