ارسال پاسخ 
 
امتیاز موضوع:
  • 0 رأی - میانگین امتیازات: 0
  • 1
  • 2
  • 3
  • 4
  • 5
فعال سازی غلطک ماوس در اکسس 2013 - 2007
نویسنده پیام
CPSD Admin آفلاین
مدیر سایت
*******

ارسال‌ها: 177
تاریخ عضویت: تير ۱۳۸۹
اعتبار: 0
ارسال: #1
Lightbulb فعال سازی غلطک ماوس در اکسس 2013 - 2007
ضمن سلام

یکی از تغییراتی که از بدو ایجاد نسخه 2007 اکسس با آن مواجه شده ایم , غیر فعال سازی عملکرد غلطک ماوس در خصوص گشت و گذار در بین رکوردهای ثبت شده می باشد

تا نسخه 2003 با چرخاندن غلطک ماوس , اکسس اقدام به تغییر رکورد جاری کرده و رفتاری همچون فشار بر روی دکمه های Next Record و Previous Record را از خود به نمایش می گذاشت

از آنجا که در برخی مواقع کاربر به صورت اتفاقی اقدام به گرداندن غلطک ماوس می نمود , در این حالت اکسس نیز اقدام به ثبت اطلاعات تغییر داده شده می کرد که همین امر مطلوب برخی کاربران نبود

بر همین اساس مایکروسافت اقدام به حذف این مشخصه رفتاری , از نسخه 2007 اکسس نمود

جهت فعال سازی مجدد , شما نیاز به درج چند خط کد خواهید داشت که در بخش زیرین بدان اشاره ای خواهیم داشت

اقدام به کپی نمودن کدهای زیر در داخل رویداد On Mouse Wheel فرم نمایید :

کد:
If (Count < 0) And (Me.CurrentRecord > 1) Then

     DoCmd.GoToRecord , , acPrevious

   ElseIf (Count > 0) And (Me.CurrentRecord <= Me.Recordset.RecordCount) Then

        DoCmd.GoToRecord , , acNext

   End If

در صورتی که مایل هستید از جایجایی رکوردها به صورت اتفاقی پس از تغییر در داخل یک رکورد , جلوگیری به عمل آورید نیز , میتوانید از کد تکمیل شده زیر استفاده نمایید ( به جایگزینی کد فوق ) :

کد:
If Not Me.Dirty Then

   If (Count < 0) And (Me.CurrentRecord > 1) Then

     DoCmd.GoToRecord , , acPrevious

   ElseIf (Count > 0) And (Me.CurrentRecord <= Me.Recordset.RecordCount) Then

        DoCmd.GoToRecord , , acNext

   End If

Else

   MsgBox "لطفا اقدام به ذخيره سازي داده ورودي نماييد"

End If

موفق باشید

درگاه : وب سايت | فروشگاه | وبلاگ
۳ آذر ۱۳۹۱ ۰۶:۵۱ عصر
مشاهده‌ی وب سایت کاربر یافتن تمامی ارسال‌های این کاربر نقل قول این ارسال در یک پاسخ
ارسال پاسخ 


پرش به انجمن:


‍CPSD.ir Website

وب سايت      |      وبلاگ      |      فروشگاه

 

Center Point SD - Software Developer

Yaldex PopUp