[Resolvido] Verificar se o campo não está nulo

[hargon 64]

Veja se resolve:

If (len(dt_descredenciamento) = 0) Then
'variavel vazia
Else
'variavel nao esta vazia
End If

[Mário Monteiro 179]

E nesta mesmo pagina manda aparecer o alert?

[rd111072 1]

Desculpe, amigos... Mas não foi.

 

Não filtra o número passado e evai para o primeiro redirect (já inverti a ordem dos redirects).

 

Vejam:

 

<%
mat = Request("mat")

SQL = "Select no_CPF, dt_descredenciamento from credenciados WHERE no_CPF= '" & mat & "' "
set RS = conn.Execute(SQL)
%>



<% If (len(dt_descredenciamento) = 0) Then
Response.redirect"termos.asp"
else
Response.redirect"teste_cred.asp"
end if

%>

[Mário Monteiro 179]

Faça este teste para mim por favor

 

<%
mat = Request("mat")

SQL = "Select no_CPF, dt_descredenciamento from credenciados WHERE no_CPF= '" & mat & "' "
set RS = conn.Execute(SQL)

IF NOT RS.EOF THEN
dt_descredenciamento = TRIM(RS("dt_descredenciamento"))
Response.write(dt_descredenciamento&"<br>")
IF ISNULL(dt_descredenciamento) OR ISEMPTY(dt_descredenciamento) THEN
Response.write("Vazio")
ELSE
Response.write(Preenchida)
END IF
END IF
%>

e post aqui o que aparecer na tela

[rd111072 1]

Pois bem, Prof. Mário eis o resultado:

 

Quando coloco o cpf X (credenciado ativo) dá "Vazio".

 

Quando coloco o cpf Y (credenciado que se descredenciou) dá "11/7/2003 16:09:39". A data e hora de dt_descredenciamento.

 

Acho que o problema estava naquela sintaxe de redirecionamento...

[Mário Monteiro 179]

Mas ainda nao ta completamente correto pois nao entrou no else

[Mário Monteiro 179]

Editando

 

Corrija colocando antes antes e depois de preenchida para ver se entra no else

[rd111072 1]

Aí Mário!

Agora está legal:

 

Dá o alert quando não está nulo e vai pra página que exibe os dados quando o campo chave está nulo ou vazio.

 

Ficou assim:

 

<%
mat = Request("mat")

SQL = "Select no_CPF, dt_descredenciamento from credenciados WHERE no_CPF= '" & mat & "' "
set RS = conn.Execute(SQL)

IF NOT RS.EOF THEN
dt_descredenciamento = TRIM(RS("dt_descredenciamento"))

IF ISNULL(dt_descredenciamento) OR ISEMPTY(dt_descredenciamento) THEN
Response.redirect "listar.asp?mat="&mat
ELSE
Response.write("<script>location = 'cred_checkmat.asp';alert('Descredenciado!')</script>")
END IF
END IF
%>

Ainda vou dar um churrasco pra todo mundo que me ajuda aqui. Deixa eu ganhar na mega-sena... :lol:

 

Valeu!!! http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[Mário Monteiro 179]

Que bom qeu foi resolvido

 

Parabens

[NaPraia 12]

IF ((dt_descredenciamento is null) OR (dt_descredenciamento = '')) THEN

Response.write("Vazio")

ELSE

Response.write(Preenchida)

END IF

ainda prefiro usar o código antigo que serve para qualquer linguagem,

 

mas se o POG do mário funcionou, legal

 

 

mat = Request("mat")

SQL = "Select no_CPF, dt_descredenciamento from credenciados WHERE no_CPF= '" & mat & "' "
set RS = conn.Execute(SQL)

IF NOT RS.EOF THEN
dt_descredenciamento = TRIM(RS("dt_descredenciamento"))
Response.write(dt_descredenciamento&"<br>")
IF ISNULL(dt_descredenciamento) OR ISEMPTY(dt_descredenciamento) THEN
Response.write("Vazio")
ELSE
Response.write("Preenchida")
END IF
END IF

[Mário Monteiro 179]

O meu nao foi POG foi usando as funções especificas da linguagem

[CaBo GeL 0]

Concordo Mario!!

 

se isso é POG imgina esses meninos ver o verdadeiro POG!

 

hehehehe

 

at+