7,763
社区成员
发帖
与我相关
我的任务
分享
Dim para As ADODB.Parameter
Set objCommand = New Command
With objCommand
Set para = .CreateParameter("@g", adPropVariant, adParamInput, , strSQLPara) '--怎么写似乎都不成
.Parameters.Append para
.ActiveConnection = g_objConnection
.CommandType = adCmdText
.CommandTimeout = m_lngTimeout
End With