Dim cmd As new SQLCommand
Dim d1 As String = format(Date.Today().AddDays(-1),"yyyyMMdd")
Dim d2 As String
d2="107" & d1 & ".o"
cmd.C
cmd.CommandText = "Insert Into {日志}(日期,操作,文件名,时间) Values(?,?,?,?)"
cmd.Parameters.Add("@日期",Date.today)
cmd.Parameters.Add("@操作","下载成功")
'cmd.Parameters.Add("@文件名","107" & d1 & ".o")
cmd.Parameters.Add("@文件名",d2)
cmd.Parameters.Add("@时间",Date.now)
cmd.ExecuteNonQuery
操作和文件名是字符型的其他是时间型的