HTTP 500 - Hvor er fejlen i koden?
Hej!Hvorfor giver følgende kode en http 500 intern serverfejl??
Koden:
udr_change.asp:
<% Session.LCID = 1030 %>
<% Response.Buffer=True %>
<% PostUdrNr = Request.Form("Nr")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("../db/udrykninger.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM udrykninger WHERE UdrNr = " & PostUdrNr & ""
rs.Open strSQL, Conn, 1
Dato = rs("Dato")
Sted = rs("Sted")
Kommune = rs("kommune")
Melding = rs("Melding")
Tekst = rs("Tekst")
Fra = rs("Fra")
UdrNr = rs("UdrNr")
%>
<html>
<head>
<meta http-equiv="Content-Language" content="da">
<title>Rediger udrykning</title>
<link rel="stylesheet" type="text/css" href="../cssdesign/design01.css">
</head>
<body topmargin="10" leftmargin="0" rightmargin="0">
<center>
<h2>Herunder kan du redigere en udrykning</h2>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" width="506">
<tr>
<td width="506"><form method="POST" action="udr_update.asp?Udr=<%=PostUdrNr%>">
<table border="0" width="102%">
<tr>
<td width="25%">
<font face="Verdana" color="#666666" size="2"><b>Dato / Tid (DD-MM-ÅÅÅÅ TT:MM)</b></font>
</td>
<td width="2%"> </td>
<td width="49%">
<font face="Verdana" color="#666666" size="2"><b>Melding</b></font>
</td>
</tr>
<tr>
<td width="25%">
<input type="text" name="NyDato" size="33" value="<%=Dato%>"></td>
<td width="2%"> </td>
<td width="49%">
<input type="text" name="NyMelding" size="33" value="<%=Melding%>"></td>
</tr>
<tr>
<td width="25%"><b><font face="Verdana" color="#666666" size="2">Sted</font></b></td>
<td width="2%"> </td>
<td width="49%">
<font face="Verdana" color="#666666" size="2"><b>Kommune</b></font>
</td>
</tr>
<tr>
<td width="25%">
<input type="text" name="NyAdresse" size="33" value="<%=Sted%>"></td>
<td width="2%"> </td>
<td width="49%"><select size="1" name="NyKommune">
<% If Kommune = "Ringsted Kommune" THEN %>
<option value="Ringsted Kommune" selected>Ringsted</option>
<option value="Suså Kommune" >Suså</option>
<% Elseif Kommune = "Suså Kommune" THEN %>
<option value="Ringsted Kommune">Ringsted</option>
<option value="Suså Kommune" selected>Suså</option>
<% End If %>
</select></td>
</tr>
<tr>
<td width="25%">
<font face="Verdana" color="#666666" size="2"><b>Tekst</b></font>
</td>
<td width="2%"> </td>
<td width="49%"><font face="Verdana" color="#666666" size="2"><b>Modtaget fra</b></font></td>
</tr>
<tr>
<td width="25%" rowspan="5"><textarea rows="4" name="NyTekst" cols="27"><%=Tekst%></textarea></td>
<td width="2%" rowspan="5"> </td>
<td width="49%"><select size="1" name="NyFra">
<% If Fra = "112 Alarm AC Slagelse" THEN %>
<option value="112 Alarm AC Slagelse" selected>112 Alarm</option>
<option value="Ringsted Politi">Ringsted Politi</option>
<option value="VC Ringsted Brandvæsen">VC Ringsted Brandvæsen</option>
<% Elseif Fra = "Ringsted Politi" THEN %>
<option value="112 Alarm AC Slagelse">112 Alarm</option>
<option value="Ringsted Politi" selected>Ringsted Politi</option>
<option value="VC Ringsted Brandvæsen">VC Ringsted Brandvæsen</option>
<% Elseif Fra = "VC Ringsted Brandvæsen" THEN %>
<option value="112 Alarm AC Slagelse">112 Alarm</option>
<option value="Ringsted Politi">Ringsted Politi</option>
<option value="VC Ringsted Brandvæsen" selected>VC Ringsted Brandvæsen</option>
<% End If %>
</select></td>
</tr>
<td width="49%"><b><font face="Verdana" size="2" color="#666666">Udrykning Nr.</font></b></td>
</tr>
<tr>
<td width="49%">
<input type="text" name="NyUdrNr" size="4" value="<%=UdrNr%>"></td>
</tr>
<tr>
<td width="49%"></td>
</tr>
<tr>
<td width="49%"></td>
</tr>
<tr>
<td width="25%"> </td>
<td width="2%"> </td>
<td width="49%"> </td>
</tr>
<tr>
<td width="25%">
<p align="center"> </td>
<td width="2%"> </td>
<td width="49%">
</td>
</tr>
</table>
</td>
<%
rs.Close
Set rs = Nothing
Conn.Close
set Conn = Nothing
%>
</tr>
<tr>
<td width="506">
<h2 align="center"><input type="submit" value="Gem" name="submit"></h2>
</form>
<h2 align="center"><a href="java script:window.close()">Luk vinduet</a></h2>
</td>
</tr>
</table>
</center>
</body>
</html>
Vh
Rasmus
