ASP和vbscript编辑网页

<% dim db db="conn1.mdb" on error resume next dim connstr,conn connstr = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath(db) set conn = server.createobject("adodb.connection") conn.open connstr if