ASP - Oprette forbindelse til Access
database:
Da vi ikke benytter os af ODBC forbindelse til
databaser skal du benytte følgende for at få adgang til din Access database.
Nedenstående er vist et eksempel på oprettelse af forbindelse til en database,
som ligger på et webhotel under www.mitdomæne.dk
med en database kaldet mindatabase.mdb. Det forudsættes her at databasen ikke
her beskyttet med Password.
<%
Dim conn
Dim rs
set conn =
server.createobject("adodb.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.MapPath("\database\mindatabase.mdb")
Set rs =
server.createobject("adodb.recordset")
%> |
Man kan med fordel gemme ovenstående kode i en
særskilt fil og dernæst inkludere denne i de .asp sider hvor man har behov for
at oprette forbindelse til databasen.
Herunder vises et simpelt eksempel på
hvorledes man kan inkludere ovenstående kode i en anden fil hvor man ønsker at
oprette forbindelse til databasen mindatabasse.mdb.
Det antages at ovenstående kode er gemt i
mappen /www/ under navnet inc_conn.asp
Nedenstående kode sættes ind øverst i koden på .asp siden.
| <!--
#INCLUDE VIRTUAL="/inc_conn.asp" --> |
Vi skal nu huske at lukke forbindelsen igen,
således vi ikke optager unødige ressourcer.
Dette gøres ved at tilføje følgende nederst
i koden på .asp siden.
<%
Set conn = Nothing
Set rs = Nothing
%> |
Ovenstående kode kan ligeledes med fordel
anbringes i en særskilt fil og derved inkluderes på samme måde som vist
tidligere.
Der er nu blevet oprettet en forbindelse til
Access databasen. Endvidere er denne forbindelse lukket ned igen. Næste skridt
er at lave et udtræk af data fra Access databasen.
