关于盟威软件快速开发平台不支持 “自动编号——同步复制 ID”的解决方法

关于“自动编号——同步复制 ID”有什么用，这里就不在描述了，可以百度。

如果表中有类型是“自动编号——同步复制 ID”的字段，并且该字段为主键的时候，盟威软件快速开发平台2.02及之前的版本自动生成的窗体是有错误的。

错误一：自动生成窗体之后，在新增窗体保存数据时：

解决步骤：把自动生成的编辑窗体的“自动编号——同步复制 ID”字段的默认值改为StringFromGUID(GetGUID())

 

错误二：自动生成窗体之后，双击编辑的时候会产生如下错误：

 

解决步骤：

1、  自动生成窗体的时候：第1列，也就是“自动编号——同步复制 ID”字段一定要显示。否则在 DoCmd.OpenForm语句会出错。

2、  自动生成窗体之后，在主窗体的编辑事件做如下修改，主要是在DoCmd.OpenForm语句中增加StringFromGUID函数。

 

 

Public Sub btnEdit_Click()

    On Error GoTo ErrorHandler

 

    If Me.sfrList.Form.CurrentRecord < 1 Then

        Exit Sub

    End If

 

    Me.sfrList.SetFocus

    RunCommand acCmdSelectRecord

    DoCmd.OpenForm FormName:=Me.Name & "_Edit", _

                    DataMode:=IIf(Me.btnEdit.Enabled, acFormEdit, acFormReadOnly), _

                    OpenArgs:=StringFromGUID(Me.sfrList![物料ID].Value)          '修改之后的语句。增加了GUIDFromString函数。具体功能看F1,帮助文件。也可以把这个函数加到编辑窗体的load事件中。

'                   OpenArgs:=Me.sfrList![物料ID]                               '平台自动生成的语句，

 

ExitHere:

    Exit Sub

 

ErrorHandler:

    Select Case Err.Number

    Case errOpenActionWasCanceled, errOperationCanceledByUser

    Case Else

        MsgBoxEx Err.Description, vbCritical

    End Select

    Resume ExitHere

End Sub