Assistindo vídeo pelo Access
Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 5x no Cartão de Crédito.
Veja como comprar e saiba mais sobre o material oferecido, clicando aqui.
É fácil configurar o Access 2007/2010 para exibir vídeos, bastando para isso utilizar o controle ActiveX do Windows Media player.
Abra um formulário no modo estrutura e clique no botão ActiveX na guia design da ribbon.
Selecione da lista a opção Windows Media Player e clique em OK.
O quadro do Windows Media Player é carregado no formulário.
Dê dois cliques rápidos no quadro para alterar algumas das propriedades do ActiveX, se o desejar.
Carregar o vídeo pelo VBA é muito simples, basta informar o caminho da URL ao Activex. Você pode carregar vídeos locais ou de um site.
Observe o código abaixo, utilizado no exemplo que disponibilizo. No evento "Ao abrir" do formulário, defino o tamanho do quadro e chamo pela função que carrega o vídeo.
Faça o login aqui para ter acesso ao código.
Veja um dos vídeos, do meu site, sendo carregado no formulário:
Bom estudo!
Os dez artigos mais visitados
MontaRibbons v.7.0 - Assistente completo para criar ribbons no Access
Vídeo - Controle personalizado de Acesso de Usuários
Vídeo - Aprenda sobre filtragens
Vídeo - Segurança máxima, usando o OPEN
Uma ajuda para quem está começando um negócio ou um projeto
Integrando o Access com Servidor MySQL - Introdução
Desabilitando a faixa(ribbon) superior do Access
Vídeo - Programação de relatórios - Parte 1
Como carregar o seu menu sem que ele vá para lista de suplementos
Adquira o kit UsandoAccess e aprenda em alta velocidade
18 comentário(s) Allysson 28/08/2023 13:01:56 Olá Boa tarde, eu fiz uma listbox com todas as musicas que existe dentro da pasta, mas eu gostaria de fazer um loop que quando acabar de tocar a musica ja comecar outra na sequencia da listbox. alguem me ajuda com essa duvida! Henrique 27/05/2023 06:19:03 Avelino meu guru, tem como um vídeo dentro de um formulário ser exibido constantemente (looping), enquanto o formulário estiver aberto? João Paulo 16/03/2022 16:09:17 Avelino, Achei muito interessante e estava querendo adaptar na clinica da minha esposa, porém gostaria de ampliar a imagem não em tela cheia mas de modo que ocupe parte da tela onde colocarei propagandas. Aproveitarei a tela de chamada de espera de cliente de forma que as imagens ocupe em torno de 70% de imagem ficando apenas a lateral esquerda e a parte inferior para o chamado de cliente. BetoSoft 04/10/2021 06:38:32 Parabéns, Deus te ajuda Lisandro 11/07/2021 16:26:19 Boa tarde, estava querendo exibir os trailers dos filmes que possuo na minha coleção de filmes no acess. esse exemplo serve para fazer isso? por exemplo uma lista de filmes,clicava no nome do filme e ao lado exibia o trailer. Avelino Sampaio 23/05/2021 05:04:07 Simao, abra o pesquisador de objetos e investigue os comandos existentes, deste Active X. Na seção "tutorias" acesse o artigo "vídeo - como estudar com o pesquisador de objetos". Ensino como utilizar este incrível recurso do VBA. Sucesso! olá! paz e bem! 22/05/2021 13:48:56 Avelino obrigado pelo rápido retorno. Já apliquei essa propriedade agradeço, porém queria mesmo era o código vba, outra dúvida, como configurar para a resolução 1024x768. Obrigado Avelino Simaops. Avelino Sampaio 22/05/2021 05:43:26 Paz e bem, observe bem na imagem acima que no formulário de propriedades tem uma opção que vc marca para abrir em tela cheia. Dois cliques com o mouse na tela de exibição também abre em tela cheia. Sucesso! olá! paz e bem! 21/05/2021 19:04:58 Gostaria de saber qual o código para exibir o vídeo em tela cheia. Obrigado. Avelino Sampaio 04/03/2021 07:06:24 Hephraim, Atualize seu Office com ultimo pacote SP diponível. Para o 2007 é o Sp3 , para o Access 2010 é o Sp2 e para o 2013 é o Sp1 Ataulize também o seu WMP , caso esteja diponível. Observe se acontece com vídeos específicos ou se acontece de forma aleatória. Antes de fechar experimente limpar a URL Me!wmp.URL ="" Sucesso! Hephraim BF 01/03/2021 16:26:25 Muito show!!! Consegui adaptar no meu projeto, muito obrigado Avelino. Agora tenho uma pergunta porque às vezes depois que fecho a janela que exibe o vídeo aparece a mensagem de que o access parou de funcionar? Já fiz o tratamento de erro e tudo mas continua acontecendo isso. Desde já agradeço. Márcio Melo - RJ 11/12/2020 20:14:21 Assim como a dica do PDF, essa também é muito boa, podemos juntar ambas e oferecer o suporte necessário através do próprio programa, facilitando com que o usuário tenha o acesso ao vídeo que nós indicarmos, muito show... tenho aos pouco imprementando as dicas o obtendo ótimos resultados. Antonio Ozael 23/09/2020 10:44:34 Gostaria de mais detalhes sobre como fazer para associar o vídeo diferente para cada botão, onde esse vídeo seja mostrado na mesma posição (como está ne seu exemplo, porém não consegui fazer no meu exemplo. Funcionou o primeiro vídeo, colocando o caminho no meu computador (URL). Obrigado desde já. Zara 15/09/2020 07:00:08 Gostaria de saber como inserir um video a cada registro...tem como? Gilberto 13/09/2020 15:51:25 Grande Avelino, uma perguntinha. Como rodar um video do youtube da mesma forma que você fez em seu exemplo? Gostaria de rodar em uma janela como a sua Aguardo, obrigado!!!! Avelino Sampaio 08/08/2020 07:52:22 Eduardo, é possível sim mas para um novato acredito que vai ficar difícil montar este tipo de projeto. Acesse o link abaixo, que possui um projeto gratuito para vc estudar. (não conheço este projeto) http://www.svcsoftwarehouse.com/detalhes-aplic-c-login.php?codigo=0000000288 Bom estudo! eduardo Lima 08/08/2020 01:16:32 Ola. Sou novato e estou muito animado graças as suas dicas, confesso que fico atordoado com tanta informação. Acredito que vou fazer uma pergunta inédita... É possível criar uma janela formulário tipo vídeo fone? De forma que um usuário front-end possa comunicar com outro usuário front-end num ambiente de rede tipo pasta compartilhada, um MSN interno incorporado ao Access usando a webcam... abçs Eduardo Vieira Machado 09/01/2020 06:10:03 Olá Avelino, Qual controle ActiveX que não seja o Windows Media Player eu posso usar no Access 2010? O WMP não está disponível no Access 2010. Tenho um aplicativo que utilizava para reproduzir videos no Access 2007, mas agora não funciona mais quando o meu computador foi trocado com o Office 365 e o Access 2010. Meu código era este: Private Sub MultiExibeVideo() On Error Resume Next Dim sTermo, X As String Dim intCod, y As Integer Dim rs As DAO.Recordset Set rs = CurrentDb.OpenRecordset("Glossario", dbOpenDynaset) intCod = Forms!PesquisaCEDAE!txtCodPesquisa X = DLookup("Termo", "Glossario", "Código = " & intCod) Select Case X Case Is = "Hidrômetro*" Me!wmp1.URL = CurrentProject.Path & "\Videos\Entenda o funcionamento do hidrômetro da sua casa.mp4" ....................... |