名称与存在的模块工程或对象冲突

roych

myset As Recordset

改为：myset As DAO.Recordset再试试。
有ADO和DAO时，recorset之类，应该注明是ADO还是DAO，如果不注明，请设置好引用的有限顺序。如果ADO优先于DAO，这一行显然就有问题了：
Set myset = mydb.OpenRecordset("POCounter_Remote", dbOpenDynaset)

roych

多搜搜帖子，别太懒，搜下ADO应该能找到一些例子。
关于ADO的使用，我写过一个系列：
http://www.office-cn.net/thread-119066-1-1.html