Tilføj i DB

rskunder("kundeID") = request.querystring("kundeID")

Den udfylder bare ikke kundeid

body bgcolor="#FFFFFF">
<table width="962" border="0" height="257">
  <tr>
    <td width="553" height="263" valign="top">
      <form name="form1" method="post" action="nyKontaktpersonkort.asp?mode=gem">
        <table width="53%" border="0" height="130" bgcolor="#000000" bordercolor="#000000" cellpadding="1" cellspacing="1">
          <tr>
            <td height="220" bgcolor="#CCCCCC">
              <table width="507" border="0" cellspacing="0">
                <tr>
                  <td colspan="7" height="21"> <b><font size="4"><font face="Verdana, Arial, Helvetica, sans-serif">
                    <input type="text" name="Navn" 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="Efternavn" maxlength="50" size="37">
                    </font></font></b> </font> <font face="Verdana, Arial, Helvetica, sans-serif" size="1">
                    </font></td>
                </tr>
                <tr>
                  <td width="136" 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="Titel" size="20">
                    </font></td>
                  <td width="47" 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="notat" rows="8" cols="20"></textarea>
                    </font></td>
                </tr>
                <tr>
                  <td width="136" 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 telefon" size="20">
                      </font></div>
                  </td>
                  <td width="47" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                </tr>
                <tr>
                  <td width="136" 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 fax" size="20">
                    </font></td>
                  <td width="47" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                </tr>
                <tr>
                  <td width="136" 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="Mobil" size="20">
                    </font></td>
                  <td width="47" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                </tr>
                <tr>
                  <td width="136" 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="email" size="20">
                    </font></td>
                  <td width="47" height="21"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                </tr>
                <tr>
                  <td width="136" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">F&oslash;dselsdato.:</font></td>
                  <td colspan="2" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1">
                    <input type="text" name="født" size="20">
                    </font></td>
                  <td width="47" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                  <td width="189" height="19"><font face="Verdana, Arial, Helvetica, sans-serif" size="1"></font></td>
                  <td colspan="2" height="19" width="14">&nbsp;</td>
                </tr>
              </table>
            </td>
          </tr>
        </table>
        <table width="546" border="0">
          <tr>
            <td width="73" height="2"><b>
              <Input type=submit Value=Tilf&oslash;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>&nbsp;</p>
      </form>
      <p>&nbsp;</p>
      <p>&nbsp;</p>
      <p>&nbsp;</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 ("kundeid") = request("kontaktpersonid")
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ødt")
rskunder("notat") = request.form("notat")
rskunder("kundeid") = request.querystring("kundeid")
rskunder.update

%>

<%
rskunder.Close
set rskunder = Nothing
end if
%>
<p>&nbsp;</p>

udskift rskunder ("kundeid") = request("kontaktpersonid") med
rskunder ("kundeid") = request.querystring("kundeid")

Hvor står dit kundeid i din querystring?

nu er jeg ikke helt med.. hvad mener du

nu virker det...