التشفير بإستخدام Rijndael - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182) +--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184) +--- الموضوع : التشفير بإستخدام Rijndael (/showthread.php?tid=4828) |
التشفير بإستخدام Rijndael - RaggiTech - 02-10-12 كاتب الموضوع : Usama El-Mokadem
لغة البرمجة المستخدمة للتوضيح وفى إعداد المثال التالى (Microsoft Visual Basic.NET 2008): Cryptography.zip لتشفير نص يمكن أستخدام System.Security.Cryptography ، حيث أنها تتيح العديد من الدوال الجاهزة لتشفير البيانات بعدة اساليب مثل Symmetric Rijndael للتشفير المزدوج أو MD5 للتشفير فى اتجاه واحد او باستخدام مفتاح مزدوج ... الخ. هذا المثال لاستخدام التشفير بأستخدام Symmetric Rijndael algorithm ثم عرض البيانات المشفرة باستخدام Base64 لتسهيل قرائتها باستخدام الدالة System.Convert.ToBase64String هذه الدالة تأخذ النص كمصفوفة من البايتات لذلك يلزم تحويل النص باستخدام الدالةSystem.Text.Encoding.ASCII.GetBytes لكن هذه الداله كما هو واضح من أسمها تتعامل مع الحروف الانجليزية القياسية فقط ASCII ، لذلك يمكنك استخدام Unicode أو UTF8 للتعامل مع النصوص العربية، الدالة: System.Text.Encoding.Unicode.GetBytes ولفك تشفير البيانات، يتم ادخال البيانات بنفس هيئة Base64 ويتم تحويلها لأصلها باستخدام System.Convert.FromBase64String دالة التشفير الرئيسية كود : Private Function Crypt(ByVal sText As String, ByVal sPass As String, ByVal bEnc As Boolean) As String |