• تولید پسورد تصادفی در vb6
    #1
    Note 
    [VB]Function genAdvRndString(ByRef length As Integer) As String
    Randomize()
    Dim allowableChars As String
    allowableChars = "!@#$%^&*()?><1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"

    Dim i As Integer
    For i = 1 To length
    genAdvRndString = genAdvRndString & Mid$(allowableChars, Int(Rnd() * Len(allowableChars) + 1), 1)
    Next
    End Function[/VB]

    پاسخ
    ایجاد موضوع جدید   پاسخ به موضوع  

    موضوعات مرتبط با این موضوع...
    موضوع نویسنده پاسخ بازدید آخرین ارسال
    Note سورس قطع کردن اتصال به اینترنت با رفرش کردن moeinmq 3 1,133 14-08-2014 ساعت 20:23
    آخرین ارسال: vc3000
    Note برنامه پیدا کردن پسورد کاربران در ویندوز SOFTAFZAR 0 710 25-01-2013 ساعت 22:25
    آخرین ارسال: SOFTAFZAR
    Note سورس ذخیره کردن یوزر نیم و پسورد کاربر (فوری) H3sam 1 790 25-07-2012 ساعت 19:40
    آخرین ارسال: Daniel

    کاربرانِ درحال بازدید از این موضوع:   1 مهمان