APARECER USUARIO LOGADO NA PAGINA RESTRITA

BRUNOJUL 30/11/2012 10:51:03
#415124
Olá,

Podem ajudar ,

Tenho um pagina de login onde o usuario apos fazer o login corretamente é direcionado para a pagina de usuario logado , como coloco o nome do usuario logado em um text nesta pagina ? .

grato;

Codigo da pagina de usuario logado.
<html xmlns=[Ô]http://www.w3.org/1999/xhtml[Ô]>
<head>

<title>Usuário Logado</title>
<meta http-equiv=[Ô]Content-Type[Ô] content=[Ô]text/html; charset=utf-8[Ô]>
<style type=[Ô]text/css[Ô]>
body,td,th {
font-family: Arial, Helvetica, sans-serif;
}
</style>
</head>
<body>

<table width=[Ô]100%[Ô] border=[Ô]0[Ô] cellpadding=[Ô]0[Ô] cellspacing=[Ô]0[Ô]>
<tr>
<td width=[Ô]100%[Ô] align=[Ô]right[Ô] valign=[Ô]bottom[Ô]>Logado:</td>
<td width=[Ô]5%[Ô] valign=[Ô]bottom[Ô]><input name=[Ô]Usuario_logado[Ô] type=[Ô]text[Ô] id=[Ô]Usuario_logado[Ô] width=[Ô]50%[Ô] border=0></td>
<td width=[Ô]6%[Ô]><a href=[Ô]logout.asp[Ô]><img src=[Ô]../login/Figuras/Login Manager.png[Ô] alt=[Ô]Logof[Ô] width=[Ô]32[Ô] height=[Ô]32[Ô] align=[Ô]right[Ô] border=0></a></td>
<td width=[Ô]6%[Ô]><a href=[Ô]logout.asp[Ô]><img src=[Ô]Figuras/delete_group.png[Ô] alt=[Ô]Logof[Ô] width=[Ô]32[Ô] height=[Ô]32[Ô] align=[Ô]right[Ô] border=0></a></td>
</tr>
</table>
<hr>
<p> </p>
<p> </p>
</body>
</html>
KERPLUNK 30/11/2012 11:16:33
#415133
Você faz o login como? Não estou vendo um webform, e nenhum método de postagem...
BRUNOJUL 30/11/2012 11:50:57
#415144
Faço o login com este form ,

<style type=[Ô]text/css[Ô]>
body,td,th {
font-family: Arial, Helvetica, sans-serif;
}
</style>
<table width=[Ô]754[Ô] height=[Ô]180[Ô] border=[Ô]0[Ô] align=[Ô]center[Ô]>
<tr>
<td width=[Ô]528[Ô]><img src=[Ô]Figuras/slide3.jpg[Ô] width=[Ô]527[Ô] height=[Ô]159[Ô] alt=[Ô]Logon[Ô] /></td>
<td width=[Ô]216[Ô]><form action=[Ô]logar.asp[Ô] method=[Ô]get[Ô] name=[Ô]flogin[Ô] id=[Ô]flogin[Ô]>
<p>Login:
<input name=[Ô]login[Ô] type=[Ô]text[Ô] id=[Ô]login[Ô] maxlength=[Ô]6[Ô] />
</p>
<p>Senha
<input type=[Ô]password[Ô] name=[Ô]senha[Ô] id=[Ô]senha[Ô] />
</p>
<p>
<input type=[Ô]submit[Ô] name=[Ô]flogin[Ô] value=[Ô]login[Ô] />
</p>
</form></td>
</tr>
</table>
<p> </p>
KERPLUNK 30/11/2012 12:02:22
#415147
Então, logar.asp é quem faz o login. Grave o nome de usuário em uma variável da session e depois a use para exibir...
USUARIO.EXCLUIDOS 30/11/2012 12:02:58
#415148 Resposta escolhida
Goleiro Bruno, da uma olhada nesses links , qual banco de dados vc usa , realmente googlando nao ta trazendo umas buscas boas , da uma olhada nesses links

http://info.abril.com.br/forum-antigo/forum.php?topico=69026

http://www.htmlstaff.org/ver.php?id=22309

http://www.mxstudio.com.br/tecnologia/bancodedados/asp-area-de-membros-e-nivel-de-acesso/

voce colocara uma variavel Logado por exemplo . e nas demais paginas aql sao o admin ou acesso restrito vc coloca uma linha apenas de sessão , onde tranca e faz um redirect pro login se essa variavel for falsa .

caso tiver dificuldades ainda , poste , e dou um jeito de lhe mastigado .....
BRUNOJUL 30/11/2012 12:11:01
#415150
Coloquei o codigo de logar.asp.
<%

[ô] CONEXÃO ACCESS

Set conn=Server.CreateObject([Ô]ADODB.Connection[Ô])
drv= [Ô]DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=[Ô]& Server.MapPath([Ô]banco.mdb[Ô]) & [Ô];[Ô]
conn.Open drv

login=Request.QueryString([Ô]login[Ô]) [ô]aqui recuperamos o login digitado, através da QueryString
senha=Request.QueryString([Ô]senha[Ô]) [ô]aqui recuperamos a senha digitado, através da QueryString

[ô]SQL QUE SELECIONA OS DADOS DO USUARIO CASO O LIGN E A SENHA ETEJAM CORRETOS
sql = [Ô]SELECT * FROM usuarios WHERE login = [ô][Ô] & login &[Ô][ô] AND senha = [ô][Ô] & senha & [Ô][ô] [Ô]

[ô]SETAMOS A VARIAVEL rsLogar e ABRIMOS O COMANDO SQL
Set rsLogar = Server.CreateObject([Ô]ADODB.Recordset[Ô])
rsLogar.Open sql, conn

[ô]A CONDIÇÃOˆ - SE CHEGOU AO FIM [Ô]eof[Ô] DO BANCO DE DADOS, SIGNIFICA QUE
[ô]NAO EXISTE NADA COM ESSE LOGIN E COM ESSA SENHA
[ô]SENAO [Ô]Else[Ô] ELE ABRE A SESSAO [ô]Entrada[ô] que é igual a [Ô]sim[Ô] E JUNTAMENTE PEGA OS DADOS DO USUARIO PARA [ô]USAR NAS PAGINAS SEGUINTES...

[ô]Segue abaixo

if (rsLogar.eof) Then


[ô]Response.Write [Ô]ERRO - Login ou Senha incorretos[Ô]
Response.redirect([Ô]form.htm[Ô])

Else


[ô]Session([Ô]entrada[Ô]) = [Ô]sim[Ô]
[ô]Session([Ô]nome[Ô]) = rsLogar([Ô]nome[Ô])

[ô][ô]EM LOGADO.HTML PRECISARIA QUE O CAMPO USUARIO LOGADO SEJA PREENCHIDOResponse.redirect([Ô]logado.html[Ô])



End If

%>
USUARIO.EXCLUIDOS 30/11/2012 12:31:00
#415152
Olá, vo te colar um pronto ok ? e vc segue isso que to fazendo se for Banco access , o seu codigo ta meio misturado linkado errado , comandos incompletos
entao faça


conexao.asp

Citação:


<%
Session.LCID = 1046
Session.Timeout = 900

Dim Conn , Caminho , dbDriver
Set Conn = Server.CreateObject([Ô]ADODB.Connection[Ô])
Conn.CursorLocation = 3

Caminho = Server.MapPath([Ô]Data/bancoacess.mdb[Ô])
dbDriver = [Ô]Provider=Microsoft.Jet.OLEDB.4.0[Ô]

Conn.Open (dbDriver & [Ô];Data Source=[Ô] & Caminho & [Ô];Persist Security Info=False; Locale Identifier=1046;[Ô])
%>




fechaconexao.asp

Citação:

<%
Conn.close
%>




login.asp

Citação:

<!--#include file=[Ô]conexao.asp[Ô]-->
<%
dim username
dim pass
dim msg
dim checked

username = Request.Form([Ô]username[Ô])
pass = Request.Form([Ô]password[Ô])

if request.Form([Ô]ENTRAR[Ô])=[Ô]ENTRAR[Ô] then

sqlstmt = [Ô]Select * From Admin Where User_ID=[ô][Ô] & username & [Ô][ô][Ô]
set rs = server.CreateObject([Ô]Adodb.Recordset[Ô])
rs.Open sqlstmt, Conn , 3 , 3

if not rs.eof then

if pass = rs.fields([Ô]Password[Ô]) then
session([Ô]AdminOk[Ô]) = [Ô]true[Ô]
session([Ô]Username[Ô]) = username

response.Redirect([Ô]admin.asp[Ô])
else
msg = ([Ô]Senha de Administrador Incorreta[Ô])
end if

else
msg = ([Ô]Login de Administrador Incorreto[Ô])
end if

rs.Close

set rs = nothing

End if


if request.QueryString([Ô]cmd[Ô]) = [Ô]logout[Ô] then
session.Abandon()
End if

%>
<!--#include file=[Ô]fechaconexao.asp[Ô]--></span><center><form name=[Ô]form1[Ô] method=[Ô]post[Ô] action=[Ô][Ô]>
<p align=[Ô]left[Ô]><%=msg%><a href=[Ô]index.asp[Ô] class=[Ô]style81[Ô]><< Voltar</a></p>
<table width=[Ô]39%[Ô] height=[Ô]109[Ô] border=[Ô]0[Ô] cellpadding=[Ô]0[Ô] cellspacing=[Ô]0[Ô] bordercolor=[Ô]#000000[Ô]>
<tr>
<td width=[Ô]32%[Ô] height=[Ô]33[Ô] bgcolor=[Ô]#6666CC[Ô]><span class=[Ô]style1 style84 style85[Ô]>Administradores</span></td>
<td bgcolor=[Ô]#6666CC[Ô]width=[Ô]68%[Ô]><input name=[Ô]username[Ô] type=[Ô]text[Ô] id=[Ô]username[Ô] size=[Ô]20[Ô] maxlength=[Ô]20[Ô]></td>
</tr>
<tr>
<td height=[Ô]40[Ô] bgcolor=[Ô]#6666CC[Ô]><span class=[Ô]style1 style84 style85[Ô]>Senha</span></td>
<td bgcolor=[Ô]#6666CC[Ô]><input name=[Ô]password[Ô] type=[Ô]password[Ô] id=[Ô]password[Ô] size=[Ô]20[Ô] maxlength=[Ô]20[Ô]></td>
</tr>
<tr>
<td bgcolor=[Ô]#FFFFFF[Ô]><span class=[Ô]style87[Ô]>Administrador Digite o Login e a Senha</span></td>
<td><input type=[Ô]submit[Ô] name=[Ô]ENTRAR[Ô] value=[Ô]ENTRAR[Ô]> </td>
</tr>
</table>
<p> </p>
</form>





admin.asp

pra trancar as demais paginas - muito atencao nessa linha , ela sempre tem que estar acima do include de conexao e abaixo da linha <%@LANGUAGE=[Ô]VBSCRIPT[Ô] CODEPAGE=[Ô]1252[Ô]%>

Citação:

<%if not session([Ô]AdminOk[Ô])=[Ô]true[Ô] then response.Redirect [Ô]login.asp[Ô] %>




pra desconectar da sessao

Citação:

<a href=[Ô]login.asp?cmd=logout[Ô]>Sair do Administrativo</a>
USUARIO.EXCLUIDOS 30/11/2012 12:55:02
#415158
Agora sobre sua pergunta , que parece ser bem simples tente colocar no

admin.asp

tente algo como

response.write Request.QueryString([Ô]username[Ô])

pois response.write = escreve no console
e request ou .QueryString te lembra uma informa informada na pagina anterior

ou algo assim

<%=username%>

ou algo assim

<!--#include file=[Ô]conexao.asp[Ô]-->
<%
if request([Ô]id[Ô]) <> [Ô][Ô] then

Set rs = server.createobject([Ô]ADODB.recordset[Ô])
sql = [Ô]select * from usuarios where ID = [Ô] & request([Ô]id[Ô])
rs.open sql, Conn, 0, 1

username = rsaltera.fields([Ô]username[Ô])

end if
%>
<!--#include file=[Ô]fechaconexao.asp[Ô]-->

<tr>
<td width=[Ô]21%[Ô] height=[Ô]36[Ô] bgcolor=[Ô]#6666CC[Ô]><span class=[Ô]style1 style76 style82[Ô]>Usuario Logado </span></td>
<td bgcolor=[Ô]#6666CC[Ô] width=[Ô]79%[Ô]><input name=[Ô]txtusername[Ô] type=[Ô]text[Ô] value=[Ô]<%=username%>[Ô] size=[Ô]50[Ô] maxlength=[Ô]200[Ô] /></td>
</tr>
BRUNOJUL 30/11/2012 13:32:44
#415163
voce pode colocar este projeto para Download ?

grato;
ALEVALE 30/11/2012 15:02:40
#415169
USUARIO.EXCLUIDOS 30/11/2012 15:49:23
#415177
BRUNOJUL , infelismente estou com starter , e nao roda asp classico , e estou usando aspnet
o que voce quer fazer conforme seu topico é escrever .... numa pagina o login , pegando a variavel do nome da pessoa da pagina anterior

nao lembro de ter feito isso , ou tenho isso feito
mais pesquise sobre

Response.write é o que faz escrever na tela
infelismente nao tem como enviar , pois é material da minha empresa . e todos exemplos que ja criei antes acabei excluindo

mais provavel que voce acerte algo a mais , com o codigo que te passei acima, numa melhor organizacao .

voce esta fazendo um site para algum cliente seu , já tem a hospedagem pronta .
procure por projetos ASP , e logo voce achara a melhor solucao para isso
Tópico encerrado , respostas não são mais permitidas
Voltar