EXIBIR VIDEO DO YOTUBE EM MINHA TELA

SOUZA 17/02/2014 11:28:04
#434903
ola, pessoal estou querendo colocar uma tela para os usuarios visualizarem determinados videos que coloco no youtube.
procurei alguma coisa com os componentes WebBrowser1 e MSWebDVD1, ma nada de dar certo.

algum tem alguma ideia de como funciona para eles poderem abrir o video?
MARCELO.TREZE 17/02/2014 15:01:25
#434909 Resposta escolhida
use um componente shokwave flash

vá em project/component e selecione shockwave flash.

coloque o componente no seu form, acrescente também um textbox, e um command button

bom eu percebi que para funcionar vc tem que colocar o caminho do arquivo que é diferente do link do you tube então fiz uma pequena conversão e funcionou, basta você copiar o endereço do video e colar no textbox, depois clicar no command button, veja :

coloque no button


Dim Caminho As String
Caminho = Replace(Text1.Text, [Ô]watch?v=[Ô], [Ô]v/[Ô]) & [Ô]?version=3[Ô]
ShockwaveFlash1.LoadMovie 0, Caminho
ShockwaveFlash1.Play


bom com os poucos testes que fiz aqui funcionou que é uma maravilha
SOUZA 17/02/2014 18:40:02
#434927
Marcelo ta funcionando blz mas quando fui tentar salvar ele deu este erro!
MARCELO.TREZE 17/02/2014 18:47:16
#434929
como assim salvar?
SOUZA 17/02/2014 19:09:13
#434931
Marcelo pelo que vi o vb6 tem problema se estiver instalado na maquina um flash maior que o 8 estou desinstalando para fazer um teste. e salvando e salvando a aplicação em uma pasta ou seja o projeto!
KERPLUNK 17/02/2014 19:32:25
#434933
O correto mesmo, seria usar a API do youtube e esta classe opcional, que permite baixar o vídeo como FLV.
SOUZA 17/02/2014 20:43:39
#434934
é realmente nao funciona com o flash 8 do vb6 ai dano!
MARCELO.TREZE 17/02/2014 21:27:51
#434939
o que vc precisa afinal é fazer o download do video
SOUZA 18/02/2014 14:22:51
#434959
Oi marcelo deu certo eu apenas mudei umas coisinhas hehehe ja funciou e era so exibi o video ok
Tópico encerrado , respostas não são mais permitidas
Voltar