Buton ile media player açtırıp ilgili videoyu görüntülemek??

Merhaba

formda bulunan butonlara tıklandığında programımızın bulunduğu dizindeki Videolar klasörünün içindeki ilgili videoyu media player ile çalıştırmak istiyorum. Bunu forma media player ekleyerek değil direk windows un media playerı açılarak yapılmasını sağlamak için nasıl bir kodlama yapmalıyız??    

videourl = CurrentProject.Path & "\" & "Videolar" &  Video1.mp4"    gibi....

Örnek form ektedir.
ilginize tşkler şimdiden.

Sayın kesoka,

Bahsettiğiniz talebinize yönelik olarak;
Eklediğiniz örnek uygulamayı (kendi adıma) inceleme imkanım ve zamanım olmaması gerekçesi ile ancak şu bilgiyi paylaşmayı uygun görmekteyim.

Dim videourl



videourl = CurrentProject.Path & "\" & "Videolar\" & "Video1.mp4"



Shell "C:\Program Files\Windows Media Player\wmplayer /play /close " & videourl

ya da

Dim videourl



videourl = Chr(34) & CurrentProject.Path & "\" & "Videolar\" & "Send email using Gmail via Excel VBA.mp4" & Chr(34)



Shell "C:\Program Files\Windows Media Player\wmplayer.exe" & " " & videourl, 1

Yukarıdaki kodları ilgili buton içeriğinde kullanmayı deneyiniz.

Bilginize…iyi çalışmalar,saygılar.

Teşekkürler sayın Atoz ilgili kodlar sorunumu çözdü.