|
I am getting the following :
On http://www.millerpc.co.uk/sms/free_sms_sender.asp - http://www.millerpc.co.uk/sms/free_sms_sender.asp 
But i get :
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x2494 Thread 0x2974 DBC 0x2c16fec Jet'.
/sms/check_user.asp, line 24 
The file check_user.asp is :
<% 'Dimension variables Dim adoCon 'Database Connection Variable Dim strCon 'Holds the Database driver and the path and name of the database Dim rsCheckUser 'Database Recordset Variable Dim strAccessDB 'Holds the Access Database Name Dim strSQL 'Database query sring Dim strUserName 'Holds the user name
'Initalise the strUserName variable strUserName = Request.Form("txtUserName")
'Check the database to see if user exsits and read in there password 'Initialise the strAccessDB variable with the name of the Access Database strAccessDB = "users"
'Create a connection odject Set adoCon = Server.CreateObject("ADODB.Connection") 'Database connection info and driver strCon = "DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=letmein; DBQ=E:\kunden\homepages\5\********\sms\users.mdb"
'Set an active connection to the Connection object adoCon.Open strCon
'Create a recordset object Set rsCheckUser = Server.CreateObject("ADODB.Recordset")
'Initalise the strSQL variable with an SQL statement to query the database strSQL = "SELECT tblUsers.Password FROM tblUsers WHERE tblUsers.UserID ='" & strUserName & "'"
'Query the database rsCheckUser.Open strSQL, strCon
'If the recordset finds a record for the username entered then read in the password for the user If NOT rsCheckUser.EOF Then 'Read in the password for the user from the database If (Request.Form("txtUserPass")) = rsCheckUser("Password") Then 'If the password is correct then set the session variable to True Session("blnIsUserGood") = True 'Close Objects before redirecting Set adoCon = Nothing Set strCon = Nothing Set rsCheckUser = Nothing 'Redirect to the authorised user page and send the users name Response.Redirect"authorised_user_page.asp?name= " & strUserName End If End If 'Close Objects Set adoCon = Nothing Set strCon = Nothing Set rsCheckUser = Nothing 'If the script is still running then the user must not be authorised Session("blnIsUserGood") = False
'Redirect to the unautorised user page Response.Redirect"unauthorised_user_page.htm" %>
(********) replaces the database location ( but i know that this is right ), and the file permisisions are right.
Any help please !!
Eddie Miller
http://www.millerpc.co.uk - www.millerpc.co.uk
mailto:Eddie@millerpc.co.uk - Eddie@millerpc.co.uk
|