مشكلة في الفورم

[sofiane05552]

السلام عليكم

واجهتني مشكل بعدما نقلت مشروع الي اكسس 2010 هل يمكن مساعدتي في اصلاح المشكل  تم تحميل المرفق  صورة مشكل

Database3.rarFetching info...

[Shivan Rekany]

اضف مكتبة ويندوز ميديا بلاير

Database3.rar

تم تعديل يناير 22, 2018 بواسطه Shivan Rekany

[sofiane05552]

  في 22‏/1‏/2018 at 16:06, Shivan Rekany said:

اضف مكتبة ويندوز ميديا بلاير

Database3.rarFetching info...

Expand  

بارك الله فيك استاذ مشاء الله ممكن تشرحلي  مشكل الي كان  فيها  وكيف تم تصليحه و بارك الله فيك استاذ

[Shivan Rekany]

  في 22‏/1‏/2018 at 16:16, sofiane05552 said:

بارك الله فيك استاذ مشاء الله ممكن تشرحلي  مشكل الي كان  فيها  وكيف تم تصليحه و بارك الله فيك استاذ

Expand  

تم اضافة مكتبة ويندوز ميديا بلاير
شوف الصورة

فتحت محرر الاكواد
بعدين من قائمة تولس تم اختيار ريفرينس اي المكتبات
وبعدين بحثت عن اسم ويندوس ميديا بلاير و عطيت علامة صح امامه 
وضغط اوكي
وبعد تم تشغيل بشكل اعتيادي

[sofiane05552]

  في 22‏/1‏/2018 at 17:08, Shivan Rekany said:

تم اضافة مكتبة ويندوز ميديا بلاير
شوف الصورة

فتحت محرر الاكواد
بعدين من قائمة تولس تم اختيار ريفرينس اي المكتبات
وبعدين بحثت عن اسم ويندوس ميديا بلاير و عطيت علامة صح امامه 
وضغط اوكي
وبعد تم تشغيل بشكل اعتيادي

Expand  

اها  بارك الله فيك استاذ لم تكن في بالي خالص   هل يمكن وضع كود لتشغيل  مكتبة بكود سورس عند الفتح عشان لو غيرت الجهاز  مكتبة تضاف اتوماتيك

[sandanet]

اخي الكريم المكتبة سوف تبقى مضافة الا اذا نقلت المحتوى الى قاعدة جديدة او اذا كان الويندوز لايحتوي على مكتبة الميديابلاير تلك

[sofiane05552]

  في 22‏/1‏/2018 at 19:00, sandanet said:

اخي الكريم المكتبة سوف تبقى مضافة الا اذا نقلت المحتوى الى قاعدة جديدة او اذا كان الويندوز لايحتوي على مكتبة الميديابلاير تلك

Expand  

بارك الله فيك استاذ

  في 22‏/1‏/2018 at 19:00, sandanet said:

اخي الكريم المكتبة سوف تبقى مضافة الا اذا نقلت المحتوى الى قاعدة جديدة او اذا كان الويندوز لايحتوي على مكتبة الميديابلاير تلك

Expand  

هل يمكنك مساعدتي في اضافة فورم مشاهدة فيديو بهذا شكل في الفورم  10  نقلته الي فورم 10 لكن فيديوات صارت ماتشتغل صورة شكل 

و الغاء طريقة Hide access لكي تتماشي  مع  فورم الخاص بي المرفق في اسفل 

AccessMediaPlayer.rar

[sandanet]

عفواً اخي لم افهم المطلوب ارجو منك اعادة صياغة سؤالك بشكل اوضح .. لا اعرف ماذا تقصد بـ "اضافة فورم مشاهدة فيديو بهذا شكل في الفورم  10  نقلته الي فورم 10 لكن فيديوات صارت ماتشتغل صورة شكل" الوصورة المرفقة لاتوضح شيء كما ان الملف المرفق لاتوجد به مشكلة!!

على العموم اذا اردت الغاء  Hide access  فقم بحذف كلمة HideAccess من النماذج وقم بازالة الوحدة النمطية Hide Access

 

تم تعديل يناير 22, 2018 بواسطه sandanet

[sofiane05552]

  في 22‏/1‏/2018 at 20:27, sandanet said:

عفواً اخي لم افهم المطلوب ارجو منك اعادة صياغة سؤالك بشكل اوضح .. لا اعرف ماذا تقصد بـ "اضافة فورم مشاهدة فيديو بهذا شكل في الفورم  10  نقلته الي فورم 10 لكن فيديوات صارت ماتشتغل صورة شكل" الوصورة المرفقة لاتوضح شيء كما ان الملف المرفق لاتوجد به مشكلة!!

على العموم اذا اردت الغاء  Hide access  فقم بحذف كلمة HideAccess من النماذج وقم بازالة الوحدة النمطية Hide Access

 

Expand  

الف شكر استاذ بارك الله فيك تم تصليح المشكل

[حسين العربى]

تفضل اخي سفيان  

كود عمل ارتباط بقاعدة بيانات 

عمل ارتباط بقاعدة بيانات.rar

[sofiane05552]

  في 23‏/1‏/2018 at 05:36, حسين العربى said:

تفضل اخي سفيان  

كود عمل ارتباط بقاعدة بيانات 

عمل ارتباط بقاعدة بيانات.rarFetching info...

Expand  

بارك الله فيك استاذ لكن  بعدما ضغطت على انشاء اتصال طلع لي مشكل الي بصورة

[sandanet]

الخطأ هو وجود عبارة else و end if  في حين ان عبارة if ملغية لذلك قم بحذف else وكل من end if في اخر الكود كما يجب عليك حذف سطر ال msgbox الاخيرة ايضا

 

تم تعديل يناير 23, 2018 بواسطه sandanet

[حسين العربى]

  في 23‏/1‏/2018 at 13:12, sandanet said:

الخطأ هو وجود عبارة else و end if  في حين ان عبارة if ملغية لذلك قم بحذف else وكل من end if في اخر الكود كما يجب عليك حذف سطر ال msgbox الاخيرة ايضا

 

Expand  

استاذي ومعلمي  الفاضل sandanet  الخطاء اني هو ما متب اسماء الجدول الخاصه به  لو تلاحظ في الكود اني بقله اكنب اسم الجدول  مرتين واسم قاعدة البيانات واسم السرفر وهكذا

كل سطر خاص بجدول

بس اخي سفيان شغل الكود كده من غير تعديل عليه 

يعني لو جدول واحد هيكون الكود كده

Private Sub أمر4_Click()
   
      If AttachDSNLessTable("ITEMS_LABEL_PRINT_SALMYIA", "ITEMS_LABEL_PRINT_SALMYIA", "129.186.1.209", "ERP4_COOP", "hussin", "password") Then

                MsgBox "تم انشاء الاتصال "
                DoCmd.Requery
    Else
        MsgBox "حدث خطا فى انشاء الاتصال "
    End If
        
End Sub

 

[sofiane05552]

  في 24‏/1‏/2018 at 06:17, حسين العربى said:

استاذي ومعلمي  الفاضل sandanet  الخطاء اني هو ما متب اسماء الجدول الخاصه به  لو تلاحظ في الكود اني بقله اكنب اسم الجدول  مرتين واسم قاعدة البيانات واسم السرفر وهكذا

كل سطر خاص بجدول

بس اخي سفيان شغل الكود كده من غير تعديل عليه 

يعني لو جدول واحد هيكون الكود كده

Private Sub أمر4_Click()
   
      If AttachDSNLessTable("ITEMS_LABEL_PRINT_SALMYIA", "ITEMS_LABEL_PRINT_SALMYIA", "129.186.1.209", "ERP4_COOP", "hussin", "password") Then

                MsgBox "تم انشاء الاتصال "
                DoCmd.Requery
    Else
        MsgBox "حدث خطا فى انشاء الاتصال "
    End If
        
End Sub

 

Expand  

تمام جزاك الله استاذ ممكن سؤال  جدوال  بعدما اخذهم الي اس كي ال هل  احذفهم من اكسس  و الأداة تجلب  الجداول  من اس كي ال