الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

اريد اشغل صوت باداة ميديا بلايير بدون فتح الميديا

مغلق
بدأه مبرمج مبتدا في 5 يوليو 2007 · 19 رد · 1,555 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

اريد اشغل صوت باداة ميديا بلايير بدون فتح الميديا

اتمنى المساعدة في الفتح

لا اعلم ما الخطا في اكوادي

startingprogremmer.jpg
#2
	MP.FileName = "NOUR\WMV\40.WMA"

ألا بذكر الله تطمئن القلوب

#3

اخي انا استعمل اداة media player 11 و لا يوجد بها file name

startingprogremmer.jpg
#4

استعمل

msdxm.ocx

ستجدها بجانب الاداة التي تستعملها وهي أيضا للميديا بلير

ألا بذكر الله تطمئن القلوب

#5

لم اجدها

startingprogremmer.jpg
#6

اخي ضفتها

استخدمت الكود ذا

mp.FileName = App.Path + "\b.*"

لكن انظر

اجعل معه اي ملف صوتي اسمه b

Project1.rar

startingprogremmer.jpg
#7
اقتباس
لكن انظر

اجعل معه اي ملف صوتي اسمه b

نعم

مالغريب في ذلك

ألا بذكر الله تطمئن القلوب

#8

صح بانه لا يدث error لكن لا يفتحه

startingprogremmer.jpg
#9
اقتباس
صح بانه لا يدث error لكن لا يفتحه

الكود يقوم بفتح الملف وبدون أخطاء سواء وطعت اللاحفة ام لا

تاكد جيدا

!

ألا بذكر الله تطمئن القلوب

#10

اخي اسف لاني تعبتك وياي

انا جربت ضفت اداة commandialog

وضفت اداة media player 11

كتبت media.url = dialog.filename

و الكود ما فيه شيء الحمدلله

بس اذا app.path لافائدة لا اعلم ماذا حدث

على العموم تعبتك و مشكوور واسف

startingprogremmer.jpg
#11
اقتباس
اخي اسف لاني تعبتك وياي

عادي أخي مبرمج لا تعب و لاشي

اقتباس
بس اذا app.path لافائدة لا اعلم ماذا حدث

هل تقصد ان الكود لم يعمل معك ام ماذا ؟

ألا بذكر الله تطمئن القلوب

#12

لم يعمل بال app.path

اما بالdialog فعمل

startingprogremmer.jpg
#13

في كثير من الحالات لما نفتح مشروع فيجوال بيزك لا يكون دائما الapp.path هي دائما مكان وجود المشروع

لذلك عليك مقارنة app.path+"A.WAV" مع dialog.filename فستجد حتما اختلاف

#14

أخي مبرمج مبتدأ

أنظرأول كود قمت بكتابته

أنت هنا لاتحتاج ال app.path

لان الاداة ستتعرف عليها تلقائيا

تم تعديل هذه المشاركة بواسطة المزمجر في 10 يوليو 2007 في 22:42

ألا بذكر الله تطمئن القلوب

#15

bonjour les freres de site

cest de lq pqrt de star yes

==========================================

le code aui functionne éfficacement le voila cher frére

==========================================

Private Form_Load()

On Error Resume Next

MP1.FileName = App.Path & "\ Fichier.MP3"

MP1.Play

error:

Exit Sub

End Sub

==========================================

et avec toute mes parfaite salutation a tous

Star Yes Publisher of all vb6.0

#16

Voila ne Maitre pas

MP1.FileName = App.Path +"\Fichir.wav"

=============================================

met

=============================================

faite

=============================================

MP1.FileName = App.Path & "\Fichier.Wav"

=============================================

voila pas de (+)

met faite (&)

#17

اخي هذا الكود

 MediaPayer.openPlayer "d:\2.wav"
أو
MediaPayer.openPlayer  app.path & "\sound.mp3"

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#18

مثل ما فلت اخي

اقتباس
MediaPayer.openPlayer
هذا الكود يفتح الميديا وانا اريد فتح الصوت من البرنامج

________________________________________________________________________________

__

اقتباس
أخي مبرمج مبتدأ

أنظرأول كود قمت بكتابته

أنت هنا لاتحتاج ال app.path

لان الاداة ستتعرف عليها تلقائيا

اخي انا عامل للمشرو حفظ و الصوت جعلته في نفس المسار

startingprogremmer.jpg
#19

اخي الكريم

كودك السابق صحيح فقط اضف صيغة الملف الى الكود ليصبح بالطريقة التالية

Media.URL = App.Path & "\b.wav"

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#20

كنت واضع الصيغة ايضا

الخطا لم اعرف من اين اما الان فلا داعي له

مشكوووورين

startingprogremmer.jpg

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…