# 找到问题所在, 但仍不知如何解决

Posted by 巨蟹座女子 on October 17, 1997 at 05:05:37:

In Reply to: Re: 如何修复资料库？ posted by 小吴 on October 16, 1997 at 20:56:15:

我终于找到可能的问题了. 我一直觉得奇怪为什么资料不能被更改, 但又没有
错误讯息, 结果是在资料库的”第一笔”资料被修改, 而非我所指定的那一笔.
我想问题出在FindFirst Condition 和 MoveFirst的地方.　pointer并没有指
到正确的位置, 而是真的移到第一笔去了. 我的程式码如下：

Condition = "程式馆 ='" & Trim(txtDirectory.Text) & "'" & _
" and 程式名称='" & Trim(txtProgram.Text) & "'"

'>
Set rsMain = myDB.OpenRecordset("select * from 主要记录表",
dbOpenDynaset)

With rsMain
.MoveLast
.FindFirst Condition
.MoveFirst
End With

With rsDept
.Edit
!应用系统 = comboSystem.Text
!机器代号 = comboMachine.Text
!使用语言 = comboLanguage.Text
!检核日期 = txtCheckDate
.Update
.Close
End With
你知道如何能让pointer 指到正确的record吗？

Follow Ups:

- 不要加 MoveFirst ! 小吴 07:01:52 10/17/97 (2)
  - 这可不是正确的做法!!! 阿晴 15:12:02 10/17/97 (1)
    - 感谢二位！我再试试看. 有问题再向你（妳）们请教　（无内文） 巨蟹座女子 19:38:47 10/17/97 (0)