أفكار قابلة للتنفيذ :
1-نجعلها كاداة يختار منها المبرمج ما يشاء من حماية أما :
-حماية بتحديد فترة زمنية
-حماية برقم الهارد والريجيستري
-حماية بهما معا
ويتم تنفيذ الاوامر على البرنامج المختار أليا دون تدخل من المبرمج ويتم تصدير البرنامج بعد اضافة هذه الاكواد والنماذج في مجلد جديد
...................
' انظر لموقع عبارة Barna في الاسطر التالية
If (IsNull(strDBPassword) = True) Or (strDBPassword = "Barna") Then
tdf.Connect = ";DATABASE=" & strNewMDB
Else
tdf.Connect = ";DATABASE=" & strNewMDB & ";PWD=" & strDBPassword
End If
tdf.RefreshLink
السلام عليكم ورحمة الله وبركاته
اسعد الله مساءكم جميعا ....... لدي قاعدة بيانات ..... يظهر فيها المسار الكامل للملف المختار ... أريد أن يستخرج اسم الملف بدون امتداد الملف في مربع النص path3
barna_1.accdb