[求助]在表中给一个字段随机编号(又有新问题)
(问一下,我要在表(假如表有100个记录)中给一个字段填上数字1-100,不能重复,而且,要随机填充,我该怎么做?
先谢谢了!
[此贴子已经被作者于2006-12-5 13:05:38编辑过]
这个循环跳不出来的主要原因是 当再次查找跟所产生的随机数不一样的 xh的时候,一直能找到跟该随机数相等的xh。所以循环就一直停留在i=2处。这样改一下应该可以:
n = int(rand()*100)+1
IF n<=RECCOUNT() AND n !=0
go top
REPLACE xh WITH n
endif
i = 2
do while i<=RECCOUNT()
n = int(rand()*100)+1
IF n<=RECCOUNT() AND n !=0
replace xh with 0 for recno()>i
loca for xh = n
if !found()
GO i
repl xh with n
i=i+1
endif
Endif
enddo