---

Hvordan lukker jeg forbindelsen til en db der åbnes således?

<%
Dim DB, DBSti, SQL, rs
Set DB = Server.CreateObject("ADODB.Connection")
DBSti = "DBQ=" & Server.Mappath("../database.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
SQL = "SELECT * FROM artikel"
Set rs = db.Execute (SQL)
%>

--
Mvh Esben

---

"Esben" <sordiahp@hotmail.com> wrote in message
news:9u052g$iqa$1@sunsite.dk...
> Hvordan lukker jeg forbindelsen til en db der åbnes således?
>
> <%
> Dim DB, DBSti, SQL, rs
> Set DB = Server.CreateObject("ADODB.Connection")
> DBSti = "DBQ=" & Server.Mappath("../database.mdb")
> DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBSti
> SQL = "SELECT * FROM artikel"
> Set rs = db.Execute (SQL)
> %>

<%
rs.Close
DB.Close

Set rs = Nothing
Set DB = Nothing
%>

Michael Hyldsgaard
http://www.jirty.dk