订单编号根据客户自动递增编号

菜鸟　发表于：2011-03-18 12:55:19 　

各位老师，。能否做到，订单编号根据客户自动递增编号:
订单编号自动组成由客户+递增号(按4位递增）
如客户AB
第一张订单，订单编号为:AB0001
第二张订单，订单编号为:AB0002
这样一直增加下去
如客户AC也是一样！
第一张订单，订单编号为:AC0001
第二张订单，订单编号为:AC0002
这样一直增加下去

谢谢！

点击下载此附件

Top

煮江品茶发表于：2011-03-18 13:18:11

实现很简单，但却没必要。

订单号是1、2、3、4与订单号是AB0001、AB0002、AC0001、AC0002之间没什么差异，只要保持唯一性就可以了。

请参见《看不见的美观》一文。

Top

菜鸟发表于：2011-03-18 13:27:59

能实现的话，每次客户下订单就可知道那个客户第几张订单了！

Top

煮江品茶发表于：2011-03-18 13:53:54

这是分组查询的问题，与编码没什么关系。

Top

煮江品茶发表于：2011-03-18 14:20:09

非要这个编码的话，可以在客户的更新后事件中写：

Private Sub 客户_AfterUpdate()
If Me.Form.NewRecord = True Then
    If IsNull(Me.客户.Value) = False Then
        Me.订单编号.Value = Nz(DMax("订单编号", "表1", "客户='" & Me.客户.Value & "'"), Me.客户.Value & "0000")
        Me.订单编号.Value = Mid(Me.订单编号.Value, 1, Len(Me.订单编号.Value) - 4) & Format(Right(Me.订单编号.Value, 4) + 1, "0000")
    End If
End If
End Sub

Top

菜鸟发表于：2011-03-18 14:38:34

好的，谢谢指点！

Top

总记录：5篇页次：1/1 9 1 :

Access交流中心

订单编号根据客户自动递增编号