dim objconnset objconn=server.createobject("adodb.connection")objconn.connectionstring="provider=microsoft.jet.oledb.4.0;"&"data source="& server.mappath("data.mdb")objconn.open