نمونه شماره 3

عنوان پروژه:

ارسال شماره سریال سخت افزاری سیستم به VBA

 

فهرست:

فایل پروژه

تنظیمات پروژه

توضیحات پروژه

مزایا معایب پروژه

توضیحات برنامه‌نویسی VBA


مسیر فایل پروژه در کامپیوتر شما پس از نصب نرم افزار accdbExe:

C:\accdbExe\Sample-Projects\Sample3

فایل‌های اصلی برنامه نویسی شده در Access در فولدر Contents قرار دارند.

فایل پروژه accdbExe در فولدر Project قرار دارد.

فایل‌های نهایی برای انتقال به کامپیوتر کاربر(مشتری) فولدر Output قرار دارند.

دانلود فایل‌ نهایی از اینترنت (پس از دانلود فایل، روی فایل exe راست کلیک کرده و گزینۀ run as administrator را انتخاب کنید.)


تنظیمات پروژه (پروژه به صورت زیر تنظیم شده است):

فایل دیتابیس حاوی دستورات به برنامه اجرایی(EXE)ضمیمه شود

    در مسیر فایل‌های موقت باز شود

    در مسیر فایل اجرایی باز شود

    در مسیر سفارشی باز شود:

ارسال پارامتر Command به بخش vba  هنگام اجرای نرم‌افزار

    پارامترهای وارد شده به فایل اجرایی

    شماره سریال سخت‌افزاری سیستم

    مسیر فایل اجرایی

    متن سفارشی:

تنظیمات رجیستری ویندوز برای اجرای راحتتر Microsoft Office Access

    تمامی گزینه‌های این بخش تیکدار شده‌اند.

عملکردهای قبل از اجرای Microsoft Office Access

    بررسی فعال بودن بخش فارسی (Persian) ویندوز در رایانه کاربر

    بررسی وجود (نصب) Microsoft Office Access و یا Access Runtime در کامپیوتر کاربر

    بستن سایر پنجره‌های Access قبل از اجرای نرم افزار EXE تولید شده

تزریق گذرواژه به پنجرۀ Password Required

    :Database Password

ارائه کدفعالسازی به مشتریان

    فایل در صورتی اجرا شود که کد فعالسازی درست به آن داده شود.


توضیحات پروژه

چون می‌خواستیم فایل دیتابیس را به فایل EXE اصلی ضمیمه کنیم، بنابراین در فایل پروژه Project3.prj، گزینه «فایل دیتابیس حاوی دستورات به برنامه اجرایی(EXE)ضمیمه شود»، تیکدار کرده‌ایم؛ فایل دیتابیس در مسیر فایل‌های موقت باز خواهد شد.

شماره سریال سخت‌افزاری سیستم، هنگام اجرای فایل با Access این پارامتر به خط فرمان اجرای Access، اضافه می شود. و توسط Access به بخش VBA انتقال می یابد و توسط تابع ()Command، دریافت می‌شود؛ می‌توانید با استفاده از شماره سریال سخت‌افزاری کامپیوتر، و با استفاده از فانکشن‌های اختصاصی و شخصی خودمان در محیط VBA، کد فعالسازی بررسی کنیم.


مزایا و معایب پروژه

مزایا

  • چون نوع فایل accdb است در هر کامپیوتری که Microsoft Office Access  داشته باشد قابل اجرا است.

  • چون فایل vba-db به فایل EXE ضمیمه شده است، فایل vba-db از دسترس افراد خارج شده.

 

معایب

  • چون فایل vba-db به فایل EXE ضمیمه شده است، اجرای نرم افزارکندتر است.

  • چون فایل  vba-db، فاقد گذرواژه Database Password است، ارزش مالی ندارد فقط جنبه تست دارد.


 

توضیحات برنامه نویسی در محیط VBA، نرم‌افزار Access

برنامه اکسس در این فایل نمونه دارای یک فرم به نام Login است که محتوی کد VBA آن ، به شرح زیر است:

Option Compare Database

Private Sub Command0_Click()
Application.Quit acQuitSaveNone
End Sub

Private Sub Command1_Click()
MsgBox "Message", , "message"
End Sub

Private Sub Form_Close()
'ShowWindow Access.hWndAccessApp, 5
Application.Quit acQuitSaveNone
End Sub

 

Private Sub Form_Load()
ShowWindow Access.hWndAccessApp, 0

Labelcommand.Caption = Command()
End Sub

می توانید با استفاده از شماره سریال سخت افزاری کامپیوتر، و با استفاده از فانکشن‌های اختصاصی و شخصی خودمان در محیط VBA، کد فعالسازی بررسی کنیم.

 

همچنین یک Module دارد که محتوی کد VBA آن ، به شرح زیر است:

Option Compare Database
#If Win64 Then
Declare PtrSafe Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
#Else
Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
#End IF