w.mov maker ile oluşturduğum wmv dosyasını userformda oynatma

[bistroman]

w.mov maker ile oluşturduğum wmv dosyasını userformda oynatmak için ne yapmam lazım.
Userform üzerine player nesnesi ekleyebiliyormuyuz?

ve bu video ag üzerindeki tüm bilgisayarlar tarafından açılabilir olmalı? paylaştırmamız mı lazım bir klasör içinde dosyayı? ama bizim bilgisayarlarda video oynatma siteleri (youtube, videogoogle, vb) açılsa bilr player oynatmıyor
bu dosyayı makro içine gömmem gerek...yardımcı olursanız sevinirim....4 mb'lık kısa bir slayt videosu.

 

[Levent Menteşoğlu]

Windows media player nesnesi ile istediğinizi yapabilirsiniz.

 

[security]

w.mov maker ile oluşturduğum wmv dosyasını userformda oynatmak için ne yapmam lazım.
Userform üzerine player nesnesi ekleyebiliyormuyuz?

ve bu video ag üzerindeki tüm bilgisayarlar tarafından açılabilir olmalı? paylaştırmamız mı lazım bir klasör içinde dosyayı? ama bizim bilgisayarlarda video oynatma siteleri (youtube, videogoogle, vb) açılsa bilr player oynatmıyor
bu dosyayı makro içine gömmem gerek...yardımcı olursanız sevinirim....4 mb'lık kısa bir slayt videosu.

Levent Beye Katılıyorum.
Ek Olarak Videonuzu .swf Yani Flash 'a Çevirin Ve UserFormunuza Gömün Böylelikle Her Zaman Çalışır

 

[bistroman]

Levent abi, dediğini yaptım, movie maker ile agdaki başka pc kullanıcısı videoyu izleyemedi....
swf'yi hangi toolu kullanarak userforma gömeceğim? nasıl bir resmi image olarak userforma yüklüyoruz ve her bilgisayarda bu resim karşımıza çıkıyor ise videoda da aynı şeyi istiyorum.flash olunca hallolacak mı?

 

[security]

Levent abi, dediğini yaptım, movie maker ile agdaki başka pc kullanıcısı videoyu izleyemedi....
swf'yi hangi toolu kullanarak userforma gömeceğim? nasıl bir resmi image olarak userforma yüklüyoruz ve her bilgisayarda bu resim karşımıza çıkıyor ise videoda da aynı şeyi istiyorum.flash olunca hallolacak mı?

flash olunca sorun kalmaz her zaman çalışır yani ağdaki tüm pc lerde
swf eklemek için formunuza bir ShockwaveFlash1 nesnesi ekleyin.
video nuzu flasa çeviremesseniz yönderin yaparız. kolay gelsin.security

 

[Levent Menteşoğlu]

Levent abi, dediğini yaptım, movie maker ile agdaki başka pc kullanıcısı videoyu izleyemedi....
swf'yi hangi toolu kullanarak userforma gömeceğim? nasıl bir resmi image olarak userforma yüklüyoruz ve her bilgisayarda bu resim karşımıza çıkıyor ise videoda da aynı şeyi istiyorum.flash olunca hallolacak mı?

Dosya yolunu, dosyanın bulunduğu bilgisayarın ağ üzerindeki adınıda içerecek şekilde media playere tanıtın. Örneğin,

\\Ahmet\c\deneme.wmv

 

[bistroman]

abi 1000 bilgisayar var userform üzerinde gömülü olsun istiyorum

videoyu shockwaveflash object ile form üzerine getirdim tabii ki swf'ye çevirdim önce
ama yine diğer insanlarda açılmamış dosya

embedmovie=true mu diyecez acaba herkesde gömülü olanın açılması için?

 

[security]

abi 1000 bilgisayar var userform üzerinde gömülü olsun istiyorum

videoyu shockwaveflash object ile form üzerine getirdim tabii ki swf'ye çevirdim önce
ama yine diğer insanlarda açılmamış dosya

embedmovie=true mu diyecez acaba herkesde gömülü olanın açılması için?

embedmovie=Falseyi
embedmovie=True Olarak Değiştirin.

 

[bistroman]

yaptım olmuyor diğer arkadaşın bilgisayarına baktım embedmovie otomatik false olmuş tekrar??

 

[bistroman]

userform activate olayında bunlar var.....


Private Sub UserForm_Activate()
UserForm9.ShockwaveFlash1.Playing = True
UserForm9.ShockwaveFlash1.EmbedMovie = True
End Sub

Birde Shockwaveflash1 nesnesine ait kodlar var:OnReadyStateChange bunlardan birtanesi, enter var exit var, bir kaç kod daha var.acaba buralara mı bir kod yazacağız?
Private Sub ShockwaveFlash1_OnReadyStateChange(ByVal newState As Long)

End Sub


acaba diğer bilgisayarlarda activex mi yüklü değil açılmıyor ve flash oynatan pencere küçük gösteriyor ve içi beyaz, oynatmıyor?

set activex ile ilgil ibir komut mu yazmak lazım?

 

[security]

userform activate olayında bunlar var.....


Private Sub UserForm_Activate()
UserForm9.ShockwaveFlash1.Playing = True
UserForm9.ShockwaveFlash1.EmbedMovie = True
End Sub

Birde Shockwaveflash1 nesnesine ait kodlar var:OnReadyStateChange bunlardan birtanesi, enter var exit var, bir kaç kod daha var.acaba buralara mı bir kod yazacağız?



Private Sub ShockwaveFlash1_OnReadyStateChange(ByVal newState As Long)

End Sub

kodları silin
bu kodu ekleyin

Private Sub UserForm_Activate()
ShockwaveFlash1.Play
End Sub

 

[bistroman]

çünkü dosyayı ağda paylaştırdım yine arkadaşlar açamadı, pencere içi beyaz görünüyor.....

 

[security]

dosyayı ekleme imkanınız varsa ekleyin düzenleyim isterseniz.
büyük ihmimal flash dosyanızı forma gömmediniz hata ondan.

 

[bistroman]

yok yine arkadaşlarda olmuyor...
ben movie kismına c:\a\şekil.swf şeklinde ekliyorum properties'den..
ve yine aynı tablodan embedmovie.true diyorum yine arkadaşlarda yüklemiyor.
Private Sub UserForm_Activate()
ShockwaveFlash1.Play
End Sub
yaptım yine OLMADIIIIIIIIII

 

[bistroman]

arkadaş flash penceresine (beyaz görünen alan) sağ tıklıyor about flash player 9 'u seçinde resmi adobe sitesine bağlanıp download sitesine yönlendiriyor???
bence activex ile alakalı bir olay? flash player mı yüklü değil diğer PC'lerde??? buraları bir kurcalamak lazım....yoksa embedmovie true yapıp play diyorum...buralaar dogruuuuuu

 

[security]

dosyanız sizde çalışıyormu peki sorun sadece diğer pc lerdemi?
ve adobe flash player pclerde yüklümü?
Ayrıca Dosyanız Özel Değilse Ekleyin Düzenleme yapalım.

 

[bistroman]

bende problem yok, başka pc'de çalışmıyor
ya bu kadar baş ağrıtacağını önceden bilseydim hiç emek harcamazdım şu hantal dili öğrenmeye!!!!!!!