erro na session

[lezão 0]

Ola galera bom dia!

 

Galera naun sei oq esta acontecendo aki com esse codigo.

Sempre aparece esta erro

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

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

/site/login/login.asp, line 18

 

<%@ Language=VBScript %>
<%Response.Expires = 0%>
<!--#include file="header.asp"-->

<br><center>
<font size=4 color=DarkRed><b>:.. Login ..:</b></font><br>
<br>

<%

    ip_usr = Request.ServerVariables("REMOTE_ADDR")
	UserName = Request.Form ("UserName")
	Password = Request.Form ("Password")
	
	if UserName<>"" then
		if Password<>"" then 
			set conn = Server.CreateObject ("ADODB.Connection")
			conn.Open Application("connString")
			query = "SELECT Id FROM Members WHERE UserName='" & UserName & "' AND Password='" & Password & "'"
			set rs = conn.Execute (query)
			
			if rs.eof then

				Response.Write "<p class=errmsg>Invalid user and password!</p>"
				conn.Close
			else

				Session("member") = rs("Id")
				rs.close
				set rs =  nothing
				
				conn.Execute ("UPDATE User_LogTime SET offline=True WHERE offline=False AND user_id=" & session("member"))
				query = "INSERT INTO User_LogTime (user_id, SID, Login_Time, user_ip) VALUES (" & Session("member") & "," & Session.SessionID & ",#" & now() & "#, '" & ip_usr & "')"
				conn.Execute (query)
				conn.close
				set conn = nothing
				
				Response.Redirect "home.asp"
			end if	
		else
			Response.Write "<p class=errmsg>Please fill both fields.</p>"
		end if
	end if
	
%>

<form action=login.asp method=post id=form1 name=form1>
<table>
<tr>
	  <td class=fieldlabel> Usuario:</td>
	<td>
	  <input type="text" name='UserName' class=defaultsmall>
	</td>
</tr>
<tr>
	  <td class=fieldlabel> Senha:</td>
    <td>
      <input type=password name='Password' class=defaultsmall>
    </td>
</tr>
<tr>
	<td> </td>
	<td><input type=submit value="Logar!" name=submit1 class=defaultsmall></td>
</tr>
</table>
</form>

[xanburzum 169]

dá uma olhada neste link que é um guia sobre o erro

[lezão 0]

xanburzum!

Eu acho q esta faltando o caminho do banco de dados!

de uma olha naun tem o caminho....

 

você sabe o caminho para esta codigo .....

[xanburzum 169]

o que tem em Application("connString")

verifique seu arquivo global.asa