تحميل الاصوات في الأكسس

هل لا يوجد حل لهذا اطلب ارجو سرعة الرد فالموضوع مهم جداً

اخي العزيز

هل جربت عمل ذلك من خلال VBA الخاص بالنموذج اعتقد انه ممكن تشغيل ملف صوتي .

ولكن لم اجرب لأنه لا يتوفر في جهازي الحالي برنامج الاكسيس

شكرا على الرد ولكن ما هو الكود اللزم لذلك

الأخ طلال

أنت بين خيارين: الأول هو استخدام أداة الملتميديا

والثاني تحويل ملف الصوت إلى برنامج تنفيذي EXE

أما الطريقة الأولى فيجب أن يكون عندك فيجول بيسيك

أوتحصل على الأداة من أي طريق أخرى.

لو كان عندك الفيجول بيسيك ستجد الأداة بالطبع في مجلد

النظام system .

وسيكون اسمها MCI32.OCX

اجعل النموذج في وضع التصميم واختر

من مربع الأدوات (عناصر تحكم إضافية)واختر الأداة

Microsoft Multimedia Control

وضعها على النموذج

وضع زر أمر واكتب في حدث النقر

MM.FileName = Label2

"MM.Command = "open

"MM.Command = "play

على فرض أن mm هو اسم الأداة

و Label2 هو متغير مسار الملف الصوتي

أما في الحالة الثانية

فاستخدم الأمر Shell الذي يستخدم عادة لتشغيل البرامج

التنفيذية

المطلوب أن يحدث الصوت في نموذج معمول في بيئة الأكسس و ليس الفيجوال بيسك فمن لدية حل يسعفنا به

الاخ / طلال

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

ارسل لي ملف صوة الذي تريد ان تضعه في النموذج وسوف اقوم بعمل ذالك إن شاء الله (( ملفات الصوة التي عندي كبيره جداً لاتصلح لهذا الغرض ))

وتقبل تحياتي / مسافر

الأخ طلال

المثال الذي ذكرت لك هو للآكسس وليس للفيجول بيسيك

ولكن الأداة (Microsoft Multimedia Control )تأتي

مع الفيجول بيسك، ويمكن استخدامها في الآكسس.

وهناك حل آخر وهو تشغيل الصوت بواسطة واجهةAPI

وهي موجودة في موقع VB-ART .

ويمكن تطبيقه في بيئة الآكسس

تذكر أن الكثير من أوامر الفيجول بيسيك تعمل داخل

الآكسس.

الأخوة الكرام ارجو التوضيح بمثال مع الشكر

Call Shell("C:windowsSndrec32.exe /play ""C:WINDOWSMEDIADING.WAV"" /close ", 0)

لايظهر مسجل الصوت في هذه الحالة فقط تسمع صوت وإذا غيرت الصفر بواحد يظهر برنامج الصوت بحجمه العادي ثم يختفي إذا انتهى من قراءة الملف و2 يظهر مصغراً على شريط المهام و3 يظهر مكبراً جرب الخيارات .

إذا كان ملف الصوت كبيراً جداً فقط لايستطيع مسجل الصوت فتحه .

ولك تحياتي

أخي الكريم أبو حمود

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

اشكرك على سرعة الرد

ولكن الكود الذي ذكرته اين يوضع في خصائص النموذج عند حدث التحميل

اخوك

طلال

نعم في حدث التحميل .

وغير اسم الملف والمسار .

وإذا وجدت أن تحميله يؤخر فتح النموذج فضعه في حدث المؤقت .

أخي الكريم

اشكرك من أعماق قلبي فقد جربته وكان أكثر من رائع و انهيت مشكلتي وفقك الله ورعاك

طلال