'radannonser.intresse' cannot be a zero-length string.

Jag får detta felmeddelandet:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Field 'radannonser.intresse' cannot be a zero-length string.

/brev/enter.asp, line 37

efter att jag försökt lägga in en post till genom att skriva så här i enter.htm

<html>

<head>
<title>Mata in radannonserna</title>
<link REL="STYLESHEET" TYPE="TEXT/CSS" HREF="../godzilla/mailisarmenyn.css">
<script>
<!--
if(top == self) self.location = "index.htm";
//-->
</script>
<script LANGUAGE="JAVASCRIPT">
<!--
        defaultStatus ="Copyright © 2000 Costodia - All Rights Reserved ©."
// -->
</script>
<script language="JavaScript">
<!--
var message="© 2000 Costodia"; 

function click(e) {
if (document.all) {
if (event.button == 2) {
alert(message);
return false;
}
}
if (document.layers) {
if (e.which == 3) {
alert(message);
return false;
}
}
}
if (document.layers) {
document.captureEvents(Event.MOUSEDOWN);
}
document.onmousedown=click;
// --> 
</script>
</head>

<body>

<form ACTION="enter.asp" METHOD="POST">
  <table border="0" cellpadding="3" cellspacing="0">
    <tr>
      <td valign="top"><strong>Tjej. Kille, Man <br>
      eller Kvinna?</strong></td>
      <td valign="top"><b><select NAME="kategori" size="1" class="orange">
          <option>Man </option>
          <option>Kvinna </option>
          <option>Tjej </option>
          <option>Kille </option>
        </select></b></td>
    </tr>
    <tr>
      <td valign="top"><div align="right"><p><strong>Rubrik</strong></td>
          <td valign="top"><b><input TYPE="TEXT" NAME="rubrik" size="20" class="text"></b></td>
        </tr>
        <tr>
          <td valign="top"><div align="right"><p><strong>Mailtext</strong></td>
              <td valign="top"><b><textarea NAME="text" rows="4" cols="26" class="text"></textarea></b></td>
            </tr>
            <tr>
              <td valign="top" align="right"><strong>Ditt Namn</strong></td>
              <td valign="top"><b><input TYPE="TEXT" NAME="namn" size="20" class="text"></b></td>
            </tr>
            <tr>
             
              <td valign="top"><strong>Ålder</strong></td>
                <td valign="top" class="lightblue"><select size="1" name="telefon">
																						<option>0-14</option>
																						<option>15-17</option>
																						<option>18-23</option>
																						<option>24-99</option>
											</select></td>
            </tr>
            <tr>
              <td valign="top" align="right"><strong>E-post</strong></td>
              <td valign="top"><b><input TYPE="TEXT" NAME="epost" size="20" class="text"></b></td>
            </tr>
            <tr>
              <td valign="top"></td>
              <td valign="top"><input TYPE="submit" VALUE="Sätt in annonsen" class="orange"><input
      TYPE="reset" VALUE="Rensa allt" class="orange"></td>
            </tr>
            <tr>
              <td valign="top"></td>
              <td valign="top"></td>
            </tr>
          </table>
        </form>

        <p><a href="../fptest/Default.htm" target="_top">Tillbaka till Costodia.coms Startsida</a></p>

        <table border="0" cellpadding="0" cellspacing="0" background="pricken.gif" width="100%">
          <tr>
            <td><img src="9CCECEprick.gif" width="1" height="1" alt="9CCECEprick.gif (77 bytes)"></td>
          </tr>
        </table>

        <p>Om du har fråger eller kommentarer Skicka dem till<br>
Hanna Nykvist på <a href="mailto:HannaNykvist@costodia.com">HannaNykvist@costodia.com</a>
        </p>
      </body>
    </html>

och i enter.asp(som processar det som man matar in i enter.htm

<!--#include file="functions.asp"-->
<%

set rRubrik = Request("rubrik")		' Hämta annonsrubrien från formuläret
set rText = Request("text")		' Hämta annonstexten...
set rNamn = Request("namn")		' Hämta annonsörnamnet...
set rTelefon = Request("telefon")	' telefonnummer...
set rEpost = Request.Form("epost")	' e-postadress...
set rKategori = Request("kategori")	' kategori...

' Kontrollera värdena från formuläret

if rRubrik = "" or rText = "" then
	Response.Write("<H3>Rubrik eller text saknas</H3>Du måste ha en rubrik och en annonstext till din annons!")
else
	if rNamn = "" then
		rNamn = "Saknas"
	end if
	if rTelefon = "" then
		rTelefon = "Saknas"
	end if
	if rEpost = "" then
		rEpost = "Saknas"
	end if
	
	' Skapa ett databasobjekt
	set DBConnection = Server.CreateObject("ADODB.Connection")
	
	' Anslut till databasen med en fil
	DBConnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=d:\scripts\mailisar.mdb"

	' Skapa SQL-satsen vi använder för att infoga data
	SQLstring = "INSERT INTO radannonser (kategori, rubrik, annonstext, namn, telefon, epost) VALUES ('"& rKategori &"', '"& rRubrik &"','"& rText &"', '"& rNamn &"', '"& rTelefon &"', '"& rEpost &"')"

	' Utför SQL-satsen
	DBConnection.Execute(SQLstring)

	Response.Write("<H3>Inmatningen lyckades!</H3>Din annons är nu inlagd.")

	'Stäng databaskopplingen
	DBConnection.Close
	set DBConnection = Nothing

end if

%>
<html>

<head>
<title></title>
<link REL="STYLESHEET" TYPE="TEXT/CSS" HREF="../godzilla/costodiamin.css">
</head>

<body>

<p><a HREF="show.asp">Titta på annonserna</a><br>
<a HREF="enter.htm">Lägg in en ny annons</a></p>

</body>
</html>

Är det någon som ser vad jag gör för fel?

tack på förhand,