Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共8 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:关联列的编号1种方法

1楼
gdtgl 发表于:2008/11/21 19:46:00

(只是提供1种方法(对于有特别编号要求的应能实现),外部数源库适用:
效果:根据每年排号。如2008年 就是:
20080001
20080002
.....
.....

2009年就是:
20090001
20090002
.....
....
20099999


 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:新建文件夹.rar

[此贴子已经被作者于2008-11-21 20:05:55编辑过]
2楼
gdtgl 发表于:2008/11/21 19:51:00
表事件:增加行的代码:

Dim d2 As integer
Dim d3 As string = today.year
Dim cmd As New SQLCommand
cmd.Conne cti onN a m e  = "v"
cmd.CommandText = "Insert Into 表C (f002) Values('"& d3 &"')"
cmd.ExecuteNonQuery()
cmd.CommandText = "Select count(f001) From 表C where f002 = '"& d3 &"' "
d2 = cmd.ExecuteScalar()
e.datarow("编号") = d3 + format(d2,"0000")
[此贴子已经被作者于2008-11-21 19:53:32编辑过]
3楼
czy 发表于:2008/11/21 20:36:00
不错!学习了。
4楼
程兴刚 发表于:2008/11/21 20:52:00

如果中间删除了行,再增加行不知会怎样,这是我最头疼的问题!

5楼
gdtgl 发表于:2008/11/21 20:54:00
跟着删除表C相对应的行或以最大值判断
[此贴子已经被作者于2008-11-21 20:54:38编辑过]
6楼
gdtgl 发表于:2008/11/21 20:56:00
1般系统可以做到不提供删除,只提供修改或作废
7楼
gdtgl 发表于:2008/11/22 9:58:00
以下是引用程兴刚在2008-11-21 20:52:00的发言:

如果中间删除了行,再增加行不知会怎样,这是我最头疼的问题!

理解错了,以为你需要连继编号,中间怎么样删除,都不会影响到重复。因为以表C的行数为判断。而表c是不会显视出来给使用者。(sql server中,根本没机会操作) access这个,当然文件都可以删除。

[此贴子已经被作者于2008-11-22 10:04:47编辑过]
8楼
小狐 发表于:2008/11/22 18:29:00
以下是引用程兴刚在2008-11-21 20:52:00的发言:

如果中间删除了行,再增加行不知会怎样,这是我最头疼的问题!

可不可以 不用 总行数+1 的方式 进行编号,

换成编号行最大数+1的方式 编号

共8 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03125 s, 3 queries.