Numeric value out of range (null)

detta är min

<%
set mincon = Server.CreateObject("ADODB.Connection")
mincon.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\kalasmannen\db\db_guestbook.mdb")

msg = request.Form("msg")
name = request.Form("name")
mail = request.Form("mail")
webpage = request.Form("webpage")
icq = request.Form("icq")
datum = FormatDateTime(date)
tid = FormatDateTime(time)
ip= request.Servervariables("REMOTE_ADDR")

if msg = "" then
%>
<meta http-equiv="refresh" content="0;URL=klant.htm">
<%
end if

if name = "" then
name = "anonym"
end if

if mail = "" then
mail = "-"
end if

if webpage = "" then
webpage = "-"
end if

if icq = "" then
icq = "0"
end if

query = "insert into guestbook(msg,name,mail,webpage,icq,ip,datum,tid) values('" & msg & "','" & name &"','" & mail & "','" & webpage & "','" & icq & "','" & ip & "','" & datum & "','" & tid & "')"
mincon.execute query,,128

mincon.close
%>

detta är mitt felmeddelande

Microsoft OLE DB Provider for ODBC Drivers error '80040e57' 
[Microsoft][ODBC Microsoft Access Driver]Numeric value out of range (null) 
/kalasmannen/write.asp, line 70

detta är line 69 och 70

query = "insert into guestbook(msg,name,mail,webpage,icq,ip,datum,tid) values('" & msg & "','" & name &"','" & mail & "','" & webpage & "','" & icq & "','" & ip & "','" & datum & "','" & tid & "')"
mincon.execute query,,128

hur fixar jag detta?

[Redigerat av jns den 10 feb 2002]

query = "insert into guestbook(msg,name,mail,webpage,icq,ip,[datum],[tid]) values('" & msg & "','" & name &"','" & mail & "','" & webpage & "','" & icq & "','" & ip & "',#" & datum & "#,'" & tid & "')"
mincon.execute query,,128

Prova denna, nu vet jag inte vad du har för fälttyp på de olika fälten.

Är datum ett datumfält så vil, access ha ## runt värdet. Sedan är datum ett reserverat namn i många SQL dialekter.

Prova skriva ut frågan med response.write, för att enklare se felet.

------------------
Vänligen Jörgen :)

[Redigerat av jorgen den 10 feb 2002]