Type mismatch

Hej!

Jag har ett fält i en databas av typen tal(långt heltal), decimaler: automatisk, standardvärde:0, Obligatorisk:nej, Indexerat:nej.
När jag ska uppdatera en post från adminsidan så går det inte att lämna detta fält tomt (om man nu inte vet vad man ska fylla i). Jag får då Type mismatch. Nån som vet varför?

Mvh Sofia

------------------
Sofia

Ska du inte uppdatera det så ska du inte ha med det i SQL-frågan, annars får du uppdatera med NULL.

Mvh,

------------------
All your base are belong to me.

Fattar inte riktigt hur du menar..så här ser min kod ut, vad är fel...

<%
If Request.Form("Benamning") <> "" and Request.Form("Gruppnr") <> ""and Request.Form("Fordonsnummer") <>"" then	

Set conn = server.createObject ("ADODB.Connection") 
DBPath = "DBQ=" & Server.MapPath("data/databas.mdb")
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
SQL="SELECT * from Fordon where Fordonsnummer = " & Request.Form("Fordonsnummer") & ""
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, Conn, 1,2

if rs.eof then

rs.AddNew

rs("Benamning") = Request.Form("Benamning")    
rs("Gruppnr") = Request.Form("Gruppnr") 
rs("Fordonsnummer") = Request.Form("Fordonsnummer")
rs("Klassificering") = Request.Form("Klassificering")    
rs("Arsmodell") = Request.Form("Arsmodell")
rs("Miljogodkand") = Request.Form("Miljogodkand")   
rs("Medlemsnummer") = Request.Form("Medlemsnummer")   
rs("Pdf") = Request.Form("Pdf")   

rs.Update
rs.Close
conn.close 
set rs = nothing
set conn = nothing
%>

<h2>Lägg till ny maskin</h2>
<p>Maskinen &auml;r nu inf&ouml;rd i databasen.<br> 

<% Else 
Response.Write ("<p>En maskin med detta maskinnummer finns redan inlagd i databasen.<br> Välj ett annat maskinnummer eller redigera befintlig maskin.</p>")
Response.Write ("<a href='javascript:history.go(-1);'>Tillbaka</a>")
End if %>

<% Else %>
<p>Oj! Du gl&ouml;mde fylla i ett f&auml;lt.<br> Anv&auml;nd webbl&auml;sarens bak&aring;tknapp f&ouml;r att prova igen.

<% End if %>

------------------
Sofia

Ska jag skriva nåt liknande detta?

  

if not Request.Form("Arsmodell") = "" then
	rs("Arsmodell") =  Request.Form("Arsmodell")
	else
	rs("Arsmodell") = " "
	end if

------------------
Sofia

if not Request.Form("Arsmodell") = "" then
rs("Arsmodell") = Request.Form("Arsmodell")
end if

------------------
essentitia preter non sans multiplicandum

Tack!

Funkar strålande!

------------------
Sofia