randomString

function randomString takes integer min, integer max returns string
    local integer i = 0
    local string result = ""
    local integer sz = GetRandomInt(min,max)
    loop
      exitwhen i > sz
      set result = result + AsciiIntegerToChar(GetRandomInt(32,127))
      set i = i + 1
    endloop
    return result
endfunction

No comments.