如何取得随机数？

Question

chr(rand(48,122));
------------------------------------------------
你可以通过以下程序来看看 从48到122 基本上就是数字和字母
<?
for($i=48;$i<122;$i++)
echo $i." ".chr($i)."/";
?>

Answer 1

$str = "0123456789abcdefghijklmnopqrstuvwxyz"; // 输出字符集
$n = 4; // 输出串长度
$len = strlen($str)-1; // 输出字符集长度for($i=0;$i<$n;$i++)
  $s .= $str[rand(0,$len)];echo $s;

Answer 2

哈，经过我苦苦查找，终于让我找到个方法了，大家帮我看看对不对：
$num=eregi_replace("[1|l|0|o|]","",md5(rand(0,1000000)));

Answer 3

Function PasswordPro()
    Dim stringc,stringlist,stringnum,i,stringnum2
randomize timer
stringc="0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z"
stringlist=split(stringc,",")
for i=0 to 35
stringnum=Int((35)*Rnd +0)
PasswordPro=PasswordPro&stringlist(stringnum)
next
stringnum2=Int((29)*Rnd +1)
PasswordPro=mid(PasswordPro,stringnum2,5)
end Function可以自己调整，嘿嘿

Answer 4

解释并改进一下：
Function PasswordPro()
    Dim stringc,stringlist,stringnum,i,stringnum2
randomize timer
stringc="0,1,2,3,4,5,6,7,8,9,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z" '包含哪些字母
stringlist=split(stringc,",") ' 分离生成数组元素
for i=0 to ubound(stringlist) '随机生成字母组成串
stringnum=Int((ubound(stringlist))*Rnd +0)
PasswordPro=PasswordPro&stringlist(stringnum)
next
stringnum2=Int((29)*Rnd +1)
PasswordPro=mid(PasswordPro,stringnum2,5) '随机取得一定位数的随机数
end Function

Answer 5

ubound()是什么啊？这个不是PHP的吧？