db="date/mynews.asp"
ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &Server.MapPath(db) 
         Connstr="DBQ="+Db+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
          'Connstr="DBQ="+Server.Mappath(Db)+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
           '如果你的服务器采用较老版本Access驱动，请用下面连接方法
           'ConnStr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)

------解决方案--------------------
连接access数据库的文件名为articleconn.asp  
内容修改如下：
<%set conn=server.createobject("adodb.connection")
conn.open"Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath("*.mdb")  
set rs=server.createobject("adodb.recordset") 
  %>

删除access数据库的文件内容为  
删除表名1中指定的自动编号id这一条记录，且request("id")获取的值应为数值类型。若是表单传来的值通常应将
sql="delete from 表名1 where id='"&id&"' "写成：
sql1="delete from 表名1 where id="&cint(id)  
下面是修改后的内容：
<!--#include file="articleconn.asp"-->  
<%  
id=request("id")   
sql="select*from 表名1 where id="&cint(id)
rs.open sql,conn,1,1 
sql1="delete from 表名1 where id="&cint(id)
  conn.execute(sql1)
 rs.close  
 set rs=nothing 
 conn.close  
 set conn=nothing  
%>