主题：互联网上如何禁止重号

给一个新增的行赋一个值，使用下面的代码

dim r as row =currenttable.addnew()

cmd.c

cmd.commandtext="select count(_identify) from {表A}

r("行号")=cmd.ExecuteScalar()+1

r.datarow.save()

这个代码看起来是没有问题。

 

如果两个用户同时（即0.00000001秒都不差）执行这段代码，就会产生重号，假设执行

cmd.commandtext="select count(_identify) from {表A}

r("行号")=cmd.ExecuteScalar()+1

需要0.00001秒，就会新增的两行都是同一个号码。

 

 

说明一下，这个行号是自动生成的，不是手工录入的。

 

顶顶，呵呵

看看帮助再说

刚才表述不全：

说明一下，这个行号是自动生成的，不是手工录入的。

 

手工录入是可以防止重复值的，自动生成可能会重复。

呵呵 我觉得你这个代码不重复才怪.

太高深了，佩服！

假设完成下面这段代码需要10秒中（需要上是远远不会有这么长），一个用户第1秒执行这段代码，另一个用户第三秒执行这段代码，这样会出现两个新增的行，行号是一样的。

dim r as row =currenttable.addnew()

cmd.c

cmd.commandtext="select count(_identify) from {表A}

r("行号")=cmd.ExecuteScalar()+1

r.datarow.save()

你没有判断你获得这个值的时候，并在你更新时，是否已经被人更新了。还是看下复杂网络下的不重复编号的。这个必须学习的

dim r as row =currenttable.addnew()

cmd.c

cmd.commandtext="select count(_identify) from {表A}

r("行号")=cmd.ExecuteScalar()+1

r.datarow.save()

 

 

你认为这段代码会有什么问题？