我想向数据库写入时间,出现语法错误,以下是详细代码,请教:Sub database()
Dim connection1 As New ADODB.Connection
Dim connection2 As New ADODB.Connection
    Dim cmdRDB As New ADODB.Command
    Dim recset1 As New ADODB.Recordset
    Dim n As Variant
    Dim p As Variant
    Dim strConnectionString$, rstString$
    Dim i, j
     strConnectionString$ = "Provider=SQLOLEDB.1;Data Source=CHENS\SQLEXPRESS;User Id=optimize;Password=123456;Initial Catalog=优化平台"
    connection1.ConnectionString = strConnectionString$
    connection1.Open
    rstString$ = "INSERT 汽机数据(一号汽机进汽量,一号汽机进汽焓值,一号汽机抽汽量,一号汽机抽汽焓值,一号汽机发电量,二号汽机进汽量,二号汽机进汽焓值,二号汽机抽汽量,二号汽机抽汽焓值,二号汽机发电量,时间) VALUES(1,2,3,4,4,6,7,8,9, 10, " & DateTime.Now & ")"
    connection1.Execute rstString
    connection1.Close
End Sub
出现在DateTime.Now这里数据库里我时间段设置的是:时间 varchar(60)请问我的程序哪里错了,谢谢!!!