منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : تشغيل ملف صوت او فيديو من الريسورس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
السلام عليكم ورحمة الله وبركاته
اضفت لمشروعي أداة windows media player من خلال choose item من الأدوات tools
ثم سحبتها على الفورم form
طبعا الجميع بيعمل openfiledialog علشان يحدد مسار الملف المراد تشغيله
أنا هنا في سؤالي أنا عايز اشغل ملف موجود في الريسورس بتاع مشروعي يعني مساره معروف في My.Resources
ازاي اكتب كود تشغيله بأداة الويندوز ميديا بلاير
علماً بأنني كتبت المسار هكذا ولم يعمل ....... شكراً لكم .......

AxWindowsMediaPlayer1.URL=My.resources.song1
http://social.msdn.microsoft.com/Forums/...b1d472b783
ارجو ان تجد بالرابط ماتريد
ارجو التوضيح لان الموقع محجوب عندى بارك الله فيكم
هذا هو الكود الموجود في الرابط أعلاه قمت بتجريبه ويعمل جيداً
كود :
Dim b As Byte() = My.Resources.Zain


        Dim TheFIlePath As String = "D:\.Zain.mp3"


        Dim TempFile As System.IO.FileStream = IO.File.Create(TheFIlePath)


        TempFile.Write(b, 0, b.Length)


        TempFile.Close()


        Me.AxWindowsMediaPlayer1.URL = (TheFIlePath)
استاذنا Kasalawy عندي الملف الصوتي اسمه art.wav موجود على الريسورس .... أنا أعرف أشغله لما يكون على أي درايف ..... أنا عايز أشغله وهو في الريسورس .... وشكرا على مشاركتك

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





من الريسوس


PHP كود :
My.Computer.Audio.Play(My.Resources.BoomAudioPlayMode.Background





السلام عليكم ورحمة الله وبركاته
جزاك الله خير اخى Kasalawy
اخى ابو رائد
هل من الممكن
[h=2]فتح ملف bdf من الريسورس داخل الاداة Adobe PDF Reader
[/h]

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





اعتقد انه لايمكن سوى بهذه الطريقة


PHP كود :
System.IO.File.WriteAllBytes(System.IO.Path.GetTempPath "\tmp.Pdf"My.Resources.mypdffile)
Process.Start(System.IO.Path.GetTempPath "\tmp.Pdf"






السلام عليكم ورحمة الله وبركاته
يا ابو رائد
شكراّ
اعجبنى
لايوجد زرين شكرا واعجبنى اخى الغالى بارك الله فيك


هذا كود لزيادة المنفعه العامه

PHP كود :
Dim mypdffile As String IO.Path.Combine(IO.Path.GetTempPath"filename.pdf")
        
My.Computer.FileSystem.WriteAllBytes(mypdffileMy.Resources.filenameFalse)
        
AxAcroPDF1.src mypdffile 
اخى ابو رائد
انا اقصد فتح ملف bdf من الريسورس الى الاداة التى فى الصور

[ATTACH=CONFIG]2855[/ATTACH]
[ATTACH=CONFIG]2856[/ATTACH]
الصفحات : 1 2