Estou tendo dificuldades para fazer isso, tudo vai sempre para a mesma pagina
<!--#include file="CONTROLE/conecta.asp"-->
<%
Abreconn
vuser = Replace(Trim(request.form("nome")), "'", "/")
vpass = Replace(Trim(request.form("senha")), "'", "/")
sql = "select * from usuarios where nome='"&vuser&"' and senha='"&vpass&"' "
Set rs = bco.execute(sql)
If not rs.eof Then
Session("login") = True
Session("nome") = vuser
[b]if sql = "Select * From usuarios Where pago = 'sim' ORDER BY data DESC" then
Set rs = bco.Execute(sql)
Response.Write("<script>location = 'SIM/usuarios.htm';alert('argh!.')</script>")
else[/b]
response.write("<script>location = 'SIM/PRINCIPAL987FGH.htm';alert('aeeeeee!.')</script>")
end if
Else
rs.close
Set rs = Nothing
Response.Redirect "CONTROLE/acesso.asp"
End if
fechaconn
%>
ate a parte de validar o usuario esta beleza, mas o que eu quero tambem, é que quando o cara existir, quero ver se ele pagou ou não...então se pagou vai para a pag usuarios se ele não pagou vai para a pagina principal...e se não existe volta para a mesma pagina (mas esse é o que eu já consegui)
nesse codigo ai...ele sempre vai para a pagina principal a parte em negrito que não ta indo
Pergunta
Patricia Guido
Estou tendo dificuldades para fazer isso, tudo vai sempre para a mesma pagina
ate a parte de validar o usuario esta beleza, mas o que eu quero tambem, é que quando o cara existir, quero ver se ele pagou ou não...então se pagou vai para a pag usuarios se ele não pagou vai para a pagina principal...e se não existe volta para a mesma pagina (mas esse é o que eu já consegui)
nesse codigo ai...ele sempre vai para a pagina principal a parte em negrito que não ta indo
tem como vocês me ajudarem?
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.