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

05/09/2016, 22:04

kesoka

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.
06/09/2016, 09:27

atoz112

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.
06/09/2016, 09:38

kesoka

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