About Quomon
Quomon is a network of IT professionals from around the world, collaborating by sharing knowledgeable answers in their specific field of expertise.
Answer Question
Microsoft OLE DB Provider for SQL Server error '80040e10'
Hello Experts:
Im using the following code to pass the problemstatusID to to the next page so I can use this information:
<%Response.Write("Edit")%>
And using the following code to extract the information:
ProblemStatusID=Request.QueryString("ProblemStatusID")
Whenever I click on the Edit button I am getting error message
"Microsoft OLE DB Provider for SQL Server error '80040e10'
Procedure or function 'GetInformationForProblemStatusId' expects parameter '@problemStatusId', which was not supplied.
/helpdesk/test/problemdetails.asp, line 32 "
This question is,I am not sure why I am getting this error message Can anybody help me regarding this issue or anybody has any other idea to the form using this technique?
Thanks
SAN
Here is the code and the stored procedure I am using
ALTER Proc [dbo].[GetAllOpenProblems]
As
Select a.ProblemStatusId,a.ProblemStatus,b.TeamMemberName,c.problemTitle,e.DepartmentN
ame From (((ProblemsUsersDeptsReps d Inner Join Departments e on d.DepartmentID = e.DepartmentID) Inner Join Problems c on d.ProblemID = c.ProblemID) Inner Join ProblemStatus a on d.ProblemsUsersDeptsRepsID = a.ProblemsUsersDeptsRepsID) Inner Join TeamMembers b on a.TeamMemberId = b.TeamMemberId Where UPPER(a.ProblemStatus) = 'OPEN' _________________________________________________________ <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> ! <% Dim strSQL, result ' Set SQL statement strSQL = "GetAllOpenProblems" 'Execute teh SQL and obtain resultset Set result = objconn.Execute(strsql) 'Check for Errors If objconn.Errors.Count > 0 then Response.Write("Error Occurred:
") Else %> <%Response.Write("The following Tickets are opened today")%>
-------------------------------------------------------
<%@ LANGUAGE="VBScript" %>
<%
Option Explicit
'Buffer the response, so Response.Expires can be used
Response.Buffer = TRUE
%>
!
ame From (((ProblemsUsersDeptsReps d Inner Join Departments e on d.DepartmentID = e.DepartmentID) Inner Join Problems c on d.ProblemID = c.ProblemID) Inner Join ProblemStatus a on d.ProblemsUsersDeptsRepsID = a.ProblemsUsersDeptsRepsID) Inner Join TeamMembers b on a.TeamMemberId = b.TeamMemberId Where UPPER(a.ProblemStatus) = 'OPEN' _________________________________________________________ <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> ! <% Dim strSQL, result ' Set SQL statement strSQL = "GetAllOpenProblems" 'Execute teh SQL and obtain resultset Set result = objconn.Execute(strsql) 'Check for Errors If objconn.Errors.Count > 0 then Response.Write("Error Occurred:
") Else %> <%Response.Write("The following Tickets are opened today")%>
| <%Response.Write("Problem ID")%> | <%Response.Write("Team Member Name")%> | <%Response.Write("Subject")%> | <%Response.Write("Component")%> | <%Response.Write("Status of the Problem")%> | <%Response.write("Edit")%> |
|---|---|---|---|---|---|
| <%Response.write(" " & result("ProblemStatusID") & " ")%> | <%Response.write(" " & result("TeamMemberName") & " ")%> | <%Response.write(" " & result("ProblemTitle") & " ")%> | <%Response.write(" " & result("DepartmentName") & " ")%> | <%Response.write(" " & result("ProblemStatus") & " ")%> | <%ProblemStatusID=Request.QueryString("ProblemStatusID") %><%Response.Write("Edit")%> |
| DetailsforProblem | |||||||||||||||||||||||||||||||||||||||||
Please wait... | |||||||||||||||||||||||||||||||||||||||||
