Hvad betyder det?

Hejsa - jeg har en asp-side hvor man kan uploade sine egne links direkte fra browseren.

Når jeg så efterprøver den siger den at der er en fejl i linie 47 i asp-filen.

Der kommer denne fejlmeddelelse:


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 0x500 Thread 0x77c DBC 0x7b4f014 Jet\'.

/linkload/submittal.asp, line 47


Koden på den side hvor fejlen skulle være ser sådan ud:

<html>

    <title>Submittal</title>

    <body bgcolor=\"000040\" link=\"#ffffff\" vlink=\"ffffff\" alink=\"ffffff\">
        <font size=\"2\" color=\"#ffffff\" face=\"verdana\"><br>
        <br>
        <br>
        </font>
        <center>
            <p><font size=\"2\" color=\"#ffffff\" face=\"verdana\"><%
if request.form(\"email\") = \"\" then
  response.write(\"Please enter an email address.<BR>\")
end if
if request.form(\"download_name\") = \"\" then
  response.write(\"Please enter a name for the download.<BR>\")
end if
if request.form(\"download_url\") = \"\" then
  response.write(\"Please enter a url for the download.<BR>\")
end if
if request.form(\"site_name\") = \"\" then
  response.write(\"Please enter a name for the site.<BR>\")
end if
if request.form(\"site_url\") = \"\" then
  response.write(\"Please enter a url for the site.<BR>\")
end if
if request.form(\"email\") = \"\" or request.form(\"download_name\") = \"\" or request.form(\"download_url\") = \"\" or request.form(\"site_name\") = \"\" or request.form(\"site_url\") = \"\" then
  response.write(\"<BR><BR><a href=\'java script:void(0);\' onclick=\'history.go(-1)\'>Back</a>\")
  response.end
end if
email_entry = request.form(\"email\")
download_name_entry = request.form(\"download_name\")
download_url_entry = request.form(\"download_url\")
site_name_entry = request.form(\"site_name\")
site_url_entry = request.form(\"site_url\")
date_entry = FormatDateTime(Now(),2)

email_entry = replace(email_entry,\"\'\",\"\'\'\")
download_name_entry = replace(download_name_entry,\"\'\",\"\'\'\")
download_url_entry = replace(download_url_entry,\"\'\",\"\'\'\")
site_name_entry = replace(site_name_entry,\"\'\",\"\'\'\")
site_url_entry = replace(site_url_entry,\"\'\",\"\'\'\")
ip_address = request.servervariables(\"REMOTE_ADDR\")

Set RS = Server.CreateObject(\"ADODB.RecordSet\")
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open(\"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"\\mfilez\\db\\submittals.mdb\"))
SQL = \"SELECT * FROM Submittals ORDER BY entry_number DESC\"
Set RS = Conn.Execute(SQL)
if not RS.eof then
  max_number = RS.Fields(\"entry_number\")
end if
RS.Close
Conn.Close
set RS = nothing
set Conn = nothing
         
Set RS = Server.CreateObject(\"ADODB.RecordSet\")
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open(\"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"http://www.friserverplads.dk/linkload/submittals.mdb\"))
SQL=\"INSERT INTO Submittals (entry_number, ip_address, email, download_name, download_url, site_name, site_url, date_submitted) VALUES (\"
SQL=SQL & \"\'\" & (max_number + 1) & \"\', \"
SQL=SQL & \"\'\" & ip_address & \"\', \"
SQL=SQL & \"\'\" & email_entry & \"\', \"
SQL=SQL & \"\'\" & download_name_entry & \"\', \"
SQL=SQL & \"\'\" & download_url_entry & \"\', \"
SQL=SQL & \"\'\" & site_name_entry & \"\', \"
SQL=SQL & \"\'\" & site_url_entry & \"\', \"
SQL=SQL & \"\'\" & date_entry & \"\');\"
Conn.Execute(SQL)
Conn.Close
set Conn = nothing
%><font face=\"verdana\">Thank you for your submission.<br>
            Refresh your browser to view your link<br>
            <br>
            </font></center>
    </body>

</html>

_____________________

Databasen, som den vist forsøger at kalde i linie 47 (har jeg ret?), ligger på http://www.friserverplads.dk/linkload/submittals.mdb

Hvad kan fejlen være???