如何打开不允许排它方式打开的数据库?急!!!
对于一个不允许用排他方式打开的ACCESS数据库如何才能够打开其中的表?现在我的做法是:
dim myconn,connstr,strDBPath,strPassword
strDBPath="c:\bankmessage\data\bm.mdb"
strPassword="888888"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\bm\data\bm.mdb;"'Password=888888"
sub ConnectData()
on error resume next
set myconn=server.createobject("ADODB.CONNECTION")
myconn.CommandTimeout=100
myconn.open connstr,,123456,&H10
if err then
err.clear
set myconn=nothing
Response.Write "<br><br><center><font color=red>服务器系统正在进行检查维护,请稍后再访问!</font></center>"
Response.End
end if
end sub
ConnectData
dim strSql,rsNF
strSql="select * from avnf where stat='A'"
Set rsNF=Server.CreateObject("ADODB.RecordSet")
On Error Resume Next
rsNF.Open "SELECT * FROM AVNF",myconn,3,1
Response.Write Err.description
可是总是报告如下错误:
在异步连接时,操作不能被执行。
怎么办呀?急!!!