<%  

 

dim dd,connstr  

 

dd="data.mdb" 

 

connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath (""&dd&"")  

 

set bb=server.createobject ("adodb.connection")  

 

bb.open connstr  

 

%> 

 

<%  

 

dim bb,connstr  

 

connstr="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath ("data.mdb")  

 

set bb=server.createobject ("adodb.connection")  

 

bb.open connstr  

 

%>