Problemer med INSERT statement.

tja... jeg har nogle problemer med en INSERT Statement...
Men ved ikke helt... for den kommer ikke og siger der er fejl i min SQL, den siger bare Fejl 500

Her er min SQL, efter den har modtaget de data den skal...
___________________________________________________________
INSERT INTO TagWall (Head, Body, Forfatter, Dato, IP) VALUES ('Endelig en tagwall','Så kom der endelig en Tagwall hvor i kan kommentere siden her... Brug den fornuftigt.. ;o)','Craig','04/08/2003','131.165.145.89');
___________________________________________________________
og her er HELE siden:
___________________________________________________________
<%
Head = Server.HTMLEncode(Replace(Request.Form("Head"), "'", "''"))
Body = Server.HTMLEncode(Replace(Request.Form("Body"), "'", "''"))
Navn = Request.Form("Navn")
IP  = Request.ServerVariables("Remote_ADDR")

Dato = Right("00" & Day(Date), 2) & "/"
Dato = Dato & Right("00" & month(date), 2) & "/"
Dato = Dato & Year(Date)

StrPath = "d:\web\it-links.dk\Database\FFHAB\Data.mdb"
'StrPath = "d:\FFHAB\Data.mdb"
StrDSN = "Provider = Microsoft.jet.OLEDB.4.0; Data Source =" & StrPath
Set CN = Server.CreateObject("ADODB.Connection")
CN.Open StrDSN

SQL = ""
SQL = SQL & "INSERT INTO TagWall "
SQL = SQL & "(Head, Body, Forfatter, Dato, IP) "
SQL = SQL & "VALUES ('" & Head & "','" & Body & "','" & Navn & "','" & Dato & "','" & IP & "');"

'CN.Execute(SQL)
'Response.Redirect ("../Default.asp?Type=INC&Case=FRT")

CN.Close
Set CN = Nothing

Response.Write SQL
%>
___________________________________________________________

Hvis jeg køre CN.Execute(SQL) så er det det går galt...