تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
الرجاء المساعدة : كيف اخفى او اشفر كلمة السر لقاعدة بيانات من ملف App.config
#1
Exclamation 
كيف اخفى او اشفر كلمة السر لقاعدة بيانات من ملف App.config؟
الرجاء المساعدة
الرد }}}}
تم الشكر بواسطة:
#2
اذا كان الهدف عد وجود كلمة السر فاتبع هذه الخطوات
إذهب إلى خصائص المشروع وتحديدا Settings
في سطر الاتصال Database1ConnectionString قم بالتالي
غير الخاصية Type من (connectionStirng) إلى String
الخاصية Scope من Application إلى User
احذف النص الموجود في Value

الان يمكن أن تضع نص الاتصال بالكود قبل أي سطر في الحدث Form1_Load على سبيل المثال
وبالطريقة التي تريدها مثل
كود :
My.Settings.Database1ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Jet OLEDB:Database Password=password;"

وإذا أردت تشفيره ب Base64 يمكنك استخدام هذه الطريقة لفك التشفير أن تعيين نص الاتصال
كود :
Dim EncryptedConnectionString As String = "UHJvdmlkZXI9TWljcm9zb2Z0LkFDRS5PTEVEQi4xMi4wO0RhdGEgU291cmNlPXxEYXRhRGlyZWN0b3J5fFxEYXRhYmFzZTEuYWNjZGI7SmV0IE9MRURCOkRhdGFiYXNlIFBhc3N3b3JkPXBhc3N3b3JkOw=="
Dim DecryptedConnectionString As String = System.Text.Encoding.UTF8.GetString(Convert.FromBase64String(EncryptedConnectionString))
My.Settings.Database1ConnectionString = DecryptedConnectionString

وطريقة تحويله إلى نص مشفر ب Base64 هي كالتالي
كود :
Dim ConnectionString As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Database1.accdb;Jet OLEDB:Database Password=password;"
Dim EncryptedConnectionString As String = Convert.ToBase64String(System.Text.Encoding.UTF8.GetBytes(ConnectionString))
Me.TextBox1.Text = EncryptedConnectionString

وإذا أردت طريقة أكثر تقدما بدلاً من استخدام الحدث Form1_Load استخدم الحدث MyApplication_Startup لأحداث المشروع كالتالي
من صفحة خصائص المشروع وتحديدا Application تجد في آخر الصفحة زر اسمه View Application Events تجده يفتح لك صفحة كود
في الأعلى من قائمة الكود حدد (MyApplication Events) وعلى يمينها اختر MyApplication_Startup وضع فيه الكود
الرد }}}}
تم الشكر بواسطة: noway , ابراهيم النعيمي
#3
الكود تمام
الف شكر على الشرح و التوضيح
ربـــنـــــــا يعوضك على تعبك معايا
الرد }}}}
تم الشكر بواسطة: ممدوح


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الاتصال بقاعدة بيانات SQL SEVER موجودة بجهاز اخر كفاح 5 114 15-01-17, 10:46 PM
آخر رد: كفاح
  ياشباب ارجو المساعده رنامج لا جلب اي قاعده بيانات في الجهاز اكسس او اكسل وعرضها ammaraliali 5 95 15-01-17, 06:11 PM
آخر رد: khodor1985
  [VB.NET] سوال مشكلة في اخذ نسخة احتياطية من قاعدة بيانات SQL كفاح 4 81 14-01-17, 08:19 PM
آخر رد: كفاح
  ارجوا المساعدة في برنامج محاسبة فيجوال بيسك 2008 محمد بوقزاحة 4 95 13-01-17, 12:56 AM
آخر رد: مساعدة
  [VB.NET] المساعدة في الاكواد لبرنامج انتي فايرس 0theghost0 6 107 11-01-17, 11:08 PM
آخر رد: 0theghost0
  طلب طريقه عمل الصلاحيات للمستخدمين بقاعده بيانات sql مبرمج أوتار 23 7,043 10-01-17, 01:58 PM
آخر رد: solbi
  [VB.NET] الرجاء المساعدة noway 2 82 10-01-17, 09:28 AM
آخر رد: thevirus
  منع تسجيل بيانات علي جدول الحركات بقاعدة بيانات sql خلال فترة زمنية (اقفال الفترة ا) السيد الجوهري 4 138 09-01-17, 07:22 PM
آخر رد: السيد الجوهري
  [VB.NET] لدي فكرة مشروع لمن يريد المساعدة فاليتفضل 0theghost0 10 267 05-01-17, 05:15 PM
آخر رد: 0theghost0
Rainbow طباعة بيانات في DGV باستخدام VB EXPRESS وليس V STUDIO فاطمة غ 5 131 26-12-16, 04:24 PM
آخر رد: محمد كريّم

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


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