jeg her fået svar tilbage fra min udbyder, som siger at det er programeringsfejl, hvilket jeg ikke rigtig kan forstå, da det virkede fint i går, men jeg lægger lige de forskellige filer herneden under, gider I så ikke lige kigge på dem:
------------movie.asp---------------
<html>
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">
<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">
<title>sejs.dk - Din film guide</title>
</head>
<body>
<%
movieID = Request.QueryString( \"movieid\" )
Set Conn = Server.CreateObject(\"ADODB.Connection\")
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"film.mdb\")
Conn.Open strDSN
strSQL = \"SELECT * FROM FILM WHERE MOVIEID =\" & movieID
Set rs = Conn.Execute( strSQL )
%>
<div align=\"center\">
<center>
<table border=\"0\" width=\"53%\" cellpadding=\"3\">
<tr>
<td width=\"27%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Film
navn:</font></td>
<td width=\"73%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><%=rs(\"Film navn\")%></font></td>
</tr>
<tr>
<td width=\"27%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Original
titel:</font></td>
<td width=\"73%\" bgcolor=\"#000000\"><font color=\"#FFFFFF\" face=\"Arial\"><%=rs(\"Orginal titel\")%></font></td>
</tr>
<tr>
<td width=\"27%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Anmeldt
af:</font></td>
<td width=\"73%\" bgcolor=\"#000000\"><font color=\"#FFFFFF\"><font face=\"Arial\"><%=rs(\"Anmeldt af\")%></font></font></td>
</tr>
<tr>
<td width=\"27%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Karakter</font></td>
<td width=\"73%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\"><IMG SRC=\"images/karakter/<%=rs(\"Karakter\")%>.gif\" ALIGN=\"left\" BORDER=0></font></td>
</tr>
<tr>
<td width=\"27%\"><font face=\"Arial\" size=\"2\">Udgivelses år:</font></td>
<td width=\"73%\"><font face=\"Arial\"><%=rs(\"Udgivelse år\")%></font></td>
</tr>
<tr>
<td width=\"27%\"><font face=\"Arial\" size=\"2\">Instruktør:</font></td>
<td width=\"73%\"><font face=\"Arial\"><%=rs(\"Instruktør\")%></font></td>
</tr>
<tr>
<td width=\"27%\"><font face=\"Arial\" size=\"2\">Bedste replik:</font></td>
<td width=\"73%\"><font face=\"Arial\"><%=rs(\"Bedste replik\")%></font></td>
</tr>
<tr>
<td width=\"27%\"><font face=\"Arial\" size=\"2\">Medvirkende:</font></td>
<td width=\"73%\"><font face=\"Arial\"><%=rs(\"Medvirkende\")%></font></td>
</tr>
<tr>
<td width=\"27%\" bgcolor=\"#000000\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Anmeldelse:</font></td>
<td width=\"73%\" bgcolor=\"#000000\"><font color=\"#FFFFFF\"><font face=\"Arial\"><%=rs(\"Anmeldelse\")%></font></font></td>
</tr>
<tr>
<td width=\"27%\"></td>
<td width=\"73%\"><font face=\"Arial\" size=\"2\"><IMG SRC=\"images/<%=rs(\"Billede\")%>.jpg\" ALIGN=\"left\" BORDER=0></font></td>
</tr>
</table>
</center>
</div>
<%
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
-----------default.asp------------
<%
movieID = Request.QueryString( \"movieID\" )
Set Conn = Server.CreateObject(\"ADODB.Connection\")
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"film.mdb\")
Conn.Open strDSN
strSQL = \"SELECT * FROM FILM WHERE MOVIEID =\" & movieID
Set rs = Conn.Execute( strSQL )
%>
<html>
<head>
<meta http-equiv=\"Content-Language\" content=\"da\">
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<title>Velkommen til sejs</title>
</head>
<body>
<p>Velkommen til sejs.dk - Din film guide</p>
<p>Vælg den anmeldelse du ønsker at se:</p>
<p>
<p><a href=\"
http://www.sejs.dk/adm/movie.asp?movieid=<%=rs(\"movieID\")%>\" target=\"_self\"><%=rs(\"Film navn\")%>></a></p>
</body>
</html>
<%
Conn.Close
Set Conn = Nothing
%>
--------------top.asp------------
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"film.mdb\")
strSQL = \"select top 10 * from links ORDER BY id DESC\"
set rs = Conn.execute(strSQL)
if rs.EOF then
Response.write \"Databasen er tom.\"
else
Do Until rs.EOF
%>
<A HREF=\"
http://www.sejs.dk/adm/movie.asp?movieid=<%=RS(\"movieID\")%>\" TARGET=\"_blank\"><%=RS(\"Film navn\")%></A>
<p><br>
<%RS.MoveNext
Loop
end if
Conn.Close
Set Conn = Nothing%>
<!-- Minus AutoDato -->
-----------------
Movie.asp er den fil, som viser anmeldelsen af filmen, det virkede fint i går, men i dag skriver den at siden ikke kunne findes
default.asp er den fil, som jeg gerne vil have en liste over dem alle i, men der får jeg samme meddelse
top.asp, er den fil, hvor jeg gerne vil kunne se en top ti, men der får jeg også den fejl meddelse