שאלה בקשר לASP

הכנתי קוד שמכניס נתונים לבסיס נתונים מסוג MS acces:
<%
category=Trim(Request.Form("category"))
subcat=Trim(Request.Form("subcat"))
head=Trim(Request.Form("head"))
date=Trim(Request.Form("date"))
byuser=Trim(Request.Form("byuser"))
body=Trim(Request.Form("body"))
time=Trim(Request.Form("time"))
tags=Trim(Request.Form("tags"))

If LEN(byuser)=0 Then byuser="חסוי"

body=REPLACE(body, vbCrlf, "<br>")
body=REPLACE(body, "[b]", "<b>")
body=REPLACE(body, "[/b]", "</b>")
body=REPLACE(body, "", "<img src='images/smile1.gif'>")
body=REPLACE(body, ";)", "<img src='images/smile1.gif'>")


sq="insert into news(full_news,title,author)values(#"&category&"#,#"&subcat&"#,#"&head&"#)"


path = server.mappath("admin/mydb.mdb")
set c=server.createobject("ADODB.Connection")
c.open "driver={Microsoft Access Driver (*.mdb)}; DBQ=" &path
c.Execute sq
%>

אבל ברגע שאני מנסה להציג את הדף הוא מראה לי שגיאה:

Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/flickr/AddContent.asp, line 133, column 81
sq="insert into news(full_news,title,author)values(#"&category&"#,#"&subcat&"#,#"&head&"#)"
——————————————————————————–^

אני לא מצליח להבין איפה הטעות הריי עשיתי הכל לפי המדריכים באתר
אם אפשר עזרה בבקשה