<% Set con = Server.CreateObject("ADODB.Connection") con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("cx/buxing.mdb") %>