With prvRs
.Open "SELECT * FROM pic_view where pic_id='" & Me.strId & "' ", prvConn, 1, 3
.UpdateBatch '新增一条记录
.Fields("pic_name") = Me.pic_name.Text
.Fields("pic_uploadDate") = "getdate()" -----------为什么这里出错?
.Update
End With
.Open "SELECT * FROM pic_view where pic_id='" & Me.strId & "' ", prvConn, 1, 3
.UpdateBatch '新增一条记录
.Fields("pic_name") = Me.pic_name.Text
.Fields("pic_uploadDate") = "getdate()" -----------为什么这里出错?
.Update
End With
.Fields("pic_uploadDate") = now()
pivconn.execute sql
.Open "SELECT * FROM pic_view where pic_id='" & Me.strId & "' ", prvConn, 1, 3
.UpdateBatch '新增一条记录
.Fields("pic_name") = Me.pic_name.Text
.Fields("pic_uploadDate") = "getdate()" -----------为什么这里出错?
.Update
End With那这里该怎么修改?
或
.Fields("pic_uploadDate") = Now
Dim rs As New ADODB.Recordset
dim conn as New ADODB.Connection
Set rs= conn.Execute("select getdate() as sysDate")
prvRs.fields("pic_uploadDate") = rs.fields("sysDate")
例如:create table pic_view
pic_name ......
pic_uploadDate datetime default getdate()
;SQL Server 是肯定可以,不知道你用什么数据库。
程序中就不需要操作该字段,插入记录时会自动赋上默认值。