
  <%  dim connstr
  
 Connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ="+server.mappath("../db/global.asa")+";DefaultDir='';DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=15;SafeTransactions=0;Threads=3;UserCommitSync=Yes;" 
 Set conn=Server.CreateObject("ADODB.CONNECTION")
 conn.open connstr %>