问题解决了,就是打开时忘了加参数,
AdLockReadOnly (默认值)只读 — 不能改变数据。 
AdOpenForwardOnly (默认值)打开仅向前类型游标。 
加上参数就OK啦。
 rs.Open "SELECT number,name from infor ORDER BY number", cn
,adOpenKeyset, adLockOptimistic, adCmdText
呵呵,
这回知道猪八戒他妈是怎么死的了。