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

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

قام بنشر (معدل)

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

اخواني الاعزاء كيفكم :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

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

اختك ديزلايف

قام بنشر (معدل)

الكود المدرج هو لزر الأمر 12 كما أوضحت لك سابقاً ومهمته فتح التقرير المسمى -- over_date -- وهذا كل مايهم الكود .

تم تعديل بواسطه أبو رهف

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