[2 days left] What’s wrong with your cloud strategy? Learn why multicloud solutions matter with Nimble Storage.Register Now

x
?
Solved

Embed several Windows Media Player controls in one Word doc

Posted on 2009-07-08
1
Medium Priority
?
650 Views
Last Modified: 2012-05-07
How must I modify the attached code to make it work for 2 embedded players? I think the players must be assigned names to which the code can refer but I don't know if "WindowsMediaPlayer1" may be renamed... Perhaps with a tag or a label?

Penelope
Private Sub Document_Open()
 
Dim strName As String
 
strName = strPATHNAME & "all.wmv"  'your file name
 
WindowsMediaPlayer1.windowlessVideo = True
WindowsMediaPlayer1.settings.autoStart = False   'stop it from automatically starting on load
 
WindowsMediaPlayer1.URL = strName   'add the path to your file
WindowsMediaPlayer1.settings.volume = 100      'here you can change initial volume
WindowsMediaPlayer1.settings.setMode "loop", False     'stop it from looping
 
End Sub

Open in new window

0
Comment
Question by:penelope112358
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 

Accepted Solution

by:
penelope112358 earned 0 total points
ID: 24802520
"WindowsMediaPlayer2" will be the default name of the next Media Player Control. It can be changed in the controls properties.  

Penelope
Private Sub Document_Open()
 
Dim strName As String
 
strName = "C:\Delme\clock.avi"  'your file name
 
WindowsMediaPlayer1.windowlessVideo = True
WindowsMediaPlayer1.settings.autoStart = False   'stop it from automatically starting on load
 
WindowsMediaPlayer1.URL = strName   'add the path to your file
WindowsMediaPlayer1.settings.volume = 100      'here you can change initial volume
WindowsMediaPlayer1.settings.setMode "loop", True     'make it loop
 
 
 
 
 
strName = "C:\Delme\clock.avi"  'your file name
 
WindowsMediaPlayer2.windowlessVideo = True
WindowsMediaPlayer2.settings.autoStart = False   'stop it from automatically starting on load
 
WindowsMediaPlayer2.URL = strName   'add the path to your file
WindowsMediaPlayer2.settings.volume = 100      'here you can change initial volume
WindowsMediaPlayer2.settings.setMode "loop", True     'make it loop
 
 
 
 
End Sub

Open in new window

0

Featured Post

New feature and membership benefit!

New feature! Upgrade and increase expert visibility of your issues with Priority Questions.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I spend far too much time on the web keeping up with the news: politics, the environment, computer stuff, the Experts Exchange. It's never-ending. But many of the most informative web pages are overwhelmed with noise: scrolling banners, flashing tex…
Several part series to implement Internet Explorer 11 Enterprise Mode
This Micro Tutorial will demonstrate how to add subdomains to your content reports. This can be very importing in having a site with multiple subdomains.
Want to learn how to record your desktop screen without having to use an outside camera. Click on this video and learn how to use the cool google extension called "Screencastify"! Step 1: Open a new google tab Step 2: Go to the left hand upper corn…
Suggested Courses

656 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question