Problem with random in a loop

[EscapeTheFate]

If I run Random in a loop it returns the original random number it returned. I need random in a loop, so is there anyway to run it without it returning the same number over and over again?

While 1

msgBox(0, "Roll of die", "You rolled a " & Random(1, 6, 1) )

WEnd

[covaks]

The code you posted does not return the same number over and over again for me. Each time the message box pops up, I get a different number from 1 to 6. Is it returning the same number for you every time the message box pops up?? Or is that not what you meant? You could also toss an Srandom in the loop if that helps, but it shouldn't be returning the same number over and over again.

[JustinReno]

So, I'm guessing the OP only ran the code twice and got the same number?

[rasim]

If I run Random in a loop it returns the original random number it returned. I need random in a loop, so is there anyway to run it without it returning the same number over and over again?

While 1

msgBox(0, "Roll of die", "You rolled a " & Random(1, 6, 1) )

WEnd

This?:

#include <Array.au3>

Global $aNumber[7]
$aNumber[0] = 6

For $i = 1 To $aNumber[0]
    While 1
        $iRandom = Random(1, 6, 1)
        _ArraySearch($aNumber, $iRandom, 1)
        If @error Then ExitLoop
    WEnd
    $aNumber[$i] = $iRandom
    MsgBox(0, "Random", $iRandom)
Next