set CN = server.Createobject("ADODB.connection")CN.open "Provider=Microsoft.jet.oledb.4.0;data source=" & server.mappath("tudb.mdb")