Advertisement
Guest User

Bulk download ANU Press

a guest
May 31st, 2022
278
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. $url1 = "https://press.anu.edu.au/publications?sort=score&p="
  2. $url2 = 'https://press.anu.edu.au'
  3.  
  4. for($i=0; $i -lt 102;$i++){
  5.  
  6. $page = Invoke-WebRequest -Uri $url1+$i
  7.  
  8. $links = @()
  9. $links += $page.Links | Where-Object outerHTML -Like "*Download for free*" | Select-Object href
  10.  
  11. foreach ($pdf in $links)
  12. {
  13. $url3 = $url2+$pdf.href
  14.     $dload_page = Invoke-WebRequest -Uri $url3
  15.     $dlink = ($dload_page.Links | Where-Object outerHTML -Like "*.pdf*" | Where-Object innerHTML -Like PDF*).href
  16.     $title = $dload_page.ParsedHtml.nameProp
  17.     $filename = $title+".pdf"
  18.     Invoke-WebRequest -Uri $dlink -OutFile "$filename"
  19. }
  20. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement