Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

*_Charles Potter_*

Youtube

Recommended Posts

Ahe cara vlw, mas ja consegui uma solução:

 

on error resume next

 

url = "http://gdata.youtube.com/feeds/api/videos/" & request("link")

 

Set objXML = Server.CreateObject("msxml2.DOMDocument.3.0")

objXML.async = false

objXML.setProperty "ServerHTTPRequest", True

 

objXML.validateOnParse =false' true

 

objXML.preserveWhiteSpace = false

 

blnLoaded = objXML.Load(url)

If Not blnLoaded Then

Response.write "Nenhum notícia na fonte!"

Else

set media = objXML.getElementsByTagName("media:group")

 

For Each media1 In media

For Each media2 In media1.childNodes

 

Select case media2.nodeName

 

case "media:title"

response.Write( media2.firstChild.nodevalue & "######")

case "media:description"

response.Write( media2.firstChild.nodevalue & "######")

end select

 

Next

Next

 

 

End If

Compartilhar este post


Link para o post
Compartilhar em outros sites

pq o kra tava pedindo uma solução em PHP...

 

se ele botar isso numa pagina PHP obviamente não vai funcionar...

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.