(Resolvido) Ajuda com IF

[Prof. Jonatas]

Bom dia, to tentando usar 2 if na mesma página mas não funciona, não sei se é porque cada um tem seu fechamento end if ou se é por outra coisa.

A condição é a seguinte:

Tenho um sistema administrativo q capta os dados de um banco em access.

A 1º função é:

Se o campo código rastreamento estiver vazio retorna "...." formatado com a cor x.

Caso contrário, retornar um jpg com um link.

A 2º função é :

Se o campo xmlnf estiver vazio, retorna "não faturado"

Caso contrário, retornar "conteudo do campo xmlnf com um link"

Mas a segunda função não está funcionando, quando eu tenho o campo xmlnf vazio ele ta me retornando o nome do arquivo do mesmo jeito, não sei o que fazer, segue abaixo o código:

<%rs =rs_max("CodigoRastreamento")
                        if rs = "" then
                        response.write"<font color=170B6C>..."
                      %>
                                </font>
                                <%else 
                      response.write"<a href=#><img src=img/corre.jpg width=89 height=19 border=0 onClick=MM_openBrWindow('http://websro.correios.com.br/sro_bin/txect01$.startup?P_LINGUA=001&amp;P_TIPO=001','','scrollbars=yes,width=550,height=400')></a></font></b></font>"
                       end if
                       %>
                              </font></td>
                          </tr>
                          <tr> 
                            <td width="4%" class="linha">&nbsp;</td>
                            <td width="68%" class="linha"><font color="#FFFFFF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Arquivo xml da Nota Fiscal :</font></b></font> </td>
                            <td width="28%" bordercolor="#CCCCCC" class="linha"><font size="2" face="Verdana" color="#FFFFFF">
                            <%=rs_max("xmlnf")%>
                            <font size="2" face="Verdana" color="#FFFFFF">
                            <%rs =rs_max("xmlnf")
                        if rs = "" then
                        response.write"Não Faturado"
                      %>
                            </font>
                                <%else 
                      response.write" link "
                       end if
                       %>

A única função que ta funcionando é do código de rastreamento, alguém pode me ajudar ?

[bareta]

experimente..

if not isNull(rs_max("xmlnf")) then

end if

[Prof. Jonatas]

Ixi, também não deu certo, continua aparecendo a mensagem de falso, " link "

Editado Agosto 20, 2009 por Prof. Jonatas

[Rafael Spilki]

Debug a variável e veja como ela está vindo... acredito que possa ser um problema ali, porque pelo que vi as condicionais estão certas...

dubug:

rs =rs_max("CodigoRastreamento")
response.write "rs = " & rs
response.end

[]'s

[Prof. Jonatas]

Consegui resolver, funcionou legal assim :

<%=rs_max("CodigoRastreamento")%>
                              <%rs =rs_max("CodigoRastreamento")
                                if rs="" then
                                response.write"<font color=170B6C>..."
                                  %>
                              </font>
                                <%else 
                      response.write"<a href=#><img src=img/corre.jpg width=89 height=19 border=0 onClick=MM_openBrWindow('http://websro.correios.com.br/sro_bin/txect01$.startup?P_LINGUA=001&amp;P_TIPO=001','','scrollbars=yes,width=550,height=400')></a></font></b></font>"
                       end if
                       %>
                              </font></td>
                          </tr>
                          <tr> 
                            <td width="4%" class="linha">&nbsp;</td>
                            <td width="68%" class="linha"><font color="#FFFFFF"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Arquivo xml da Nota Fiscal :</font></b></font> </td>
                            <td width="28%" bordercolor="#CCCCCC" class="linha"><font size="2" face="Verdana" color="#FFFFFF">
                            <%rsl =rs_max("xmlnf")                        
                        if rsl="" then
                        response.write"Não Faturado"
                        else 
                        response.write"<a href='http://www.begbrasil.com.br/xml/"&rsl&"'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border=0></a>"
                        end if
                       %>

Té + Obrigado pela ajuda !

[Prof. Jonatas]

Alguém sabe me dizer como faço para este link abrir em uma nova página ? ou até mesmo para nem abrir para já aparecer a opção de salvar como direto !? é possível ? alguém sabe ?

Segue abaixo o código:

response.write"<a href='http://www.begbrasil.com.br/xml/"&rsl&"'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border=0></a>"

Obrigado

[dcoder]

Tente colocar o target como _blank

[Prof. Jonatas]

Já coloquei, mas não funciona acho q é porque está página rola dentro de um popup já né ?

Bom não sei, mas já coloquei o blank e não rolou se clica e nada acontece, no caso tinha ficado assim:

response.write"<a href='http://www.begbrasil.com.br/xml/"&rsl&" target=_blak'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border=0></a>"

Será q existe uma forma de fazer este link para ao invés de abrir já aparecer a opção de salvar direto ?

[Rafael Spilki]

você colocou errado... de uma olhada na sua sintaxe...

o certo é _blank

[]'s

[Prof. Jonatas]

você colocou errado... de uma olhada na sua sintaxe...

o certo é _blank

[]'s

no código da página coloquei certo, é que tive q redigir aqui por isso ficou assim, mas no meu código está correto.

[Rafael Spilki]

mas não é só isso: tb tem a questão das aspas...

da uma pesquisadinha no google... isso é simples... se não ta funcionando é porque a sintaxe ta errada! é algo por aí...

[]'s

[dcoder]

Já coloquei, mas não funciona acho q é porque está página rola dentro de um popup já né ?

Bom não sei, mas já coloquei o blank e não rolou se clica e nada acontece, no caso tinha ficado assim:

response.write"<a href='http://www.begbrasil.com.br/xml/"&rsl&" target=_blak'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border=0></a>"

Será q existe uma forma de fazer este link para ao invés de abrir já aparecer a opção de salvar direto ?

Fala ae cara, Como estão os códigos para você abrir essas páginas em PopUps ? Se quer abrir um PopUp em cima de outro eles devem estar com nomes diferentes senao não vai rolar. E da uma confirida nas aspas como disse o Rafael realmente está faltando. Olha só:

response.write"<a href='http://www.begbrasil.com.br/xml/" & rsl& " '  target='_blank'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border='0'></a>"

falou's.

Editado Agosto 21, 2009 por dcoder

[Prof. Jonatas]

Voltando ao erro da condição:

Descobri o que estava acontecendo de errado.

O campo da segunda condição é XML da nf-e.

Ou seja meu sistema é um sistema de acompanhamento de produção ou seja, a nota fiscal é o ultimo campo a ser preenchido.

Eu inocentemente não coloquei este campo no cadastro do pedido, coloquei apenas na página de edição.

Ou seja, quando cadastrava este campo xml ia com um valor padrão q não sei qual é, só sei a programação não entendia como vazio, quando pedia para editar este pedido e salvava, ele já entendia como vazio e funcionava.

A solução foi colocar este campo no cadastro do pedido para que seja preenchido ( mesmo q vazio ) no cadastro do pedido.

Agora a programação está perfeita e entende o campo como vazio.

Segue abaixo o código, espero q isto possa ajudar alguém ainda porque quebrei a cabeça:

1º condição

<%=rs_max("CodigoRastreamento")%>
                              <%rs =rs_max("CodigoRastreamento")
                                if rs="" then
                                response.write"Aguardando"
                                  %>
                                <%else 
                      response.write"&nbsp;<a href=#><img src=img/corre.jpg width=89 height=19 border=0 onClick=MM_openBrWindow('http://websro.correios.com.br/sro_bin/txect01$.startup?P_LINGUA=001&amp;P_TIPO=001','','scrollbars=yes,width=550,height=400')></a></font></b></font>"
                       end if
                       %>

2º condição

<%
                            Dim rsl
                            rsl=rs_max("xmlnf")
                            if rsl="" then
                            response.Write("Aguardando")
                            else
                            response.Write("<a href='http://www.begbrasil.com.br/xml/"&rsl&"'><img src='http://www.begbrasil.com.br/prod2/img/down_xml.jpg' border=0></a>")
                            end if
                            %>

Quem quiser conhecer o sistema é só acessar: http://www.begbrasil.com.br

Na página inicial clique em acompanhar a produção do seu pedido.

Teste

Usuário : scriptbrasil

código : 12059

Qualquer dúvida sobre este sistema, me comuniquem.

Obrigado pela ajuda ! :rolleyes: