تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لخبراء التشفير (ابحث عن دالة تشفر نص بشكل مختصر وأنيق)
#3
شكرا لك اخي سعود وجدت هذه الداله واعجبتني نتائجها
Encrypt
كود :
using System;
using System.IO;
using System.Security.Cryptography;
using System.Text;

namespace encrypt_decrypt_string
{
   class Program
   {
       static string Encrypt()
       {
           try
           {
               string textToEncrypt = "WaterWorld";
               string ToReturn = "";
               string publickey = "12345678";
               string secretkey = "87654321";
               byte[] secretkeyByte = { };
               secretkeyByte = System.Text.Encoding.UTF8.GetBytes(secretkey);
               byte[] publickeybyte = { };
               publickeybyte = System.Text.Encoding.UTF8.GetBytes(publickey);
               MemoryStream ms = null;
               CryptoStream cs = null;
               byte[] inputbyteArray = System.Text.Encoding.UTF8.GetBytes(textToEncrypt);
               using (DESCryptoServiceProvider des = new DESCryptoServiceProvider())
               {
                   ms = new MemoryStream();
                   cs = new CryptoStream(ms, des.CreateEncryptor(publickeybyte, secretkeyByte), CryptoStreamMode.Write);
                   cs.Write(inputbyteArray, 0, inputbyteArray.Length);
                   cs.FlushFinalBlock();
                   ToReturn = Convert.ToBase64String(ms.ToArray());
               }
               return ToReturn;
           }
           catch (Exception ex)
           {
               throw new Exception(ex.Message, ex.InnerException);
           }
       }
       static void Main(string[] args)
       {
           string encrypted = Encrypt();
           Console.WriteLine(encrypted);
       }
   }
}
Decrypt
كود :
using System;
using System.IO;
using System.Security.Cryptography;
using System.Text;
namespace encrypt_decrypt_string
{
   class Program
   {
       static string Decrypt()
       {
           try
           {
               string textToDecrypt = "6+PXxVWlBqcUnIdqsMyUHA==";
               string ToReturn = "";
               string publickey = "12345678";
               string secretkey = "87654321";
               byte[] privatekeyByte = { };
               privatekeyByte = System.Text.Encoding.UTF8.GetBytes(secretkey);
               byte[] publickeybyte = { };
               publickeybyte = System.Text.Encoding.UTF8.GetBytes(publickey);
               MemoryStream ms = null;
               CryptoStream cs = null;
               byte[] inputbyteArray = new byte[textToDecrypt.Replace(" ", "+").Length];
               inputbyteArray = Convert.FromBase64String(textToDecrypt.Replace(" ", "+"));
               using (DESCryptoServiceProvider des = new DESCryptoServiceProvider())
               {
                   ms = new MemoryStream();
                   cs = new CryptoStream(ms, des.CreateDecryptor(publickeybyte, privatekeyByte), CryptoStreamMode.Write);
                   cs.Write(inputbyteArray, 0, inputbyteArray.Length);
                   cs.FlushFinalBlock();
                   Encoding encoding = Encoding.UTF8;
                   ToReturn = encoding.GetString(ms.ToArray());
               }
               return ToReturn;
           }
           catch (Exception ae)
           {
               throw new Exception(ae.Message, ae.InnerException);
           }
       }
       static void Main(string[] args)
       {
           string decrypted = Decrypt();
           Console.WriteLine(decrypted);
       }
   }
}
اثنان لا يتعلمان المتكبر والخجول
Heart اللهم علمنا ما ينفعنا و انفعنا بما علمتنا وَ زِدْنا علماً‏ Heart
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
RE: لخبراء التشفير (ابحث عن دالة تشفر نص بشكل مختصر وأنيق) - بواسطة silverlord - 22-06-22, 03:22 AM

المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
Question [VB.NET] هناك سؤال يهم كل مبرمج الماذا برنامجك يظهر على بعض الشاشات اكثر دقه بشكل مصغر ومشوه Microformt 0 451 01-02-25, 03:48 PM
آخر رد: Microformt
  هذا الكود لا يعمل بشكل صحيح لماذا ؟ PeterGhattas082460 3 453 21-12-24, 02:55 PM
آخر رد: aljzazy
  ممكن طريقة عمل الصورة بشكل دائري بوحمد 3 498 14-10-24, 04:01 PM
آخر رد: بوحمد
  هل يمكن جعل عناوين الهيدر بشكل عمودي مصمم هاوي 2 567 16-04-24, 03:59 AM
آخر رد: مصمم هاوي
Heart اقدم لكم هدية تصفح منتدى vb4arb.com بشكل أفضل من قبل مع ( vb4arb Code Highlighter ) عبدالله الدوسري 5 4,581 24-01-24, 10:31 PM
آخر رد: annagui
  كيفية رسم بيان دالة رياضية؟ الخير19 6 898 23-12-23, 03:36 PM
آخر رد: الخير19
  كيف يتم تعبئة قريد فيو بدون قاعدة بيانات بشكل مباشر؟ nowiglah 1 712 01-12-23, 10:57 PM
آخر رد: Taha Okla
  [سؤال] كيف نستعيد قيمة من دالة ضمن مسار مستقل justforit 2 690 21-11-23, 10:51 AM
آخر رد: justforit
  عرض تقرير كريستال ريبورت من خلال دالة atefkhalf2004 0 577 23-09-23, 10:07 AM
آخر رد: atefkhalf2004
Rainbow [كود] معرفه حجم كل المجلدات في القرص C بشكل واضح محمد مسافر 7 973 10-09-23, 01:56 AM
آخر رد: أبو خالد الشكري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم