[ali.alfoly]

بسم الله

التحقق من الرقم السرى

كود :

[color=#0000FF]Private[/color] [color=#0000FF]Sub[/color][color=#000000] Button4_Click(sender [/color][color=#0000FF]As[/color] [color=#0000FF]Object[/color][color=#000000], e [/color][color=#0000FF]As[/color] [color=#2B91AF]EventArgs[/color][color=#000000]) [/color][color=#0000FF]Handles[/color][color=#000000] Button4.Click[/color]

        [color=#0000FF]Dim[/color][color=#000000] Check_Zip_Password [/color][color=#0000FF]As[/color] [color=#0000FF]Boolean[/color][color=#000000] = [/color][color=#0000FF]False[/color]

        [color=#0000FF]Try[/color]
            [color=#008000]' التحقق من سلامة الرقم السرى[/color]
[color=#000000]            Check_Zip_Password = Ionic.Zip.[/color][color=#2B91AF]ZipFile[/color][color=#000000].CheckZipPassword([/color][color=#A31515]"C:\tst.zip"[/color][color=#000000], [/color][color=#A31515]"12345"[/color][color=#000000])[/color]
        [color=#0000FF]Catch[/color][color=#000000] ex [/color][color=#0000FF]As[/color] [color=#2B91AF]Exception[/color]
            [color=#008000]' عند حدوث خطاء[/color]
[color=#000000]            MsgBox(ex.Message)[/color]
        [color=#0000FF]End[/color] [color=#0000FF]Try[/color]

        [color=#0000FF]If[/color][color=#000000] Check_Zip_Password [/color][color=#0000FF]Then[/color]
[color=#000000]            MsgBox([/color][color=#A31515]"الرقم السرى صحيح"[/color][color=#000000])[/color]
        [color=#0000FF]Else[/color]
[color=#000000]            MsgBox([/color][color=#A31515]"الرقم السرى غير صحيح"[/color][color=#000000])[/color]
        [color=#0000FF]End[/color] [color=#0000FF]If[/color]

    [color=#0000FF]End[/color] [color=#0000FF]Sub[/color]

هذه الدالة لها شكل واحد فقط انظر الصورة
[ATTACH=CONFIG]3797[/ATTACH]

وهى تقبل معاملان برمتران
المعامل الاول : مسار الملف
المعامل الثانى : الرقم السرى

الداله ترجع بقيمه بولونيه
ام True فى حالة النجاح وتوافق الرقم السرى او False فى حالة الفشل او اختلاف الرقم السرى