इस पेज
के अनुसार , पैरामीटर प्रकार adVariant
(यानी 12) एडीओ द्वारा समर्थित नहीं है।
अपने कोड को अधिक पठनीय बनाने के लिए आपको स्थिरांक का उपयोग करना चाहिए, उदा।
Const adUseClient = 3
Const adOpenStatic = 3
Const adCmdText = 1
Const adCmdStoredProc = 4
Const adVarChar = 200
Const adNumeric = 131
Const adChar = 129
Const adBigInt = 20
Const adInteger = 3
Const adParamInput = 1
Const adParamOutput = 2
Const adParamInputOutput = 3
Const adParamReturnValue = 4
cmd.Parameters.Append cmd.CreateParameter("theAccountId", adVarChar, adParamInput, , Request.Form ("aid"))
cmd.Parameters.Append cmd.CreateParameter("theAwardId", adNumeric, adParamInput, , award_id)
cmd.Parameters.Append cmd.CreateParameter("theDueDate", adVarChar, adParamInput, 100, theDueDt)
cmd.Parameters.Append cmd.CreateParameter("theSubmittedDate", adVarChar, adParamInput, 100, theSubmittedDt)
cmd.Parameters.Append cmd.CreateParameter("theReportDescription", adVarChar, adParamInput, 100, theReportDesc)
cmd.Parameters.Append cmd.CreateParameter("theFormId", adVarChar, adParamInput, 100, theFrmId)
cmd.Parameters.Append cmd.CreateParameter("theReturnCode", adNumeric, adParamOutput)
शायद इसे आजमाएं:
cmd.CommandType = adCmdText
cmd.CommandText = "{CALL deadlines_summary.PR_SUMMARY_IN(?,?,?,?,?,?,?)}"
संख्यात्मक पैरामीटर के लिए आकार मान की आवश्यकता नहीं होती है।
आपको पैरामीटर प्रकार adDate
. का उपयोग करने का भी प्रयास करना चाहिए तारीखों को स्ट्रिंग मानों में बदलने के बजाय।
जब आप बाइंड पैरामीटर का उपयोग करते हैं, तो आपको उद्धरणों को हटाना होगा, अर्थात केवल theSubmittedDt = submitted_date
का उपयोग करें theSubmittedDt = "'" & submitted_date & "'"
. के बजाय ।