البحث في الموقع
Showing results for tags 'حماية ، مؤقتة ، فترة ، تجريبية'.
تم العثور علي 1 نتيجه
-
السلام عليكم هي فكرة بسيطة لكنها من وجهة نظري عملية وسهلة التطبيق وتتم بالتحكم واحتساب عدد السجلات المدخلة في جدول محدد وليكن جدول الادخالات اليومية ------------------------- على اعتبار ان البرنامج تم تقسيمه الى 1- واجهات و 2- قاعدة جداول خلفية ، وهو شرط ، للمحافظة على بيانات العميل التي سبق ادخالها في النسخة التجريبية . ----------------- المثال المرفق هو لتوضيح الفكرة : حاول ان تدخل اكثر من اربع سجلات يمكننا ان نضع حد اعلى للسجلات بحسب نوع واستخدامات البرنامج 100 او 200 او اكثر من ذلك Dim i As Integer i = DCount("id", "tbl1") If i >= 5 Then MsgBox "انتهت الفترة التجريبية .. لشراء نسخة الكاملة اتصل على ..." DoCmd.Quit End If db1.mdb
