我的网站出现错误，不字段怎么解决

dim conn
dim connstr
dim db
db="Databases/wygkcn.mdb" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if

sub CloseConn()
conn.close
set conn=nothing
end sub

---

dim conn
dim connstr
dim db
db="Databases/wygkcn.mdb" '数据库文件位置
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if

sub CloseConn()
conn.close
set conn=nothing
end sub

---

cn.connectionstring="provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("dh.mdb")

"_" 去掉