<%
Session.LCID = 2052 '中文 - 中华人民共和国
Response.Buffer = true

strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("tools/20020801.mdb") '## MS Access 2000 on Brinkster

set MyCon=server.CreateObject("ADODB.Connection")

MyCon.mode=adModeReadWrite

MyCon.ConnectionString=strConnString

MyCon.open
%>