1 | <!– http://www.kodmerkezi.com –> |
2 | <% |
3 | intLowerBound = 1 ‘alt sınır |
4 | intUpperBound = 9 ‘üst sınır |
5 | |
6 | Randomize() |
7 | |
8 | intRangeSize = intUpperBound – intLowerBound + 1 |
9 | sngRandomValue = intRangeSize * Rnd() |
10 | sngRandomValue = sngRandomValue + intLowerBound |
11 | intRandomInteger = Int(sngRandomValue) |
12 | |
13 | Response.Write intRandomInteger |
14 | %> |
15 | <!– http://www.kodmerkezi.com –> |
Comments