בעיה בהכנסת נתון תאריך למסד נתונים

אני מנסה להכניס את הנתונים למסד הנתונים שלי וכנראה הבעיה היא בנתון התאריך שלא נכנס למסד הנתונים…

הבנתי שיש צורה תחבירית להכניס תאריכים למסד נתונים האם זה ככה?



<%
    p_name=Request.Form("name")
    subject=Request.Form("subject")
    mesage=Replace(Request.Form("mesage"),vbCRlf,"<br>")
    pdate=date()
    set con=server.CreateObject("adodb.connection")
    con.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("mdb-databasemashovdb.mdb")
    sqltext="INSERT INTO mashov (subject,name,masege,date) VALUES ('"&subject&"','"&p_name&"','"&mesage&"','" & pdate & "')"
    Response.Write(sqltext)
    con.Execute (sqltext)
    Response.Redirect("feedback.asp")
     con.close
     set mashovdb=nothing
%>