Erro 80004005

[Tonisoueu 0]

Esse erro aparece quando tento logar na administração do meu site. Sou menos que iniciante em asp e preciso muito de uma juda

do pessoal aqui do forum.

 

Vou colocar o erro e o codigo da pagina onde é apontada no erro. Obrigado galera!

 

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

 

[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

 

/gerenciador/verificarsenha.asp, line 23

 

 

 

Esse é o codigo da pagina verificarsenha.asp

 

 

1 <%@Language=VBScript%>
2 <%Response.Buffer=True%>
3 <%
4 loginl = Trim(Request.Form("loginl"))
5 senhal = Trim(Request.Form("senhal"))
6
7 If Len(loginl) < 1 and Len(senhal) < 1 Then
8
9
10 Else
11 Set conn = Server.CreateObject("ADODB.Connection")
12	conn.open "vidanova","",""
13
14 sql = "SELECT logar.loginl, logar.senhal FROM logar WHERE logar.loginl= '"&loginl&"' and logar.senhal='"&senhal&"'"
15 Set RS = Conn.Execute(sql)
16
17 If RS.EOF Then
18
19		Session("resp") = "Login ou senha não conferi, tente novamente!"
20		response.redirect "logar.asp"
21
22 Else
23
24 response.cookies("acesso")("loginl") = RS("loginl")
25 session("logado")="sim"
26 Response.redirect "principal.asp"  
27 
28 RS.Close
29 conn.Close
30 
31 Set RS = Nothing
32 Set Conn = Nothing
33
34
35	 Set rs = conn.Execute(sqlstmt)
36	
37	 rs.close
38	 set conn=nothing
39	 set rs=nothing
40
41
42 End If
43 End If
44 
45 %>

[DSerma 19]

Esse erro informa que o driver de conexão com o BD não está instalado corretamente na máquina...

 

VErifique seus drivers ODBC.

 

Abraços..

[Ted k' 126]

conexão amigo

 

está usando mysql ou access?

 

veja a sua conexão, falta a string!

[Tonisoueu 0]

Tô usando mysql. Como posso verificar os drivers? O meu banco.ini está assim:

 

<%
caminho_banco = Server.MapPath("../dados/vidanova.mdb")
conn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & caminho_banco
rs = Server.CreateObject("ADODB.Connection")
%>

Será que com esses dados vocês podem me ajudar a encontrar o erro? é que realmente não conheço muito de asp. Valeu a força que vocês tão dando!

[Tonisoueu 0]

Como posso criar essa string ted? Brother, não sei nem por onde começar.

[xanburzum 169]

constring="provider=microsoft.JET.OLEDB.4.0;Data Source=" & Server.MapPath("dados/vidanova.mdb")

Set conexao=Server.CreateObject("ADODB.Connection")

conexao.open constring

[Tonisoueu 0]

Jóia! Obrigado! eu insiro a instrig somente nas linhas 11 e 12? ou também lá em baixo onde tem "Set RS = Nothing

e Set Conn = Nothing" ? Quando inseri só em cima acusou outro erro na linha 31 no "Conn". Help ai mano por favor!