dim conn,connstr '声明两变量connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb") '连接数据库字符串set conn=server.createobject("adodb.connection") '建立名为conn的connection对象conn.open connstr '打开对象,也就是建立连接