如何生成随机数数据库

首先要引用ADO对象，打开菜单“工程-引用”，选择“Microsoft ActiveX Data Objects 20 Library”将其沟选，这样就可以进行声明ADO对象了

Dim cnn As New ADODBConnection 'ADO连接对象

Dim Collection As ADODBRecordset 'ADO记录集对象

Dim Cnt As Integer '计算产生随机数的个数

Dim No() As Integer '动态数组存放所有产生的随机数字

Private Sub Command1_Click()

Form_Unload (True) '调用窗体的卸载事件

End Sub

Private Sub Form_Load()

cnnOpen "Provider=MicrosoftJetOLEDB40;Data Source=" AppPath "\Collectionmdb"

'打开数据库连接，驱动程序MicrosoftJetOLEDB40，数据源为当前目录下的Collection数据库

Set Collection = New ADODBRecordset

'申请一个新的Collection记录集对象

CollectionOpen "select from tab", cnn, adOpenKeyset, adLockOptimistic

'打开记录集对象

End Sub

Private Sub Form_Unload(Cancel As Integer)

Dim i As Integer

If Cnt

Dim ThenNumx

PicCount=2000

Set rs=connexecute("Select id,ClickTimes From buyok_produc")

do while not rseof

Randomize

TheNum=Int((PicCountRnd)+1000)

ConnExecute("Update buyok_produc Set ClickTimes="&TheNum&" where ClickTimes=1 and id="& rs("id") &"")

rsmovenext

loop

rsclose:set rs=nothing

在查询分析器中执行

sp_help 表名

就可以看到该表的各类信息,包括表的所有者,结构,主键等

祝你好运

如果你知道自动编号字段的名称,就简单了,比如说如果该字段名称为id

select max(id) from <表名>

找出来的就是最后那条记录的id号

select from <表名> where id in (select max(id) from <表名>)

就是你刚才新增的记录了

在mysql中随机生成一些范围内的整数，可以借助mysql提供的二个函数来实现。

它们是floor()与rand()函数，下面分别介绍下。

1、floor(f)

返回一个不大于f的最大整数

2、rand(),rand(n)

返回一个随机浮点值 v ，范围在 0 到1 之间 (即, 其范围为 0 ≤ v ≤ 10)。若已指定一个整数参数 N ，则它被用作种子值，用来产生重复序列。

若要在i ≤ R ≤ j 这个范围得到一个随机整数R ，需要用到表达式 FLOOR(i + RAND() (j – i + 1))。

例如， 在7到 12 的范围（包括7和12）内得到一个随机整数，使用语句：

SELECT FLOOR(7 + (RAND() 6));

代码如下:

--创建测试表

CREATE TABLE [Identity](

Id INT IDENTITY(1,2) NOT NULL PRIMARY KEY,--种子的起始值1，步长2

Number VARCHAR(20) UNIQUE NOT NULL,

Name VARCHAR(20) NOT NULL,

Password VARCHAR(20) DEFAULT(123),

Description VARCHAR(40) NULL

)

--插入记录

INSERT INTO [Identity](Number,Name,Description) VALUES('001','1st','Id=1,因为起始值1')

INSERT INTO [Identity](Number,Name,Description) VALUES('002','2nd','Id=3,因为起始值1，步长2')

INSERT INTO [Identity](Number,Name,Description) VALUES('003','3rd','Id=5,由于字符长度超长，报错插入失败，造成此Id产生后被放弃')

INSERT INTO [Identity](Number,Name,Description) VALUES('004','4th','Id=7 not 5,因为第三条记录插入失败')

--检索记录，查看结果

SELECT FROM [Identity]

以上就是关于如何生成随机数数据库全部的内容，包括:如何生成随机数数据库、每次生成一个随机数并写入数据库问题、在数据库中随机生成的主键，怎么查询出来等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！