28,391
社区成员
发帖
与我相关
我的任务
分享
Set cComm = Server.CreateObject("ADODB.Command")'创建Command对象
With cComm
.ActiveConnection = db.conn'设置Command对象所用的Connection对象
.CommandType = 1 ' CommandType设置为SQL语句
.CommandText = "UPDATE h_manager Set errstart = GETDATE(),errnum = ? WHERE username = ?" '需要执行的SQL语句,?代表参数
Set cParm = .CreateParameter("errnum",3,1,4,1)
.Parameters.Append cParm'把fparm添加到Command对象的参数集中
Set dParm = .CreateParameter("username",200,1,20,"admin")
.Parameters.Append dParm'把fparm添加到Command对象的参数集中
'添加一个参数对象,CreateParameter参数分别为:参数名字,参数类型为Varchar,ParameterDirection=1 代表为ParamInput,20为参数最大长度,Username为参数赋值
.Execute()'执行
End With
Set cComm = Nothing