< % ERROR: @ LANGUAGE = VBScript % > < % ERROR: Option Explicit % > < % ERROR: dim conn dim rs dim path Path = "../dbmanager/test.mdb" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=" & Path set rs = Server.CreatObject ("ADODB.recordset") strSQL = "SELECT custid,salutation,fname,lname,age,sex,street, city,state,country,tele1,tele2,tele3,fax,mobile,voicemail,email, priority,comment,remarkadmin,remarksales From Customer" myRs.Open strSQL,connstr,adOpenStatic,adLockReadOnly,adCmdText Response.write ("database open successfully") % >Thanks