تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيف أشفر قاعدة البيانات
#1
السلام عليكم ورحمة الله وبركاته

أخواني كيف أشفر أو أقفل قاعدة البيانات بعد التحزيم بحيث ما أحد يقدر يفتح الأكسس بعد تنصيبه على أي جهاز آخر؟


شاكر لكم
الرد }}}}
تم الشكر بواسطة:
#2
اعمـل لها كـلمه مرور



[صورة مرفقة: g5qidgW.jpg]

ســبحــانك الـلهم بـحمدك , الـلهم لا عــلم لـنا الى مــأ علــمتــنا , الـلهـم علــمنـا ما جــهلـنا وانــفـعنــا بــما عــلمــتنـا انــك انـتَ الـسـميع الــعلــيم الـحكـيم ~~!I!

الرد }}}}
تم الشكر بواسطة:
#3
إذا عمل لها كلمة مرور ما يفتح البرنامج


اللي أقصده بعد ما أسوي تحزيم للمشروع وفيه قاعدة بيانات وستبته على جهاز آخر طبيعي ينتقل ملق الأكسس اللي داخل المشروع للجهاز المستب عليه المشروع سهل تفتح قاعدة البيانات وتشوف يه من أرقام سريه ..

أبي عن فتح قاعدة البيانات يكون الكلام مشفر .. أو يكون فيه طريقة في الفيجول بيسك تفتح كلمة المرور لقاعدة البيانات .. يعني المتطفل اللي يدخل مجلد المشروع في الجهاز مايقدر يطلع على شيء .
الرد }}}}
تم الشكر بواسطة:
#4
اي اعمل كلمة سر للقاعدة كيف ?

ج: انشئها ثم قائمة ادوات ثم امان ثم تعيين كلمة المرور


استخدم ربط قاعدة البيانات بال ADO حيث عند الفتح تحتاج لكتابة كلمة السر في الكود

و هنا مثال حيث توضع كلمة السر في تكست1 و
كود :
StrFileNm = "db1.MDB"
لاحظ ان ما بين "" هو اسم ملف الاكسس

و نستبدل التكست 2 باسم الجدول


كود :
Dim Cn As New ADODB.Connection
StrFileNm = "db1.MDB"
StrPath = App.Path & "\" & StrFileNm
StrPr = _
        "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=" & StrPath & ";" & _
        "Jet OLEDB:Database Password=" & text1.Text
If Cn.State = 1 Then Cn.Close
Cn.Open StrPr
DBNm.Text = StrFileNm
Exit Sub
ErrHand:
MsgBox Err.Description
Resume Next
Rs11.Open "select * from [" & Text2.Text & "]", Cn, adOpenDynamic, adLockOptimistic
الرد }}}}
تم الشكر بواسطة: a_almisery
#5
شكراً ثم شكراً لك أخي لكن بصراحة ما ضبط معي يمكن ماعرفت الطريقة

أرفق لك ملفين الأول سويت كلمة سر لقاعدة البيانات ومايفتح معي والآخر عادي بدون تأمين

ياليت تسوي لي تعديل مع شرح أوسع وجزاك الله خير لأني محتاج للبرنامج وقفل قاعدة البيانات


الملفات المرفقة
.zip   برنامج الموظفين.zip (الحجم : 42.85 ك ب / التحميلات : 65)
الرد }}}}
تم الشكر بواسطة:
#6
وهذا الملف الثاني


الملفات المرفقة
.zip   برنامج الموظفين2.zip (الحجم : 43.03 ك ب / التحميلات : 66)
الرد }}}}
تم الشكر بواسطة:
#7
كود :
Set db = OpenDatabase("comp.mdb", True, False, ";pwd=" & "123")
Set rs = db.OpenRecordset("haqool", 2)

مثلا بفرض ان كلمة سر القاعدة هي 123
الرد }}}}
تم الشكر بواسطة:
#8
ماضبط معي يفتح الفورم الأول ويتعثر عند الثاني ويقول كلمة مرور خطأ

الفورم الثالث قاعدة البيانات مربوطه بــ ado أستخدمت الكود اللي في المشاركة الرابعة في هذا الموضوع وما ضبط معي

أرفق لكم الملف عدلوا عليه وأبيه مثل ماهو أبي الربط الفورم الأول والثاني مثل ماهو والثالث بـ ado

وشكراً لكم على مساعدتكم

المستخدم المدير
كلمة السر 369

كلمة السر لقاعدة البيانات 123


الملفات المرفقة
.zip   قاعدة.zip (الحجم : 12.15 ك ب / التحميلات : 57)
الرد }}}}
تم الشكر بواسطة:
#9
انا بصراحة لم اكن اعلم الكود للكن من خلال البحث وجدته كما في الرد

لكن الآن وجدت الكود الاصح
كود :
Set db = OpenDatabase("new.mdb", False, False, ";pwd=" & "123")
الرد }}}}
تم الشكر بواسطة:
#10
ماضبط معي يفتح الفورم الأول والثاني والفورم المربوط بـ adodc يظهر رسالة الرقم خطأ ولا يقبل إضافة على الحقول ولا أي عملية


شكراُ لكم
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  فتح برنامج مبرمج بالفيجوال بيسك6 و قاعدة بيانات MYSQL Ahmed Salem12 1 40 أمس, 03:40 PM
آخر رد: sendbad100
  [سؤال] برجاء المساعده في تغيير إسم جدول في قاعدة بيانات SQl Server بالفيجول بيسك6 engabuhema 2 56 24-11-16, 01:49 AM
آخر رد: ahmedabdelaliem
  مشكلة : قاعدة بيانات البرنامج بعد التنصيب لا تصبح بشكل ملف للقراءة فقط haiderkh 3 91 10-11-16, 12:56 AM
آخر رد: Ahmed_Mansoor
  [سؤال] رفع فيديو في قاعدة البيانات jihad20003000 0 53 04-11-16, 02:35 PM
آخر رد: jihad20003000
  احتاج كود لعمل نسخة من قاعدة بيانات اكسس اثناء الاتصال بها sendbad100 3 117 01-11-16, 08:57 AM
آخر رد: sendbad100
  البحث المتقدم في قاعدة بيانات اكسس haniblack 4 136 31-10-16, 10:00 PM
آخر رد: moamen said
  [سؤال] هل يوجد كود لمعرفة اسم حقل في جدول ( الاسم الرئيسي) الموجود بقاعدة البيانات allobaed 3 85 30-10-16, 01:32 AM
آخر رد: أبو عمر
Exclamation [سؤال] كيفية تحديث بيانات جدول داخل قاعدة بيانات sql 2000 engabuhema 6 227 27-10-16, 11:28 AM
آخر رد: engabuhema
  شرح تحزيم قاعدة بيانات SQL Server 2000 ومحرك قواعد البيانات بوااسطة الـSetupFactory Ahmed_Mansoor 14 1,099 24-10-16, 02:07 PM
آخر رد: engabuhema
  تصدير جدول إلى قاعدة بيانات أخرى بنية الجدول فقط Ahmed_Mansoor 4 629 19-10-16, 10:33 AM
آخر رد: مصمم هاوي

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


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