ConnectDB (2)



<!-DBConn.inc-->
<%
Set DB = Server.CreateObject("ADODB.Connection")
DB.Open "driver={Microsoft Access Driver (*.mdb)}; _
DBQ=" & Server.MapPath(DBFile)
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open strTable, DB,3,3
%>
'*************************************************

' Copiare nel vostro documento ASP

'*************************************************

<%
'DBFile = path e file del Database .mdb

DBFile = "Database.mdb"
strTable = "NomeDellaTabella"
%>
<!-- #include File = "DBConn.inc" -->
<%
'Usare DB per i riferimenti all'oggetto Database

'Usare RS per i riferimenti all'oggetto recordset

RS.Close
DB.Close
%>

(connectdb2.html)- by Paolo Puglisi - Modifica del 25/3/2019