主题：[求助]关于联网多人增加行自动编号的代码的优化请教

1、代码要写到dataRowAdded事件，不是ing事件。

2、看看 http://www.foxtable.com/webhelp/scr/1994.htm

http://www.foxtable.com/webhelp/scr/3008.htm

3、你的编号，不一定要连续，你可以把_Identify作为编号的一部分，这样能区别唯一。

那就加入_Identify处理，如生产 00001-001、00002-002、00002-002 这样的编号，即便前面相同，后面都不同。

目前这个问题，除非你用openQQ，否则延时、并发的问题都不能解决。

Select Case e.DataCol.name
    Case "创建日期"     '由创建日期自动生成计划明细编码
        If e.DataRow.IsNull("创建日期") Then
            e.DataRow("编码") = Nothing
        Else
            If e.DataRow.IsNull("编码") Then

                e.DataRow.Save '保存之后，才会获取_Identify值
                Dim d As Date = e.DataRow("创建日期")
                Dim bh As String = Format(d,"yyMM") 
                Dim str As String = Format(e.DataRow("_Identify"),"00000")    
                e.DataRow("计划明细编码") = "JH" & bh & "-" & str
            End If
        End If
End Select