以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求教,怎么写好替换?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196589)

--  作者:c39lin
--  发布时间:2025/5/15 17:23:00
--  求教,怎么写好替换?
表(商品信息表)里的ID列是禁止重复的。
希望在窗口里添加一个按钮,点击后效果为在原ID后面加上-001,如果已经有-001则-002以此类推。
然后新建一行,ID列为原ID。
代码应该怎么写呢。。
ID列并没有固定几位数。

--  作者:有点蓝
--  发布时间:2025/5/15 17:26:00
--  
参考:http://www.foxtable.com/webhelp/topics/2403.htm
--  作者:c39lin
--  发布时间:2025/5/15 17:38:00
--  
我的ID并不是通过日期生成,新的ID也要在ID这一列。

就是,旧有ID后面要加上-001,然后还要另起一行输入原有的ID。

同时ID列是禁止重复的。

这个文档的情况和我需要的不一样。。

--  作者:有点蓝
--  发布时间:2025/5/15 20:05:00
--  
把2楼帮助看完,参考里面的【三、按类别编号】,把旧ID当做类别使用即可
--  作者:c39lin
--  发布时间:2025/5/16 11:27:00
--  
那个有看懂,我不懂的是怎么让旧ID和新ID在同一列。因为这一列还禁止重复了。
比如第3行是123456
点击按钮后第3行要变成123456-1
同时新增第4行为123456
如果已经存在123456-1则第3行应为123456-2

--  作者:y2287958
--  发布时间:2025/5/16 11:49:00
--  
上例子
--  作者:有点蓝
--  发布时间:2025/5/16 11:54:00
--  
dim r as row = Tables("商品信息").current
dim 旧id as string =r("id")
r("id") = 旧id & "-1"
dim nr as row = Tables("商品信息").addnew
nr ("id") =  旧id & "-2"