i get the following error
Code:
Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x540 Thread 0x28c DBC 0x15e3024 Jet'.
/test/showlinks.asp, line 13
the db is a access 97 file, however i have access 2000 at home
and here is my code
any help would be greatly appreciated, thanks
Code:
<html>
<head>
<title>Kovan's Guestbook</title>
<meta http-equiv="expires" content="0">
<%
dim SQL
dim DNSTemp
dim CellString
Set conn = Server.CreateObject("ADODB.Connection")
'strConnString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=d:\inetpub\wwwroot\databases\KurdistanLinks.mdb" '## MS Access 97
DSNTemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNTemp=dsntemp & "DBQ=" & Server.MapPath("/databases/KurdistanLinks.mdb")
conn.Open DSNtemp ' strConnString
%>
</head>
<body bgcolor="00000" topmargin=2 leftmargin=2>
<style>
<!--
	a:link, a:visited {color:#C5BE60; font-weight:bold;}
	a:active {color=yellow; background: firebrick; font-size: 100%; font-weight:bold;}
	a:hover {color:yellow; font-weight:bold;}
//-->
</style>
<%
Set RS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM MemberInfo"
RS.Open SQL, conn, 3, 3
if rs.eof then
  response.write("Sorry, none found.")

'begin formatting
else
  %>
  <table border=2><tr>
  <%
  i = 1
  do until rs.eof
    cellString = "<td> <a href='" & rs("Address") & "'>" & rs("Title") & "</a></td>"

    if not i mod 1 = 0 then
      response.write(cellString)
    else
      response.write(cellString)%></tr><tr><%
    end if		

    i = i + 1
    rs.movenext
  loop
%>
</table>
<%
end if
%> 
</html>