# Re: .AddNew之后,再.Seek,就自动解除.AddNew怎么办?

Posted by AndyLin on December 04, 1998 at 09:33:41:

In Reply to: .AddNew之后,再.Seek,就自动解除.AddNew怎么办? posted by 梅芳 on December 03, 1998 at 21:51:27:

: 我用Data控制项(RecordsetType=Table,开索引档)+数个TextBox做
: 资料输入之用:
: 首先下.AddNew然后去输入资料,输完第一个TextBox(主索引栏位)之
: 后用.seek去检查是否有重复的资料,此时.AddNew的状态就自动被取
: 消了,以致我用.Update去存档时,产生了"没有.AddNew或.Edit,不能
: 做.Update" 的错误讯息! 我又想要在主索引键输完之后就检查重复
: 状况,而不想在.Update时才该系统自行检查!
: 请问这该这么解决呢? 谢谢!

如果你坚持 binding 方示,参考一下 clone 属性
如:
dim RS as recordset
set rs=data1.recordset.clone
rs.seek .....
if not rs.nomatch then
.....
.....
如此就不会重设 data1 之 状态,试试看吧!

Follow Ups: