PDA

View Full Version : آموزش: جلوگیری از اجرای برنامه در فرمتی غیر از 2003



wolfstander
دوشنبه 03 اسفند 1388, 11:18 صبح
سلام به همه دوستان
شما حتما ً دیدید که تو اکسس 2007 ؛ منوهای کاربر به طرز عجیب و غریبی به درد نخور میشن و میرن تو تب Add Ins و شکل برنامه بهم میریزه و هزارتا مساله دیگه
برای اینکه کاربرا نتونند در فرمتی غیر از اکسس 2003 برنامه رو اجرا کنند ، میتونید از کد زیر استفاده کنید


Private Sub Form_Open(Cancel As Integer)
CurrentVersion = Trim(Version)
If Not CurrentVersion = "11.0" Then MsgBox "اين نرم افزار فقط در نسخه اکسس 2003 قابل اجراست.": DoCmd.Quit
End Sub

البته این کد رو در فرم استارت آپ خودتون و در Event مربوطه -On Open- قرار بدید.

Mahsa Hatefi
سه شنبه 04 اسفند 1388, 09:44 صبح
با سلا م

من روي سيستمم 2003 و 2007 رو نصب دارم و كد شما رو استفاده كردم اما عمل نكرد . يعني اكسس پيشفرض رو 2007 قرار دادم و فايلي كه كد شما توي رويداد on open فرم استارت آپ قرار داشت رو اجرا كردم و برنامه توي 2007 اجرا شد .

wolfstander
سه شنبه 04 اسفند 1388, 10:48 صبح
با سلا م

من روي سيستمم 2003 و 2007 رو نصب دارم و كد شما رو استفاده كردم اما عمل نكرد . يعني اكسس پيشفرض رو 2007 قرار دادم و فايلي كه كد شما توي رويداد on open فرم استارت آپ قرار داشت رو اجرا كردم و برنامه توي 2007 اجرا شد .

من خودم هم دو نسخه 2003 و 2007 رو دارم
برنامه ای رو ضمیمه کردم
با کدی که در بالا گفتم
وقتی با 2007 اون رو باز کنید ، اول یک پیغام امنیتی میده
که شما برای استفاده از برنامه اتون که صد در صد هم توش کدهای VBA داره ، مجبور به Enable کردن اون هستید
به محض اینکه Enable کنید ، اخطار برنامه نمایش داده میشه و بعدش هم از برنامه خارج میشه

Mahsa Hatefi
چهارشنبه 05 اسفند 1388, 00:09 صبح
دوست بزرگوار

فايل شما هم روي سيستم من عمل نمي كنه و توي 2007 باز مي شه

wolfstander
چهارشنبه 05 اسفند 1388, 08:29 صبح
دوست بزرگوار

فايل شما هم روي سيستم من عمل نمي كنه و توي 2007 باز مي شه
نمیدونم دیگه واقعا ً
ما توی شرکتمون نزدیک 20 تا کامپیوتر داریم
رو همه شون این عمل میکنه
البته شاید شما حرفه ای ها ، تنظیمی روی ستینگ های اکسس کرده باشید ، که جلوی اجرای کد رو میگیره
اون دیگه از توانایی من بیشتره
:ناراحت:
البته اگه یادمون بدید ، ما هم میگردیم و بدلش رو پیدا میکنیم که مجبور نباشیم تو محیط درد نخور اکسس 2007 کار کنیم
:لبخند:
حیف 2003 نیست؟
قشنگ
زیبا
کاربردی
منوها عین آدم میان بالای صفحه
تو 2007 همه شون میچپن یه گوشه عین بچه یتیم ها
:لبخند: