generator

[mlloz]

hello,

how can i create a hex string generator composed of 7 characters?

[Kerros]

Create a random number between your values, and then convert it to hex.

By default Hex numbers are 8 chars... just strip the leading 0 if your script doesn't handle it.

For $i=1 To 10
$hexnum = Random(Dec('1000000'),Dec('fffffff'),1)
ConsoleWrite(Hex($hexnum)&@CRLF)
Next

[mlloz]

thank you

take a look to my previous code..

$q = Chr(Random(48 , 57)) & Chr(Random(65, 70))

$w = Chr(Random(48, 57)) & Chr(Random(65, 70))

$e = Chr(Random(48, 57)) & Chr(Random(65, 70))

$r = Chr(Random(48, 57)) & Chr(Random(65, 70))

$t = Chr(Random(48, 57)) & Chr(Random(65, 70))

$y = Chr(Random(48, 57)) & Chr(Random(65, 70))

$u = Chr(Random(48, 57)) & Chr(Random(65, 70))

$string = $q & $w & $e & $r & $t & $y & $u

[Kerros]

Well, everyone has to start somewhere.

I just need to convert from hex to dec and back fairly regularly so I'm very familiar with those functions.

[mlloz]

but its 7 characters this code generates 8 characters

[rudi]

While 1
    $String = ""
    For $i = 1 To 7
        $String &= StringRight(Hex(Random(0, 16,1)), 1)

    Next
    MsgBox(0, "Your Hex String", $String)
WEnd

Regards, Rudi.

[edit]

modified code, using Random() to return an integer directly.

Edited June 18, 2008 by rudi

[Kerros]

By default Hex numbers are 8 chars... just strip the leading 0 if your script doesn't handle it.

Yes they are. can can use stringtrimleft() if needed.

[mlloz]

thank you guys