Au3随机生成一个混合型大小字数字的字符串

1月122021

Au3随机生成一个混合型大小字数字的字符串

作者：绿色风发布：2021-1-12 22:55 Tuesday 分类：工作室UDF 阅读：3101次评论：0条

随机生成一个小字 a-z + 大写A-Z + 数字 0-9 的混合字符串



MsgBox(0, "随机字符串", _RandomAZ(20))

;随机生成  a-z A-Z 0-9 的混合字符串
;参数 $len = 输出的字符串长度
Func _RandomAZ($len = 20)
    Local $ret, $w
    Do
        $num = Dec(Number(StringRight(_Crypt_GenRandom1(), 2)))
        If StringRegExp(Chr($num), '[a-z]|[A-Z]|[0-9]') Then
            $ret &amp;= Chr($num)
            $w += 1
        EndIf
    Until $w = $len
    Return $ret
EndFunc   ;==&gt;_RandomAZ

Func _Crypt_GenRandom1($num = 1)
    Local $tBuffer = DllStructCreate('byte[' &amp; $num &amp; '];')
    _Crypt_Startup()

    DllCall(__Crypt_DllHandle(), "bool", "CryptGenRandom", "handle", __Crypt_Context(), "int", DllStructGetSize($tBuffer), 'ptr', DllStructGetPtr($tBuffer))

    _Crypt_Shutdown()
    Return SetError(1, 0, DllStructGetData($tBuffer, 1))
EndFunc   ;==&gt;_Crypt_GenRandom1  ```

<p>
    <br />
</p>
<p>
    <br />
</p>

本文固定链接: http://www.jianyiit.com/post-342.html