asp+access连接数据库的问题
我一直用asp与sql2000连接，现在准备用access做后台数据库，因为sql的空间实在是贵啊。但是不知到asp与access连接跟与sql连接有何区别。所以想问问

（下面写出的是asp连接sql的，请给出asp连接access的）

1、连接数据库
set   conn=server.createobject( "adodb.connection ")
connstr   = "Provider=SQLOLEDB;Server=UserName;Database=WebDB;UID=sa;PWD= "    
conn.open   connstr

2、添加数据
rs.addnew
rs( "品名 ")=   trim(request( "pinming "))
rs.update

3、修改数据
id=request.form( "id ")
rs.Open   "Select   *   From   list   where   id= "&   id,conn,3,2
if   (rs.bof   and   rs.eof)=false   then
rs( "品名 ")=   trim(request( "text1 "))
rs.update
end   if

4、删除数据
id=request.QueryString( "id ")
sql= "delete   from   list   where   id= "   &id

------解决方案--------------------
<%
Dim conn,rs,dbpath
Set conn=Server.CreateObject( "ADODB.Connection ")
Set rs=Server.CreateObject( "ADODB.RecordSet ")
dbpath=Server.MapPath( "rwdata/db_test_com.mdb ")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= "&dbpath
%>
------解决方案--------------------
1、连接数据库
set conn=server.createobject( "adodb.connection ")
db = "WebDB.mdb "
connstr = "Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
conn.open connstr

2、添加数据
rs.addnew
rs( "品名 ")= trim(request( "pinming "))
rs.update

3、修改数据
id=request.form( "id ")
rs.Open "Select * From list where id= "& id,conn,3,2
if (rs.bof and rs.eof)=false then
rs( "品名 ")= trim(request( "text1 "))
rs.update
end if

4、删除数据
id=request.QueryString( "id ")
sql= "delete from list where id= " &id
conn.execute (sql)
------解决方案--------------------
连接数据库的字符串赞同楼上xin699(笨笨鸭) 的。但是我一般都是这样写的，不知道xin699(笨笨鸭) 是忘记了还是本来这样写也可以。
1、连接数据库
set conn=server.createobject( "adodb.connection ")
db = "WebDB.mdb "
connstr = "provider=Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
conn.open connstr

------解决方案--------------------
连接的时候一般还是提倡用provider而不要用driver。好象前者更广泛一点，用后者容易报错。
------解决方案--------------------
set conn=server.createobject( "adodb.connection ")
db = "WebDB.mdb "
connstr = "Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db)
conn.open connstr
其实就是连接数据库时有些区别的，别的地方没什么区别
------解决方案--------------------
<%
set conn=createobject( "adodb.connection ")
set rs=server.createobject( "adodb.recordset ")
constr = "provider=microsoft.jet.oledb.4.0;data source= "&server.mappath( "Data.mdb ")
conn.open constr
%>

把这段程序单独保存为一个文件,在其他页面中使用数据库时,就include这个文件就行了
------解决方案--------------------
设计的时候字段类型 为 "自动编号 "
------解决方案--------------------
rs.open sql,conn,1,3改了，1,1是只读。NTFS下调整权限。