随机产生用户密码

原创 2004年07月10日 18:11:00

随机产生用户密码(good)


March 25,2004
  说明:通过随机产生密码,然后将密码EMail给注册用户,你可以确认用户的EMail填写是否正确。自动产生的密码往往安全性更高,同时,你可以过滤那些无效的用户。


  把下面的代码保存为random.asp文件:

<%
Sub StrRandomize(strSeed)
          Dim i, nSeed
          nSeed = CLng(0)
          For i = 1 To Len(strSeed)
                    nSeed = nSeed Xor ((256 * ((i - 1) Mod 4) * AscB(Mid(strSeed, i, 1))))
          Next

          Randomize nSeed
End Sub



Function GeneratePassword(nLength)
          Dim i, bMadeConsonant, c, nRnd

          Const strDoubleConsonants = "bdfglmnpst"
          Const strConsonants = "bcdfghklmnpqrstv"
          Const strVocal = "aeiou"

          GeneratePassword = ""
          bMadeConsonant = False

          For i = 0 To nLength
                    nRnd = Rnd
                    If GeneratePassword <> "" AND (bMadeConsonant <> True) AND (nRnd < 0.15) Then
                              c = Mid(strDoubleConsonants, Int(Len(strDoubleConsonants) * Rnd + 1), 1)
                              c = c & c
        i = i + 1
                              bMadeConsonant = True
                    Else
                              If (bMadeConsonant <> True) And (nRnd < 0.95) Then
                                        c = Mid(strConsonants, Int(Len(strConsonants) * Rnd + 1), 1)
                                        bMadeConsonant = True
                              Else
                                        c = Mid(strVocal,Int(Len(strVocal) * Rnd + 1), 1)
                                        bMadeConsonant = False
                              End If
                    End If
                    GeneratePassword = GeneratePassword & c
          Next

          If Len(GeneratePassword) > nLength Then
                    GeneratePassword = Left(GeneratePassword, nLength)
          End If
End Function
%>


  然后在你的目标程序中这样调用上面的代码,就可以实现密码的自动生成:(仅仅是一个例子,你可以把他们粘贴到一个Test.asp的文件中,然后运行Test.asp)

<!--include file="random.asp" -->

<%
'产生一个六位的密码

StrRandomize CStr(Now) & CStr(Rnd)
response.write GeneratePassword(6)

%>
<br><br>

<%

'产生一个8位的密码
StrRandomize CStr(Now) & CStr(Rnd)
response.write GeneratePassword(8)

%>
<br><br>


<%
'产生一个10位的密码
StrRandomize CStr(Now) & CStr(Rnd)
response.write GeneratePassword(10)
%>
<br><br>

<%

'产生1000个密码

dim t, t2
  for t = 1 to 500
  For t2 = 1 to 661
    StrRandomize CStr(Now) & CStr(Rnd)
  next
  StrRandomize CStr(Now) & CStr(Rnd)
  response.write GeneratePassword(6)
  response.write "<br>"
next

%>

MySql 5.7安装(随机密码,修改默认密码)两个坑

下载了MySql 最新版本,安装的过程中,发现了很多新特性 1.data目录不见了 在进行my-default.ini配置的时候 (需要配置 # basedir = C:...
  • quentain
  • quentain
  • 2016年05月31日 10:54
  • 5196

Shell脚本批量创建用户并随机生成密码

要求:批量创建10个系统账号oldboy01-oldboy10,并设置生成密码(密码不同). 实现脚本: #!/bin/bash #Question3 ...
  • chengxuyuanyonghu
  • chengxuyuanyonghu
  • 2014年08月19日 20:21
  • 1461

MySQL数据库自动生成并修改随机root密码的脚本

在MySQL数据库部署的过程中,在安装了MySQL软件,并配置了my.cnf配置文件后,需要创建MySQL实例。           MySQL 5.5实例创建完成了,默认会有登陆用户名和密码为空的用...
  • yumushui
  • yumushui
  • 2015年08月26日 18:42
  • 1975

产生随机密码10方法

http://www.linuxdiyf.com/viewarticle.php?id=194090 Linux的特点之一,就是给我们提供了多种选择。一种目的,可以多种方法解决。 如何...
  • ztguang
  • ztguang
  • 2016年03月30日 10:17
  • 237

6 猜数字游戏 (15分)——数学分析能力

think: 1思考之前自己做的思想,当时可能因为退出方式错误,题目输入格式提示中提到直到出现负数为止,而自己但是只是在满足题意的前提下直接用return 0结束程序输入,因此可能因为这个错误,或者...
  • BlessingXRY
  • BlessingXRY
  • 2017年03月07日 21:11
  • 1841

如何使用命令行生成高强度密码

Lightbot设置一个高强度的密码是非常重要的,这样才能够很好的保护自己的账号或者服务器以及确保自己的数据的安全。通常来说,一个高强度密码至少有 14 个字符,包括大小写字母、数字和特殊字符,并且要...
  • linuxnews
  • linuxnews
  • 2016年11月15日 21:42
  • 845

随机生成5位大小写字母或者数字

随机生成5位大小写字母或者数字 方法一:生成不重复的 public static void main(String[] args) { Random rand = new Random(); ...
  • wangqing84411433
  • wangqing84411433
  • 2016年12月08日 22:03
  • 2627

C++程序员面试题 函数 生成随机密码 (二)

写一个函数,生成一个指定长度的密码。 要求:密码由大写字母、小写字母和数字三种符号组成,并且大写字母、小写字母和数字必须都有。 #include "stdafx.h" #include #incl...
  • A_sungirl
  • A_sungirl
  • 2013年08月29日 22:37
  • 1622

创建一个长度为n的随机字符串字符串(C Python Java三版实现)

在面试的时候遇到这个一道题
  • z791706848
  • z791706848
  • 2014年09月18日 00:01
  • 623

4-4. 猜数字游戏

猜数字游戏是令系统随机产生一个100以内的正整数,用户输入一个数对其进行猜测,需要你编写程序自动对其与随机产生的被猜数进行比较,并提示大了(“Too big”),还是小了(“Too small”),相...
  • u010399331
  • u010399331
  • 2014年07月18日 10:33
  • 2792
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:随机产生用户密码
举报原因:
原因补充:

(最多只允许输入30个字)