2 replies to this topic

[maxcs]

Ola estou com um codigo de autenticação de usuarios mas em uma das paginas há um erro onde diz que nao ha nenhum driver especificado...
segue o pedaço do codigo que esta dando erro:

________________________________________________________
<%
Login = Trim(Request.Form("Login"))
Senha = Trim(Request.Form("Senha"))
Verifica = 0

ConnString = "DBQ=c:\private\columbia.mdb"
ConnString = ConnString & ";Driver={Microsoft Access Driver (*.mdb)}"

Set Connexao = Server.CreateObject("ADODB.Connection")
Connexao.Open ConnString

SQLString = "SELECT * FROM Security WHERE Nome='" & Login & "'"

Set Reg = Connexao.Execute(SQLString)
If Reg.EOF Then
Verifica = 1
End If
%>
___________________________________________________

Pelo pouco que eu entendo o driver esta especificado, certo e seria o nome do banco?
A proposito se alguem tiver uma dica de um bom codigo de usuarios com acesso de niveis de pagina agradeço.

[|KILLING|]

<%
Login = Trim(Request.Form("Login"))
Senha = Trim(Request.Form("Senha"))
Verifica = 0

Set Connexao = Server.CreateObject("ADODB.Connection")
Connexao.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=c:\private\columbia.mdb"

SQLString = "SELECT * FROM Security WHERE Nome='" & Login & "'"
Set Reg = Connexao.Execute(SQLString)

If Reg.EOF Then
Verifica = 1
End If
%>

TENTA ISSO...

=====================================

isso tem que ser feito soh se vc jah abriu a Reg:
jah tem que ter tido essa linha no seu codigo, se naum acrescente-a
reg.open conexao,3,3

fui..

Edição feita por: LeoB, 19/09/2004, 21:53.

[maxcs]

Funcionou... valeu KILLING