Como mostrar o nome de usuário após o login?

[expertro25 0]

Olá pessoal...

Vou dar alguns dados importantes

Local do banco de dados: D:/Inetpub/Natterchat/Natterchat.mdb

Nome da tabela: Users

Nome do usuário: UserName

 

Por favor me ajudem... http://forum.imasters.com.br/public/style_emoticons/default/cry.gif ,preciso do código completo, desde a indicação do local do bd até o %>

[Leandro - xd 0]

Tem ums exemplos do próprio IIS. Eu particularmente não sou muito chegado em ASP apesar de ser a línguagem "DAHORA".

[expertro25 0]

Tem ums exemplos do próprio IIS. Eu particularmente não sou muito chegado em ASP apesar de ser a línguagem "DAHORA".

Não achei, onde que está? :wacko:

[Mário Monteiro 179]

voce ja tem codigo de lgoin???

[Akwen 1]

Login.asp

 

<% Set cn = Server.CreateObject("ADODB.Connection")cn.Provider="Microsoft.Jet.OLEDB.4.0"cn.Open "D:/Inetpub/Natterchat/Natterchat.mdb" %><% 'Criando variaveis login e senhaDim loginDim senha'Definindo as variaveis login e senhalogin = request.form("UserName")   'Mude para o nome do campo usuáriosenha = request.form("senha") 'Mude para o nome do campo senha'Se ocorrer um erro, continue executando o codigoOn Error Resume Next'Criando recordset conexao e selecionando os dados na tabela Usuario usando as variaveis login e senhaset conexao = cn.execute("select * from Users where login = '"&login&"' and senha = '"&senha&"'")'Se tiver ocorrido um erro, mostre a mensagem "Ocorreu um erro" e interrompa a execução do códigoif err.number <> "0" thenresponse.Redirect("erro.asp") 'Mude para a página que você quer ir se o login der erroElse'Após executar select acima, se houver algum registro, redirecionar para index2.asp e criar sessao MM_UsernameAdmin'Se não houver registro, redirecionar para falha.asp e não permitir acessoif not conexao.eof thenSession("MM_UsernameAdmin") = loginresponse.redirect("index2.asp") 'Mude para a página que você quer ir se o login der certoelseSession("MM_UsernameAdmin") = ""response.redirect("falha.asp") 'Mude para a página que você quer ir se o login nao existirend ifend if%><%'fecha recordset conexaoconexao.Close()Set conexao = Nothing%>

Acho que é isso.... Nas linhas q precisa mudar algo, coloquei comentário falando....

 

Para mostrar nome do usuário nas outras páginas, coloque isso:

 

<% response.write session("MM_UsernameAdmin") %>

[Mário Monteiro 179]

voce ja captura o que precisa...para mostrar o login em outras pages basta escrever o valor desta session...