ifsession("user")="A0331A2"then'试验存储过程response.Write("存储过程")DIMMyComm,rsSetMyComm=Server.CreateObject("ADODB.Command")MyComm.ActiveConnection=conn'MyConStr是数据...
if session("user")="A0331A2" then '试验存储过程
response.Write("存储过程")
DIM MyComm,rs
Set MyComm = Server.CreateObject("ADODB.Command")
MyComm.ActiveConnection = conn 'MyConStr是数据库连接字串
MyComm.CommandText = "test" '指定存储过程名
MyComm.CommandType = 4 '表明这是一个存储过程
MyComm.Prepared = true '要求将SQL命令先行编译
'response.write conn
MyComm.Parameters.append MyComm.CreateParameter("@sql",200,1,4000,sql)
rs_buy.CursorLocation = 3
Set rs_buy = MyComm.Execute
pagecount = MyComm(0)
Set MyComm = Nothing
else
response.Write("非存储过程")
rs_buy.open sql,conn,1,3
end if
308. rs_buy.absolutepage=currentpage
怎么解决啊
当前记录集不支持书签。这可能是提供程序或选定的游标类型的限制。
isell.asp,行 308
t/
展开