Insert system date into SQL server

I am now using VB6 and want to update the table card history with the system date of VB6 Now the format (3/4/2008 15:28:21) to the db in datatime format.

Dim sysdate as Date
sysdate = NOW

conn.Open sConnect
InsertSQL = “Insert into history values =” & sysdate & “)”

it would result syntax error near 15
I don’t know why and how to sovle, please help

Regards
Cora