【原創】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