Database Search

TechHome

• Activate IE Tab Via URL
• Detect Version of Javascript
• Get DocumentMode of IE
• Get Price of Ebay Item
• Hotmail Login
• Internet Explorer Refresh Current Instance
• List Movies in Netflix Queue
• Quickly display HTML text as HTML
• Retrieve Date and Time From Time Server Webpage
• Search Craigslist
• Select Option from Drop Down List Box
• Selecting a Tab on a Webpage

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

List Movies in Netflix Queue

 Keywords:  Netflix Movie List DVD Watch Now Queue GetElementsByTagName Class Name mdpLink

;List Movies in my Netflix Queue

; DVD Queue
url = 'http://movies.netflix.com/Queue?qtype=DD'
output = 'd:\temp\Netflix_Dvd.txt'

; Instant Watch Queue
;url = 'http://movies.netflix.com/Queue?qtype=ED'
;output = 'd:\temp\Netflix_WatchNow.txt'

msie = ObjectCreate("InternetExplorer.Application")
msie.addressbar = @FALSE
msie.statusbar = @FALSE
msie.menubar = @FALSE
msie.toolbar = @FALSE
msie.visible = @TRUE
msie.navigate(url)
While msie.busy || msie.readystate <> 4
   TimeDelay(0.5)
EndWhile

classname = 'mdpLink' ; All movie links have this classname
movielist = ''
AnchorCollection = msie.document.GetElementsByTagName("A")
ForEach Anchor In AnchorCollection
   inner = Anchor.innerText
   href =  Anchor.href
   If Anchor.classname==classname
      If movielist == '' Then movielist=inner
      Else movielist=movielist:@CRLF:inner
   EndIf
Next
Pause('Movie List',movielist)
FilePut( output, movielist )
msie.quit
msie = 0
Message("All","Done")
Exit

Article ID:   W18142

Filename:   List Movies in Netflix Queue.txt

File Created: 2011:09:28:08:53:04

Last Updated: 2011:09:28:08:53:04