打开新窗体，添加新记录

浪上飞郑

我在一个叫“员工资料”的窗体中有一个下拉列表框，其中有“所属公公司”，当要打开"分公司信息输入面板",增加一个分公司时，用下面的命令
DoCmd.OpenForm "分公司信息输入面板", , , , , acDialog, "gotonew"
结果：不行，在第一个记录处
docmd.OpenForm "分公司信息输入面板",,,,acFormAdd ,,,,可以，可看不到其它原有的记录
可以用
docmd.GoToRecord ,,acNewRec
但要在新打开的窗体即："分公司信息输入面板", 中用这个命令，在“员工资料”中用docmd.openform 怎么样处理呀？
先谢呢

[此贴子已经被作者于2003-4-28 17:33:08编辑过]

浪上飞郑

传递一个"gotonew"(当然可以是其它），在打开要添加记录的窗体中加判断语句：
If Me.OpenArgs = "GotoNew" And Not IsNull(Me![联系人ID]) Then
  DoCmd.GoToRecord , , acNewRec
End If
谢谢
其实就是飘然姐的方法，只是增加了一个判断的变量而已
谢谢飘然姐

zhengjialon

用OpenForm 的最后一个参数来控制你在不同地方打开时的要求。

浪上飞郑

问题是：
有时我打开“"分公司信息输入面板”时不会增加新记录的，可以通过定义一个全局变量来实现。但未免复杂，想寻求一个更简单，有效的方法
谢谢你

飘然

在窗体"分公司信息输入面板"的加载事件中：
Private Sub Form_Load()
   DoCmd.GoToRecord , , acNewRec
End Sub

试试啦~~~