
نوشته شده توسط
ali_bagheri34
سلام
دوست عزیز اگر استفاده کننده شورت کارت را بررسی کند متوجه می شود که این برنامه با اکسس اجرا می شود آیا برای این نکته می توان کاری را انجام داد
سلام
در ادامه ی تاپیک امنیت ماکرو که پیشنهاد شد فرمی را با vb طراحی کرده و بصورت Exe و بعنوان Splash برنامه در نظر بگیریم:
https://barnamenevis.org/showpo...81&postcount=8
در اینجا هم شما می توانید کد زیر را برای تایمر تعریف کنید، و با دستور shell برنامه اکسس را باز کنید تا کسی متوجه ترفند شما نشود.
Private Sub Timer1_Timer()
Dim strCommand As String
strCommand = """c:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE"" ""c:\db1.exe"" /runtime"
Shell strCommand, vbMaximizedFocus
Unload Me
End Sub
(لازم به توضیح است برای تکمیل تر شدن این کد می توانید درایوی که ویندوزدر آن نصب شده و معمولا آفیس نیز در همان درایو نصب می شود را با توابع api استخراج کنید و بعنوان یک متغییر رشته ای به این کد اضافه نمایید)