Hvad er galt i koden
Hvad er der galt i min kode?Når jeg vælger et element i min dropdown liste køres en select case på valget.
Tilhørende data fra en db skulle så blive fyldt i tabeller, men jeg får en fejlm.
******************\'\'
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER=MySQL;SERVER=mysql.infopaq.dk;\" &_
\"UID=www004068;PWD=MpMCiPFu;\" &_
\"DATABASE=www004068_db;\"
%>
</p>
<table width=\"95%\" border=\"0\" cellspacing=\"5\" cellpadding=\"5\">
<tr>
<td><form action=\"index.asp\" name=\"Kategori\" method=\"post\">
<p>
<select name=\"Kategori\" onchange=\"this.form.submit()\">
<option selected>Vælg kategori</option>
<option>____________</option>
<option>Præsentation</option>
<option>Erhvervserfaring</option>
<option>Uddannelse m. eksamen</option>
<option>Uddannelse u. eksamen</option>
<option>Skolegang</option>
<option>Fritidsinteresser</option>
</select>
</p>
</form></td>
</tr>
</table>
<%
temp = request.form(\"Kategori\")
Select Case temp
Case \"Erhvervserfaring\"
Set rs = Conn.Execute(\"SELECT * FROM AKTIVITET WHERE AKTIVITET.erhverserfaring = \'1\'\")%>
<table width=\"95%\" border=\"0\" cellspacing=\"1\" cellpadding=\"2\">
<tr>
<td>Kategori:</td>
<td>Periode:</td>
<td>Sted:</td>
<td>Beskrivelse:</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%response.write temp%>
<td><%response.write (rs(\"Periode\"))%></td>
<td><%response.write (rs(\"Sted\"))%></td>
<td><%response.write (rs(\"Tekst\"))%></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
Case \"Uddannelse m. eksamen\"
Set rs = Conn.Execute(\"SELECT * FROM AKTIVITET WHERE AKTIVITET.Uddannelse = \'1\'\")%>
<table width=\"95%\" border=\"0\" cellspacing=\"1\" cellpadding=\"2\">
<tr>
<td>Kategori:</td>
<td>Periode:</td>
<td>Sted:</td>
<td>Beskrivelse:</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%response.write temp%>
<td><%response.write (rs(\"Periode\"))%></td>
<td><%response.write (rs(\"Sted\"))%></td>
<td><%response.write (rs(\"Tekst\"))%></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
Case \"Uddannelse u. eksamen\"
Set rs = Conn.Execute(\"SELECT * FROM AKTIVITET WHERE AKTIVITET.Uddannelse = \'1\'\")%>
<table width=\"95%\" border=\"0\" cellspacing=\"1\" cellpadding=\"2\">
<tr>
<td>Kategori:</td>
<td>Periode:</td>
<td>Sted:</td>
<td>Beskrivelse:</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%response.write temp%>
<td><%response.write (rs(\"Periode\"))%></td>
<td><%response.write (rs(\"Sted\"))%></td>
<td><%response.write (rs(\"Tekst\"))%></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
Case \"Skolegang\"
Set rs = Conn.Execute(\"SELECT * FROM AKTIVITET WHERE AKTIVITET.Skolegang = \'1\'\")%>
<table width=\"95%\" border=\"0\" cellspacing=\"1\" cellpadding=\"2\">
<tr>
<td>Kategori:</td>
<td>Periode:</td>
<td>Sted:</td>
<td>Beskrivelse:</td>
</tr>
<%
while not rs.eof
%>
<tr>
<td><%response.write temp%>
<td><%response.write (rs(\"Periode\"))%></td>
<td><%response.write (rs(\"Sted\"))%></td>
<td><%response.write (rs(\"Tekst\"))%></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
Case \"Fritidsinteresse\"
Set rs = Conn.Execute(\"SELECT * FROM CV\")%>
<table width=\"95%\" border=\"0\" cellspacing=\"1\" cellpadding=\"2\">
<tr>
<td>Kategori:</td>
<td>Beskrivelse:</td>
</tr>
<tr>
<td><%response.write temp%>
<td><%response.write (rs(\"Fritidsinteresse\"))%></td>
</tr>
</table>
<%
End select
%>
*****************************
Jeg får følgende fejlm.
The page cannot be displayed
The page you are looking for cannot be displayed because the page address is incorrect.
Tak !
