更换虚拟主机后页面出错。如何更改？？？急急急。。。。。

[yezi_82]

报错为：
Microsoft JET Database Engine 错误 '80004005'

不可识别的数据库格式 'D:\187webdata\100MB\bookkk-ZH7oKrOudRxgUCXF5mJ8pMsbPveSA0hV\www\bbs\images\yesitis.mdb'。

/bbs/conn.asp，行 4

conn.asp代码如下。
<%ck=""
set conn=server.CreateObject("adodb.connection")
DBPath = Server.MapPath("images/yesitis.mdb")
conn.open "provider=microsoft.jet.oledb.4.0; data source="&DBpath
function CloseDB
Conn.Close
set Conn=Nothing
End Function
kk="<a href=http://yesitis.126.com target=_blank>欢迎留言</A>"
%>

[sxsgssgs]

<%
dim conn,connstr
connstr="DBQ="+server.mappath("数据库路径及名称")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>

试试这个吧