R5 共享数据库脚本

共享数据库脚本样本

双星号（**）之间的文本表示备注。

**暂停一段随机时间间隔，以便使多个进程适当地错开。暂停 0-5 分钟（5 分钟 = 300000 毫秒）**

Pause 0-300000

**如果出现错误，等待 1-2 分钟然后重试。**

ErrorDelay 60000-120000

BeginCrit

**创建一个讨论数据库**

changeto "[MailServer]!![DiscussionDB]" [DiscTemplate] -KeepOpen

打开

**通过删除大量现有文档，重置初始文档数目**

getall

@If [NBTestReset]

delete [MaxDocToDelete]

@EndIf

**确保在邮件数据库中存在足够的文档（仅一次）**

populate [NumMailNotesPerUser]

关闭

**打开当前视图**

打开

**关闭该视图**

1close

EndCrit

**开始执行脚本的循环部分**

BeginLoop

**打开一个讨论数据库**

changeto "[Mailserver]!![DiscussionDB]" [DiscTemplate] -KeepOpen

**打开当前视图**

打开

getall

**从当前视图中读取 20 个文档**

entries 1 20

**等待 5 到 10 秒钟以仔细察看该视图**

Pause 5000-10000

**将该视图向下翻页两次，用 3-10 秒钟阅读各个窗口**

entries 21 20

pause 3000 - 10000

entries 41 20

pause 3000 - 10000

**将未读列表设置为 30 个随机选择的文档**

unread 30

**打开随后 3 个未读文档，每个文档阅读 10-30 秒钟**

navigate 1 next_unread

pause 10000 - 30000

navigate 1 next

pause 10000 - 30000

navigate 1 next

pause 10000 - 30000

add [DiscDbAddDocRate] 100

**在关闭数据库时删除 2 个旧文档**

关闭

**在办公室开会的同时，在桌面暂停 4 到 8 分钟**

pause 240000 - 480000

**再次重复执行整个语句序列（返回到 BeginLoop 语句）**

rewind