discusmania
IS-IT--Management
hi guys....
When i try to loop through and array to display the records and list box item, it only manage to list down until 48 records before showing this error:
Microsoft OLE DB Provider for Oracle
error '80004005'
ORA-01000: maximum open cursors exceeded
while the actual records are around 200. Below is the function to put the recordset in and array:
dim aResp()
Function disp_resp()
set rsresp=Server.createobject("ADODB.Recordset"
strresp="select badge from user_access where cop ='"&request("cop"&"' and lvl>=2 order by badge"
rsresp.open strresp,rs2,1,2
i=0
redim aResp(0)
while not rsresp.eof
redim preserve aResp(ubound(aResp)+1)
aResp(i)=rsresp("badge"
i=i+1
rsresp.movenext
wend
rsresp.Close
set rsresp=nothing
End Function
and this is where i call the function:
<SELECT name="cb_resp" size=5 id="cb_resp" style="width=200;font-size=10" multiple>
<%disp_resp
for i=0 to ubound(aResp)-1
respname =chk_name(aResp(i))
%>
<option value="<%=aResp(i)%>"><%=aResp(i)%>(<%=respname%>)
<%next%>
</SELECT>
anyone can help??. Please, it's urgent.
Thanks
Ron
When i try to loop through and array to display the records and list box item, it only manage to list down until 48 records before showing this error:
Microsoft OLE DB Provider for Oracle
error '80004005'
ORA-01000: maximum open cursors exceeded
while the actual records are around 200. Below is the function to put the recordset in and array:
dim aResp()
Function disp_resp()
set rsresp=Server.createobject("ADODB.Recordset"
strresp="select badge from user_access where cop ='"&request("cop"&"' and lvl>=2 order by badge"
rsresp.open strresp,rs2,1,2
i=0
redim aResp(0)
while not rsresp.eof
redim preserve aResp(ubound(aResp)+1)
aResp(i)=rsresp("badge"
i=i+1
rsresp.movenext
wend
rsresp.Close
set rsresp=nothing
End Function
and this is where i call the function:
<SELECT name="cb_resp" size=5 id="cb_resp" style="width=200;font-size=10" multiple>
<%disp_resp
for i=0 to ubound(aResp)-1
respname =chk_name(aResp(i))
%>
<option value="<%=aResp(i)%>"><%=aResp(i)%>(<%=respname%>)
<%next%>
</SELECT>
anyone can help??. Please, it's urgent.
Thanks
Ron