Fejl i Script
Hej Følgende script virker ikke. Men jeg kan sgu ikke helt se hvorfor...<body bgcolor="#FFFFFF">
<table width="962" border="0" height="257">
<tr>
<td width="553" height="263" valign="top">
<form name="form1" method="post">
<p> </p>
<table width="54%" border="0" height="130" bgcolor="#000000" bordercolor="#000000" cellpadding="1" cellspacing="1">
<tr>
<td height="220" bgcolor="#CCCCCC">
<table width="546" border="0" cellspacing="0">
<tr>
<td colspan="6" height="21"> <b><font size="4"><font face="Verdana, Arial, Helvetica, sans-serif">
<input type="text" name="Navn2" maxlength="50" size="37">
</font> </font></b> <b><font size="4"><font face="Verdana, Arial, Helvetica, sans-serif">
</font></font></b> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
</font> <font face="Verdana, Arial, Helvetica, sans-serif" size="1"><b><font size="4"><font face="Verdana, Arial, Helvetica, sans-serif">
<input type="text" name="Efternavn2" maxlength="50" size="37">
</font></font></b> </font></td>
<td width="74"> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
</font></td>
</tr>
<tr>
<td width="104" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Titel.:</font></td>
<td colspan="2" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="Titel2" size="20">
</font></td>
<td width="35" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Notat.:</font></td>
<td colspan="3" rowspan="5" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<textarea name="textarea" rows="8" cols="40"></textarea>
</font></td>
</tr>
<tr>
<td width="104" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Direkte
Telefon:</font></td>
<td colspan="2" height="21">
<div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="direkte telefon2" size="20">
</font></div>
</td>
<td width="35" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
</tr>
<tr>
<td width="104" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Direkte
Fax:</font></td>
<td colspan="2" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="direkte fax2" size="20">
</font></td>
<td width="35" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
</tr>
<tr>
<td width="104" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Mobil.:</font></td>
<td colspan="2" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="Mobil2" size="20">
</font></td>
<td width="35" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
</tr>
<tr>
<td width="104" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Email.:</font></td>
<td colspan="2" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="email2" size="20">
</font></td>
<td width="35" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
</tr>
<tr>
<td width="104" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">Fødselsdato.:</font></td>
<td colspan="2" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
<input type="text" name="fødselsdag2" size="20">
</font></td>
<td width="35" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
<td width="123" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
<td colspan="2" height="19"> </td>
</tr>
</table>
</td>
</tr>
</table>
<table width="546" border="0">
<tr>
<td width="73" height="2"><b><Input type=submit Value=tilføj><input type=hidden name=mode value=gem></b></td>
<td width="463" height="2"><b><font face="Verdana, Arial, Helvetica, sans-serif" size="2"></font></b></td>
</tr>
</table>
<p> </p>
</form>
<p> </p>
<p> </p>
<p> </p>
</td>
</tr>
</table>
<p>
</p>
<% if request("mode") = "gem" then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
Server.MapPath("/crm.mdb")
Conn.Open DSN
set rskunder = server.createobject("adodb.recordset")
rskunder.open "kontakpersoner", DSN, 1, 3
rskunder.addnew
rskunder("Navn") = request.form("Navn")
rskunder("efternavn") = request.form("efternavn")
rskunder("titel") = request.form("titel")
rskunder("Direkte telefon") = request.form("direkte telefon") rskunder("direkte fax") = request.form("direkte fax")
rskunder("mobil") = request.form("mobil")
rskunder("email") = request.form("email")
rskunder("fødselsdato") = request.form("fødselsdato")
rskunder("notat") = request.form("notat")
rskunder.update
%>
<%
rskunder.Close
set retrs = Nothing
end if
%>
<p> </p>
