简单asp连接acces-s数据库代码

      Set rs = nothing
      Set conobject = Server.CreateObject("ADODB.Conn

      Set conn = Server.CreateObject("ADODB.Connection")
      DBPath = Server.MapPath(db)
      conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&DBPath