asp預存程序寫法與執行個體

'===========
'函數:儲存過程
'功能：查詢
'參數：儲存過程參數集
'================
function dbstroce(query_sign,table,outerfield,condition,orderfield,strInsert,isorder)
 set cmd = server.CreateObject("ADODB.Command")
 cmd.commandText="p_Agents_query"
 cmd.commandType=4
 cmd.prepared = true
 set cmd.ActiveConnection = conn
 cmd.parameters("@query_sign")=query_sign
 cmd.parameters("@table")=table
 cmd.parameters("@outerfield")=outerfield
 cmd.parameters("@condition")=condition
 cmd.parameters("@orderfield")=orderfield
 cmd.parameters("@strInsert")=strInsert
 cmd.parameters("@strInsert")=strInsert
 cmd.parameters("@isorder")=isorder
if query_sign=0 then
  set rs=cmd.execute
else
 cmd.execute
end if
 set cmd = nothing
end function