【原创】ASP调用存储过程

 出处：http://blog.csdn.net/caoxicao
 作者：草惜草
 转载请注明出处

再写出一个我刚刚整理出来的存储过程：

if request.form("mod") = "MOD" then
   Set conn = Server.CreateObject("ADODB.Connection")
 Set  cmdExec = Server.CreateObject("ADODB.Command")
 cmdExec.CommandType = adCmdStoredProc
 cmdExec.ActiveConnection = Conn
 '//以下三个是参数
 cmdExec.Parameters.Append cmdExec.CreateParameter("",adVarWChar,adParamInput ,, SpeicalTPStr)
    cmdExec.Parameters.Append cmdExec.CreateParameter("",adInteger,adParamInput ,,request("CoseSheetId"))
    cmdExec.Parameters.Append cmdExec.CreateParameter("",adInteger,adParamInput ,,session("logincompanyid"))
    cmdExec.CommandText = "sp_CalculateSpecialTP"   '// 存储过程名
    Set DoRegCompany = cmdExec.Execute
    Set cmdExec = Nothing
end if