在线等待，解决马上送分

Question

我在WIN2000下用ACCESS VBA 开发的程序为什么移植到XP的系统下，很多系统函数都不能识别
比如：Format,Date,  
Rs.CursorLocation = adUseClient
 Rs.LockType = adLockOptimistic 
其中adUseClient、adLockOptimistic 都不能找到，系统编译错误为：Can not Find Object 
希望哪为高手能帮我解决这个问题，本人不胜感激

Answer 1

看看XP里VBA的库文件少了些什么。

Answer 2

引用过的文件copy过去注册一下先

Answer 3

可能是ado引用的版本不对，或者是chunhuizhao说的没引用ado，菜单“工程”->引用，再弹出的对话框中选择正确的ado版本