recordset err ADODB.Recordset error '800a0e78'
Operation is not allowed when the object is closed.
/INTERBASE/busqueda.asp, line 356
<!--#include file= "interbaseconnection.asp" -->
<html>
<body>
<%
NROACCESO = REQUEST.FORM("NROACCESO")
CODTAXON = REQUEST.FORM("CODTAXON")
set objconn = server.createobject("adodb.connection")
set objrs = server.createobject("adodb.recordset")
strsql = "select * from DBREGTO "
boolWhere = false
if NROACCESO <> "" THEN
strsql=strsql & "WHERE NROACCESO LIKE '%"&NROACCESO&"%'"
boolwhere =True
END IF
if CODTAXON <> "" THEN
if boolwhere then
strsql=strsql & " AND CODTAXON LIKE '%"&CODTAXON&"%'"
ELSE
strsql=strsql & "WHERE CODTAXON LIKE '%"&CODTAXON&"%'"
boolwhere=True
END IF
END IF
bla.. bla......
%>
<TABLE>
<TR>
<TH>NROACCESO</TH>
<TH> CODTAXON</TH>
</font></TR>
<%
While Not objrs.EOF
%>
<TR BGCOLOR=<%= COLOR%>><TH><%= objRS("NROACCESO")%> </TH>
<TH><%= objrs("GENEROESPSUBESPECIE")%></TH>
<TH><%= objrs(" RAZA")%></TH>
<%
objrs.MoveNext
Wend
SET objrs=objConn.Execute(strsql) ' linea 356
%></TABLE><%
objrs.Close
objconn.Close
Set objrs = Nothing
Set objconn = Nothing %>
</TABLE>
