Objeto Recordset dentro de un Sub

[jcarlossb]

Si hago lo siguiente, tengo un error porque no me reconoce el objeto rs dentro del Subprocedimiento.

¿Se puede hacer algo para que reconozca el objeto recordset declarado fuera del procedimiento?

Supongo que tendrá que ver algo con las opciones Explicit, Public y todo eso, pero no me aclaro.

GRACIAS

Código:

<%
Dim Conn, rs, SQL
set Conn=Server.CreateObject("ADODB.Connection")
set rs=Server.CreateObject("ADODB.Recordset")
Conn.Open "Conexion"

Sub InsertaDatos '=============================
	SQL = "SELECT * FROM Tabla"
	rs.Open SQL, Conn
	rs.AddNew
	rs.Fields("Campo")=Variable
	rs.Update
	rs.Close
End Sub

Sub BorraDatos
	'Otras Instrucciones...
End Sub

set rs=nothing
Conn.Close
set Conn=nothing

if condicion=true then
	InsertaDatos
else
	BorraDatos
end if
%>

[jcarlossb]

Perdón, en el ejemplo he cerrado el objeto recordset y conexión ANTES de hacer la llamada al procedimiento, pero no es ése el problema. Si lo hago DESPUES, tengo el mismo error.

[...]

if condicion=true then
InsertaDatos
else
BorraDatos
end if

set rs=nothing
Conn.Close
set Conn=nothing
%>