تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
لخبراء التشفير (ابحث عن دالة تشفر نص بشكل مختصر وأنيق)
#4
(22-06-22, 03:22 AM)silverlord كتب : شكرا لك اخي سعود وجدت هذه الداله واعجبتني نتائجها
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);
       }
   }
}

جربت التشفير حسب الكود المكتوب بمشاركتك ونتيجة التشفير كما يتبين بالصورة للنص الموجود باول مشاركتك :


انت ذكرت انك لاتريد هذه الطريقةSmile
على كل حال انا حبيت اعطي فكرة  ولك الخيار.



الملفات المرفقة
.zip   encdec.zip (الحجم : 17.33 ك ب / التحميلات : 27)
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: silverlord


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

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

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


يقوم بقرائة الموضوع: