<% on error resume next dim provider,path,pass,dsn,conn provider="provider=microsoft.jet.oledb.4.0;" path="data source=" & server.mappath("./admin_manage/#data#base#.mdb") pass=";jet oledb:database password=" dsn=provider&path&pass set conn=server.createobject("adodb.connection") conn.open dsn %>