Set Rs = DB("select aaa.cid as bcid,bbb.cid as ccid, * from aaa,bbb where aaa.id=bbb.Aid and Display=" & dpy & " and title like '%" & key1 & "%' or title like '%" & key2 & "%'",3)

为什么这样一查询 ACCESS数据库就会自动生成LDB文件锁死

不知道你的DB函数怎么写的？有可能你的参数给的就是排他锁，也就是独占查询，独占查询只有真正完成后才会解锁。如果中途发生错误，程序结束，那就锁死了。

楼上正解。还有好像就是SQL语句跟DB不是很搭，在SQL SERVER 上运行正常的查询语句在ACCESS的数据库上有时就运行不了

感觉你的代码写得有问题