28,409
社区成员




set rs=server.CreateObject("adodb.recordset")
sql="{call QAPerformance('"&request.Form("Start")&"','"&request.Form("EndTime")&"')}"
rs.open sql,conn,1,3
stime="2008-09-26"
etime="2008-09-30"
Set MyComm = Server.CreateObject("ADODB.Command")
with MyComm
.ActiveConnection = conn
.CommandText = "QAPerformance"
.CommandType = 4
.Prepared = true
.Parameters.Append .CreateParameter("@StartTime",7,1,8,stime)
.Parameters.append .CreateParameter("@EndTime",7,1,8,etime)
Set MyRst = .Execute
end with