VBScript - как сгенерировать случайное число, а затем оператор If для использования этого числа для выбора опции

Я хотел бы знать, как (в VBScript) генерировать случайное число, которое не будет одинаковым на другом компьютере, а затем использовать это число и, возможно, некоторые операторы If, чтобы можно было активировать один из 10 возможных вариантов, например.

If (A random number between 1 - 10, eg. 2) then (Continue on part of script then wscript.quit)
Else if (A different number, eg. 7) then (continue on to different part of script then wscript.quit)

etc.

Так что у меня было бы 10 различных вариантов сценария для случайного выбора.

это возможно? Если да, то кто-нибудь сможет скомпилировать пример этого, чтобы я мог поместить свой собственный скрипт в и использовать его? Спасибо ответы!

7
compilation if-statement random vbscript

3 ответов

вам нужно randomize и rnd.
int(rnd * n) + 1 вычисляет целое число от 1 до n.
И вы можете использовать select case... вот, попробуйте это: 

dim r
randomize
r = int(rnd*10) + 1
select case r
    case 2
        '... 

    case 7
        '... 

end select
9

и если бы вы rand от min до max:

Dim max,min,rand
max=54
min=23
Randomize
rand = Int((max-min+1)*Rnd+min)
WScript.Echo rand
5
Dim i

For i=1 to 5

Randomize

a=Rnd
b=a+1

msgbox b

Next
-2