手机开发帮助-客户端类-一个经典实例，咨询一下。 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 手机开发帮助-客户端类-一个经典实例，咨询一下。

共有2103人关注过本帖树形打印复制链接主题：手机开发帮助-客户端类-一个经典实例，咨询一下。

guosheng

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：四尾狐帖子：896 积分：7535 威望：0 精华：0 注册：2017/12/27 14:19:00

手机开发帮助-客户端类-一个经典实例，咨询一下。 发帖心情

Post By：2018/10/11 15:05:00 [只看该作者]

比如“工程”表中某月的数据为空时，此时该前缀的数据字典也是空值（即字典中不存在次前缀的序号），此时为该月的第一个编号，应该是“前缀-0001”。代码是哪处体现第一个编码的设置的？

1、服务端项目的HttpRequest事件代码：

Static bhs As new Dictionary(of String,Integer) '这个字典用于记录每个前缀的下一序号

If e.Path = "bianhao.htm"

If e.PostValues.ContainsKey("制单日期") AndAlso e.PostValues.ContainsKey("工程代码") Then

Dim max As Integer

Dim bh As String

Dim prefix As String = e.PostValues("工程代码") & "-" & Format(CDate(e.PostValues("制单日期")), "yyyyMM")

If bhs.ContainsKey(prefix) = False Then '如果字典中不存在次前缀的序号,

……

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/10/11 15:14:00 [只看该作者]

hbs本来是空字典；某个请求过来，执行sql语句，添加了一个前缀的编号（如果找到，就是最大编号，如果没找到，就默认编号为0）

请求再过来的时候，如果hbs存在，就直接加1返回，如果hbs不存在，继续执行sql语句添加

主题：手机开发帮助-客户端类-一个经典实例，咨询一下。