Ver Mensaje Individual
  #4 (permalink)  
Antiguo 16/04/2002, 08:37
Avatar de Aston
Aston
 
Fecha de Ingreso: mayo-2001
Ubicación: Madrid
Mensajes: 933
Antigüedad: 24 años
Puntos: 0
Re: Cerrar cualquier conexión abierta

Hola, aclaremos un poco.

Dim bd, rs

'Instanciamos el objeto de la conexión...

Set bd = Server.CreateObject("ADODB.Connection")

'Abrimos nuestra conexión (este es un ejemplo de SQL Server)

bd.Open "PROVIDER=SQLOLEDB;DATA SOURCE=trem44;UID=Bost"

'Instanciamos el objeto Recordset

Set rs = Server.CreateObject("ADODB.Recordset")

'Si hubiéramos abierto el recordset díriamos...

rs.Close

'Pero como no lo hemos abierto, sólo nos queda liberarlo...

Set rs = Nothing

'Cerramos la conexión a la base de datos...

bd.Close

'Y liberamos el objeto conexión de la memoria

Set bd = Nothing


Espero te sirva. Saludos.

<a href="http://www.laventanita.net/" target="_blank">
<img src="http://www.breogan.org/images/Aston.gif" border="0" alt="La Ventanita.net - Lo imprescindible en la red"></a>