<!--#include file="dbconfig.asp"-->
<%
'Response.Buffer = True  
'Response.ExpiresAbsolute = Now() - 1  
'Response.Expires = 0  
'Response.CacheControl = "no-cache"  
'Response.AddHeader "Pragma", "No-Cache" 
dim conn
dim connstr
dim db
dim rs
db=sysDataBase
Set conn = Server.CreateObject("ADODB.Connection")
Set rs=Server.CreateObject("ADODB.Recordset")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(""&db&"")
	
conn.Open connstr

Dim BeginTime,EndTime
BeginTime=Timer
%>