اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

اين هو آمر 17 ؟؟؟؟؟


dayslife

الردود الموصى بها

السلام عليكم ورحمة الله وبركاته

اخواني الاعزاء كيفكم :biggrin: ان شاء الله بخير يارب

عندي مرفق لملف عن اعطاء التنبيه عند نفاذ التاريخ المحدد

واخذت اراجع الكودات فيه لعلي اسبر اغوار الاكسس الذي هزمني دوما :wub:

ووقفت عن كود فيه زر امر رقم 17 ...

ولكن ضمن الازرار في النماذج والاستعلام لا اجد مكان هذا الزر

فأين هو .... هل هو مخفي ام ماذا ...

وله كود ينفذه وهو

فاتمنى ان تبحثوا معي اين هو وما هو عمله

اي اتمنى من اخواني ترجمت هذا الكود لي لعلي

افهم منه ما بزيدني علما

الف شكر اخواني مقدما على كل شيء

اختكم ديزلايف :fff:

Option Compare Database

Private Sub ÃãÑ12_Click()
On Error GoTo Err_ÃãÑ12_Click

    Dim stDocName As String

    stDocName = "over_date"
    DoCmd.OpenReport stDocName, acPreview

Exit_ÃãÑ12_Click:
    Exit Sub

Err_ÃãÑ12_Click:
    MsgBox Err.Description
    Resume Exit_ÃãÑ12_Click

End Sub

______________________________________________.rar

تم تعديل بواسطه dayslife
رابط هذا التعليق
شارك

أهلاً بك أختي الكريمة بالنسبة لزر الأمر 12 وليس 17 كما تفضلتي موجود في الفورم - over_date - ومهمة هذا الزر فتح التقرير - over_date --- ولتشغيله من خصائص زر الأمر قومي بتنشيط حدث عند النقر ...

آمل أن أكون أفدتك

رابط هذا التعليق
شارك

أهلاً بك أختي الكريمة بالنسبة لزر الأمر 12 وليس 17 كما تفضلتي موجود في الفورم - over_date - ومهمة هذا الزر فتح التقرير - over_date --- ولتشغيله من خصائص زر الأمر قومي بتنشيط حدث عند النقر ...

آمل أن أكون أفدتك

السلام عليكم ورحمة الله وبركاته

اكيد ... ابو رهف ... استفدت من قولك حيث اني كنت كتبت رقم 17 بدل 12 سهوا

وقد رأيت الزر عند النقر ... ولكن يا ريت تشرح لي الكود وخصوصا

On Error GoTo Err_ÃãÑ12_Click

Dim stDocName As String

stDocName = "over_date"

ولو بكلمات سريعة لكي افهم المغزى من

On Error GoTo Err_ÃãÑ12_Click

والف الف شكر لكل شيء بارك الله فيك وزادك من فضله وكرمه عليك

اختك ديزلايف

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information