set comm = Server.CreateObject("ADODB.COMMAND")
comm.CommandText = "keywordcount"'过程名
comm.CommandType = 4'4表示为存储过程
set comm.activeconnection=conn
comm.Parameters.Append comm.CreateParameter("tseek",advarchar,adParamInput,50,keyword)
comm.parameters.append comm.createparameter("counts",adinteger,adparamoutput,4,counts)
comm.execute()
counts=comm("counts")
'''''''''''''''''从这里开始修改为下面的 set rs=Server.CreateObject("ADODB.Recordset")
rs.CursorLocation = 3
rs.open comm
posted on 2008-01-05 11:38  苗SIR  阅读(246)  评论(0编辑  收藏  举报