ASP如何生成随机中文

来源：百度知道 编辑：UC知道 时间：2024/05/15 20:14:26
ASP如何生成随机中文

现在只会ASP随机生成英文

<%
Function gen_key(digits)

'Create and define array
dim char_array(50)
char_array(0) = "0"
char_array(1) = "1"
char_array(2) = "2"
char_array(3) = "3"
char_array(4) = "4"
char_array(5) = "5"
char_array(6) = "6"
char_array(7) = "7"
char_array(8) = "8"
char_array(9) = "9"
char_array(10) = "A"
char_array(11) = "B"
char_array(12) = "C"
char_array(13) = "D"
char_array(14) = "E"
char_array(15) = "F"
char_array(16) = "G"
char_array(17) = "H"
char_array(18) = "I"
char_array(19) = "J"
char_array(20) = "K"
char_array(21) = "L"
char_array(22) = "M"
char_array(23) = "N"

生机随机中文按照你的这个思路，恐怕有点麻烦，不过你可以尝试一种稍微简单的方法：

newString="0123456789abcdefghijklmn……zABCDE……Z阿啊……"

假设newString的个数为1000个，那么你可以生成一个大于0小于等于1000的随机数，然后从newString中Mid(newString,i,1)取出这个字符。这样的话，要取几个字符就Int((35 - 0 + 1) * Rnd + 0)几次。

还有一种方法：如a=&H61,可以使用chr(61)来输出a，同样的方法，生成一个万位的数，使用chr（）来生成随机汉字。