出处:http://blog.youkuaiyun.com/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