الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اكتشاف حيله في طريقه عمل Demo لاستاذتنا الكبيره زهره وارجو الاجابه منها

بدأه gsmp_hos في 8 مارس 2009 · 3 رد · 3,890 مشاهدة · في قسم أرشيف الحماية والامان
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

وهذا يسم الله الرحمن الرحيم 

الي استاذتنا الكبيره زهره اسف واكرر اسفي علي هذا العنوان

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

بطرقه مسح الجداول بعد فتره معيه

وهذه الحيله هي ان قبل معاد انتهاء البرنامج وليكن يوم 5/1

من الممكن ارجاع التاريخ يوم 4/1

الي تاريخ 3/1

او 2/1

وبهذه الطريقه ممكن استمرار النسخه دائما

وهذا هوه رابط الموضوع

/index.php?showtopic=82843

وهذا ملفك المرفق و هوه احد ملفاتك التي تعلمنا منها كثيرا وكثيرا

وارجو دائما كما عودتيننا بكرمك الاجابه وشكرا واسف علي ضايع وقتك

Demo1.rar

#2

السلام عليكم

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

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

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

100% لذا فأن هناك طرقا كثيرة لجعل البيانات مشفرة أو في ملف أخر وليس جدول

أو داخل الكود البرمجي وغيرها الكثير مما يجعل الحماية قوية وعلى درجة عالية من الحرفيه

لذا أحببت التوضيح وفقك الله

#3

اخي الكريم 

شكرا لاهتمامك

ولكني احب ان الفت نظرك انيي وضعت هذا الموضوع لا تحدي الاخت زهره لا سمح الله او اي تقيلل من شانها او شان اي فرد  من افراد هذا المنتدي العظيم

ولكني اريد فعلا حل لهذه الطريقه وحاولت كثيرا ولكني فشلت في النهايه 

ولذلك ارجو الاهتمام بذا الموضوع وشكرا

#4
كما يمكن استعمال الدالة DateAdd

في عمل نسخه موقته

كما في المثال التالي  و شكرا

 

 

(Private Sub Form_Open(Cancel As Integer

 

Dim FirstDate As Date

Dim IntervalType As String

Dim Number As Integer

 

"IntervalType =  "d

(FirstDate = InputBox("Entrez la date de jour

(Number = InputBox("Entrez le nombre de mois à ajouter

(Date_Fin = DateAdd(IntervalType, Number, FirstDate

If Date_Fin >= Date Then

"MsgBox "votre base sura supprimer 

DoCmd.OpenQuery "supp", acNormal

End If

 

End Sub

تم تعديل هذه المشاركة بواسطة djouamaa في 28 سبتمبر 2013 في 21:28

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…