Ir para conteúdo
Fórum Script Brasil
  • 0

Ajuda - Banco Access Na Web

Guest Padunic

Perguntado por Guest Padunic,

 Share

Pergunta

Guest Padunic

Guest Padunic

Postado
Postado

Olá Galera,

sou novato em asp, então me desculpem se falar alguma besteira.

Estou montando um site em asp que necessita logar para acessar.

A página inicial em asp carrega normal, quando digito a senha e o login não rola.

No meu servidor é necessário colocar o bd em uma pasta propria para bd's.

Fiz isto, alterei o código da página e nada.

alguém pode me dar uma "luz" ???

valeu

Padunic

Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0
jucacabala

jucacabala

Postado
Postado

olha eu tenho um esquema de login e senha bem simples

ve se te ajuda

index.asp


<%
DIM id, nome
id= Session("id")
nome = Session("nome")

%>
<form name="form1" method="post" action="login.asp">
              <table width="100%" height="126" border="0" cellpadding="0" cellspacing="0" class="box1">
                <tr> 
                  <td valign="top"> 
                    <% if Session("logado")="sim" then %>
                  <table width="179" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="5"></td>
                      </tr>
                      <tr> 
                        <td colspan="2" align="center"><img src="imagens/img_login.gif" width="132" height="17"></td>
                      </tr>
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="10"></td>
                      </tr>
                      <tr>
                        <td width="10" rowspan="7" class="verdana11bold"><img src="imagens/space.gif" width="10" height="10"> <img src="imagens/space.gif" width="10" height="10"></td>
                        <td class="verdana11bold">Ol&aacute; <% =nome %></td>
                      </tr>
                      <tr> 
                        <td class="verdana11bold"><img src="imagens/space.gif" width="10" height="10"></td>
                      </tr>
                      <tr> 
                        <td width="169" class="verdana11bold"><a href="#.asp?cod= <% = id %>" id="link05">:: alterar senha</a></td>
                      </tr>
                      <tr> 
                        <td><img src="imagens/space.gif" width="10" height="5"></td>
                      </tr>
                      <tr> 
                        <td><a href="#.asp?cod= <% = id %>" id="link05">:: alterar dados</a></td>
                      </tr>
                      <tr> 
                        <td><img src="imagens/space.gif" width="10" height="5"></td>
                      </tr>
                      <tr> 
                        <td><a href="redir.asp" id="link05">:: sair</a></td>
                      </tr>
                    </table>
      <% else %>            
                  <table width="179" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="5"></td>
                      </tr>
                      <tr> 
                        <td colspan="2" align="center"><img src="imagens/img_login.gif" width="132" height="17"></td>
                      </tr>
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="10"></td>
                      </tr>
                      <tr> 
                        <td align="right" class="verdana11bold">Login:</td>
                        <td class="verdana8">&nbsp; <input name="login" type="text" class="box3" id="login"></td>
                      </tr>
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="3"></td>
                      </tr>
                      <tr> 
                        <td align="right" class="verdana11bold">Senha:</td>
                        <td class="verdana8">&nbsp; <input name="senha" type="password" class="box3" id="senha"></td>
                      </tr>
                      <tr> 
                        <td colspan="2"><img src="imagens/space.gif" width="10" height="8"></td>
                      </tr>
                      <tr> 
                        <td>&nbsp;</td>
                        <td>&nbsp; <input name="enviar" type="image" id="enviar" src="imagens/bt_enviar.gif" width="98" height="20" border="0"></td>
                      </tr>
                    </table>
    	<% End if %>  
    </td>
                </tr>
              </table>
            </form>
login.asp
<!--#include file="conexao.inc" -->
<%
DIM conexaodb, rs, str, vlogin, vsenha

vlogin = request.form("login")
vsenha = request.form("senha")

str = "select * from cadastro where email ='"&vlogin&"' and senha ='"&vsenha&"' " 

call abreConexao
set rs = conexaodb.Execute(str)

%>
<html>
<head>
<title>...::: S&oacute; Vit&oacute;ria</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link href="estilos.css" rel="stylesheet" type="text/css">
</head>

<body leftmargin="0" topmargin="5" marginwidth="0" marginheight="0">
<table width="760" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td> <!--#include file="menu.asp" --> </td>
  </tr>
  <tr> 
    <td>
  <% if rs.EOF then %>
  <table width="100%"  border="0" cellpadding="0" cellspacing="0" class="arial_textosObs">
        <tr>
          <td width="25" rowspan="12">&nbsp;</td>
          <td height="50" class="verdana11bold">&nbsp;</td>
        </tr>
        <tr> 
          <td class="verdana11bold"><font color="#990000">Login ou senha inv&aacute;lidos.</font></td>
        </tr>
        <tr> 
          <td><img src="imagens/space.gif" width="22" height="10"></td>
        </tr>
        <tr> 
          <td class="arial9a"><div align="justify">Certifique-se que seus dados de acesso foram digitados corretamente.</div></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td class="arial9a">Para maiores informa&ccedil;&otilde;es entre em contato com nossa <a href="javascript:abre();" id="link01">Equipe de Suporte atrav&eacute;s de nossa pagina de contato </a>.</td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <form name="form1" method="post" action="login.asp">
                <tr> 
                  <td width="330" class="verdana11bold">Login: 
                    <input name="login" type="text" class="box3" id="login" size="20"> &nbsp; Senha: 
                    <input name="senha" type="password" class="box3" id="senha" size="20">
                  </td>
                  <td width="10">&nbsp;</td>
                  <td><input name="imageField" type="image" src="imagens/bt_ok.gif" border="0"></td>
                </tr>
              </form>
            </table></td>
        </tr>
      </table>
    <% else
	Session("id") = rs("id")
	Session("nome") = rs("nome")
	Session("logado")="sim" 
	Response.Redirect("index.asp")
	end if
	%>	</td>
  </tr>
  <tr>
    <td>&nbsp;</td> 
  </tr>
  <tr align="right"> 
    <td> 
      <!--#include file="rodape.asp" -->
      <a href="http://www.tempoeartedesign.com.br/" target="_blank" id="link04">desenvolvido e produzido por Tempo &amp; Arte Design</a></td>
  </tr>
</table>
</body>
</html>

espero ter ajudado! biggrin.gif

Link para o comentário
Compartilhar em outros sites
  • 0
Guest Padunic

Guest Padunic

Postado
Postado

seguinte...por favor, vejam se tem algo de errado. quando tiro o access da pasta bd do servidor funciona normal, quando coloco na pasta não rola.

esta é a fonte da página que chama o banco de dados:

<%

'/// Database Connection Using an Access Database ///

database="db/noticia.mdb"

connection="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath(database)

%>

e esta a de login:

<!--#include file="incSystem.asp" -->

<%

'//////////// Receive Data //////////

usr=replace(request("usr"),"'","''")

pwd=replace(request("pwd"),"'","''")

application("xlaANM_connection")=connection

if len(usr)>0 and len(pwd)>0 then

set conn=server.createobject("ADODB.Connection")

conn.open connection

'/// Check if there's a Default Administrator, otherwise create one

psql="select * from publishers where plevel=2"

Set rs = Server.CreateObject("ADODB.Recordset")

rs.open psql,conn,1,2

if rs.eof then

rs.addnew

rs("name")="Default Administrator"

rs("username")="admin"

rs("password")="admin"

rs("email")="email@here.com"

rs("additional")="Default Administrator"

rs("plevel")=2

rs.update

end if

rs.close

set rs=nothing

'/// Check Entered username and password

psql="select * from publishers where username='"&usr&"' and password='"&pwd&"'"

set rs=conn.execute(psql)

if not(rs.eof) then

session("xlaANM_usr")=rs("publisherid")

session("xlaANM_lvl")=rs("plevel")

else

message="Invalid username / password"

end if

rs.close

set rs=nothing

conn.close

set conn=nothing

if session("xlaANM_usr")<>"" and message="" then response.redirect "menu.asp"

end if

session("xlaANM_usr")=""

session("xlaANM_lvl")=""

%>

<html>

<head>

<title><%=title%></title>

<meta http-equiv="Content-Type" content="text/html; charset=<%=charset%>">

</head>

<body bgcolor="#575757" text="#000000" leftmargin="0" topmargin="0" rightmargin="0">

<form name="form1" method="post" action="login.asp">

<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">

<tr>

<td>

<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">

<tr>

<td align="left" valign="top"><table width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">

<tr>

<td><a href="http://www.xigla.com/absolutenm" target="_blank"><img src="images/imgAbsolutelogo.gif" width="285" height="41" hspace="30" vspace="12" alt="Absolute News Manager - By Xigla Software" border="0"></a></td>

</tr>

<tr>

<td bgcolor="#3399FF" height="1"></td>

</tr>

<tr>

<td height="9" bgcolor="#000000" align="center" valign="top">

<div align="center"><img src="images/imgBarra.gif" height="9" width="590"></div></td>

</tr>

<tr>

<td bgcolor="#3399FF" height="1"></td>

</tr>

</table> </td>

</tr>

<script language="JavaScript" src="incCPcheck.asp"></script>

<tr>

<td align="center" valign="top" height="160" bgcolor="#999999"><table width="60%" border="0" cellspacing="0" cellpadding="1" align="center" height="100%">

<tr align="left" valign="top">

<td background="images/imgBackground.gif" width="9"></td>

<td align="center" valign="middle"> <table width="70%" border="0" cellspacing="0" cellpadding="0" align="center">

<tr>

<td> <div align="center"><font face="Arial, Helvetica, sans-serif" size="2" color="#CC3333"><b><%=message%></b></font></div></td>

</tr>

<tr>

<td> <table border="0" cellspacing="2" cellpadding="2" align="center">

<tr>

<td> <div align="right"><b><font face="Arial, Helvetica, sans-serif" size="2">Username

:</font></b></div></td>

<td align="left"> <input type="text" name="usr" size="12">

</td>

</tr>

<tr>

<td> <div align="right"><b><font face="Arial, Helvetica, sans-serif" size="2">Password

:</font></b></div></td>

<td align="left"> <input type="password" name="pwd" size="12">

</td>

</tr>

<tr>

<td>&nbsp;</td>

<td align="left"> <input type="image" border="0" name="imageField" src="images/btnLogin.gif" width="96" height="25" alt="Click To Login">

</td>

</tr>

</table></td>

</tr>

</table></td>

</tr>

</table></td>

</tr>

<tr>

<td align="left" valign="top"><table width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">

<tr>

<td bgcolor="#3399FF" height="1"></td>

</tr>

<tr>

<td bgcolor="#000000" valign="top" height="9">

<div align="center"><img src="images/imgBarra.gif" height="9" width="590"></div></td>

</tr>

<tr>

<td bgcolor="#3399FF" height="1"></td>

</tr>

<tr>

<td valign="middle" align="center"> <p><font face="Arial, Helvetica, sans-serif" size="2"><b><font face="Tahoma, Verdana, Arial" size="1" color="#CCCCCC">Absolute

News Manager - Version 3.0</font><font color="#999999" face="Tahoma, Verdana, Arial" size="1"><br>

<font color="#CCCCCC" size="2">The Complete News Administration

Software </font></font></b></font><font face="Tahoma, Verdana, Arial" size="1" color="#999999"><br>

<span id="copyright">Developed by XIGLA SOFTWARE</span><br>

Copyright &copy; 2001-2002 - All Rights Reserved</font><font face="Tahoma, Verdana, Arial" size="1"><br>

<a href="http://www.xigla.com" target="_blank"><img src="images/lgoXigla.gif" width="120" height="29" border="0"></a>

</font></p></td>

</tr>

</table> </td>

</tr>

</table>

</td>

</tr>

</table>

</form>

</body>

</html>

Link para o comentário
Compartilhar em outros sites
  • 0
Guest padunic

Guest padunic

Postado
Postado

Oi Cyberalex, laugh.gif

não consigo logar...aparece a tela de login, digito o login e a senha, mas a pagina não carrega. Acho que ele não ta achando o bd ou eu q não estou informando o caminho do bd de forma correta.

Tenha pasta no meu provedor de hospedagem onde todo bd deve ser colocado.

Depois q coloquei la não rola mais...

Padunic

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.

×
 Share
Ir para lista de Perguntas


  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...