如何生成随机密码生成器

<
genpassword =
随机化
对于我= 1比8
intnum = int（10 *、+ 48）
intupper = int（26 *、+ 65）
intlower = int（26 *、+ 97）
intrand = int（3 *、+ 1）
选择案例intrand
案例1
strpartpass = CHR（intnum）
案例2
strpartpass = CHR（intupper）
案例3
strpartpass = CHR（intlower）
最后选择
genpassword = genpassword strpartpass
下一个
response.write（genpassword ）
%>

显示浏览器标题信息和服务器变量
<
For Each name In Request.ServerVariables
response.write（名字：）
response.write（Request.ServerVariables（名））
下一个
{ { 1 }