<% 'Autoriza a página a ser visualizada sem protecao autorizacao = 1 %> <% If request.Form("controle") = 1 then If request.form("login") = "" then errologin = "Campo obrigatório" totalerro = 1 end if If request.form("senha") = "" then errosenha = "Campo obrigatório" totalerro = 1 end if ''''' Rotina que procura por Login e Senha if totalerro = "" then CALL CONECTA() 'Tira comandos malisciosos para não ter injecao SQL senha = Replace(Request.Form("SENHA"),chr(39),"''") login = Replace(Request.Form("LOGIN"),chr(39),"''") vsSQL = "SELECT * FROM usuarios WHERE login='"&UCASE(login)&"' AND SENHA='"&UCASE(senha)&"'" Set RS = oConexao.Execute(vsSQL) 'Se nao existir o login retorna um erro IF RS.EOF Then ErroLogin = "Erro no login. Digite novamente ou se você é um novo usuario, cadastre-se." ErroSenha = "" ELSE '' Se existir Login, Abre uma sessao com o apelido do usuario e o ID do usuario ErroLogin = "" Errosenha = "" Session("Apelido") = RS("APELIDO") Session("IDUSUARIO") = RS("idusuario") Session("PARCERIA") = RS("PARCERIA") Session("assinante") = RS("assinante") Session("email") = RS("email") Session("nome") = RS("nome") 'Inclui no banco os dados para estatistica SQLestat = "INSERT INTO ESTATISTICA (IDUSUARIO, DATA, HORA) VALUES ('"&RS("NOME")&"', '"&DATE&"', '"&TIME&"')" Set RSestat = oConexao.Execute(SQLestat) CALL DESCONECTA() Response.redirect("areadoassinante.asp") end if end if end if %>
ações, bolsa de valores, investimentos, mercado financeiro, investimento, acoes, corretora, home-broker, home broker, homebroker, corretora, trading, trader, analise técnica, analise tecnica, análise técnica, curso, cursos, fórum, chat, gráficos, grafico, graficos, gráfico, forum, brasil, brazil, forex, metastock, educação, educacao, educaçao, educacão, artigo, artigos, mercado, dinheiro, finanças, economia, investimento
<% if request.querystring("cadastro") = "ok" then %> Cadastro efetuado com sucesso. Faça o seu login.

<% end if %> Para acessar o portal do analista técnico Juliano Carneiro é necessário que seja feito o Login. Se você ainda não tem cadastro, clique aqui.

Login: <%=ERROLOGIN%>
Senha: <%=ERROSENHA%>

Se esqueceu a sua senha, clique aqui.
E-mail: moderador@julianocarneiro.com.br