Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

Lajus

[Resolvido]  simples com o "If"

Por , em ASP Clássico

Recommended Posts

Lajus    0

Lajus
Postado

Olá Pessoal;

 

Sei que deve ser uma dúvida bem amadora, mas estou quebrando a abeça e não estou conseguindo resultados.

 

É o seguinte, fiz uma página de login onde o usuário se loga e é direcionado para outra página que mostra todos seus dados que estão armazenados no access, até ai tá tudo beleza, mas eu gostaria de colocar uma condição para um dos registros, tipo:

 

Se o registro "status" for igual a 1, então escreva isso: "aqui vai o texto 1"

Se o registro "status" for igual a 2, então escreva isso: "aqui vai o texto 2"

Se o registro "status" for igual a 3, então escreva isso: "aqui vai o texto 3"

 

Bom, segue abaixo o código que tentei fazer mas não esta funcionando:

 

 

CODE
<%

If session("log_ok")="" Then

Response.Write "Você não está Logado no sistema!"

Response.write "<a href='status_login.asp'>Clique aqui para se logar.</a>"

 

Response.End()

End If

 

set conexao = Server.CreateObject("ADODB.Connection")

pathdb = "e:\home\login\dados\banco.mdb"

conexao.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& pathdb

conexao.CursorLocation = 3

Server.ScriptTimeout = 180

 

SQL = "select * from cadastro where bd_id ="&session("log_ok")

Set RS = Conexao.Execute(SQL)

If rs.eof then

Response.write "Ocorreu um Erro!"

Else

%>

 

<body>

 

Olá, <%=rs("bd_nome")%>.<br />

<%= rs("bd_email")%><br />

 

<p>Aqui vai o conteudo restrito.</p>

 

<%

dim stat

stat = rs("bd_ficha")

 

texto1="aqui esta o texto 1"

texto2="aqui esta o texto 2"

texto3="aqui esta o texto 3"

 

If stat="12345" Then

Response.Write textol

ElseIf stat="2" Then

Response.Write texto2

Else

Response.Write texto3

End If %>

 

</body>

</html>

<%end if%>

 

 

Qualquer ajuda será bem-vida.

 

Abçs;

Lajus

Compartilhar este post

Link para o post
Compartilhar em outros sites

meirelles    0

meirelles
Postado

Não sei se é bem isso, mas lá vai:

 

 

select case rs("bd_ficha")

case "1"
mensagem = "Bom dia!"
case "2" 
mensagem = "Boa tarde!"
case "3"
mensagem = "Boa noite"
end select

response.write mensagem

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito