R5 공유 데이터베이스 스크립트
공유 데이터베이스 스크립트 샘플은 다음과 같습니다.
공유 데이터베이스 스크립트 샘플
별표(**) 안에 있는 텍스트는 주석입니다.
**다중 프로세스가 시차를 두고 제대로 실행되도록 임의의 시간 동안 일시중지합니다. 0-5분 동안 일시중지합니다(5분 = 300000 ms)**
Pause 0-300000**오류가 발생한 경우 1-2분을 기다렸다가 재시도합니다**
ErrorDelay 60000-120000BeginCrit
**토론장 데이터베이스를 작성합니다**
changeto "[MailServer]!![DiscussionDB]" [DiscTemplate] -KeepOpen
open
**기존의 문서 수 중 큰 값을 삭제하여 초기 문서 수를 재설정합니다**
getall
@If [NBTestReset]
delete [MaxDocToDelete]
@EndIf
**메일 데이터베이스에 충분한 수의 문서가 있는지 확인합니다(한 번만)**
populate [NumMailNotesPerUser]
close
**현재 보기를 엽니다**
열기
**보기를 닫습니다**
1close
EndCrit
**루프하는 스크립트 부분을 시작합니다**
BeginLoop
**토론장 데이터베이스를 엽니다**
changeto "[Mailserver]!![DiscussionDB]" [DiscTemplate] -KeepOpen
**현재 보기를 엽니다**
open
getall
**현재 보기에서 20개의 문서를 읽습니다**
entries 1 20
**보기를 일시중지하려면 5 - 10초를 기다립니다**
Pause 5000-10000**보기를 아래로 두 번 이동하여, 3-10초 동안 각 창의 내용을 읽습니다**
entries 21 20
pause 3000 - 10000entries 41 20
pause 3000 - 10000**읽지 않은 목록을 임의로 선택된 30개의 문서로 설정합니다**
unread 30
**읽지 않은 다음 3개의 문서를 열어 10-30초 동안 읽습니다**
navigate 1 next_unread
pause 10000 - 30000navigate 1 next
pause 10000 - 30000navigate 1 next
pause 10000 - 30000add [DiscDbAddDocRate] 100
**데이터베이스를 닫을 때 오래된 두 개의 문서를 삭제합니다**
close
** 사무실에서 미팅을 하는 동안 데스크탑을 4 -8분 동안 일시중지합니다**
pause 240000 - 480000**전체 시퀀스를 처음부터 다시 반복합니다(BeginLoop 문으로 돌아갑니다)**
rewind