slipsystem Posted July 2, 2013 Share Posted July 2, 2013 Heres a script that I wrote as an alternative to inetget. I noticed that you are not able to pause a download or see how far it is for this you need to have free download manager installed. Thanks to Dedcase for the help. expandcollapse popup#include <IE.au3> $INIFile = "LinkScanner.ini" $InpLink = InputBox("Link Scanner","Paste URL Here") $InpExtention = InputBox("Link Scanner","type the extention") $Number = StringLen($InpExtention) $InstallationPath = IniRead($INIFile,"Path","Directory","Error") $DLManager = IniRead($INIFile,"Path","DownloadManager","Error")&" " $oIE = _IECreate($InpLink) $oLinks = _IELinkGetCollection($oIE) $Download = '' DirCreate("C:\Downloads") For $oLink In $oLinks If StringRight($oLink.href,$Number) = $InpExtention Then $Download &= $oLink.href & @CR $sLink = FileRead('C:\Downloads\downloaded.txt') If StringInStr($sLink, $Download) Then ContinueLoop RunWait ($DLManager&""""&$Download&"""") FileWrite('C:\Downloads\downloaded.txt', $Download & @CRLF) Next If FileExists($INIFile) = 0 Then If FileExists("C:\Program Files\Free Download Manager\fdm.exe") Then $INIDLDMan = "C:\Program Files\Free Download Manager\fdm.exe" Else $INIDLDMan = InputBox("Link Scanner","OMG... Where Is Free Download Manager") EndIf IniWrite ( $INIFile, "Path","Directory",@ScriptDir&"\") IniWrite ( $INIFile, "Path","DownloadManager", $INIDLDMan & " -fs" ) EndIf Link to comment Share on other sites More sharing options...
spudw2k Posted July 3, 2013 Share Posted July 3, 2013 (edited) Any particular reason you avoided InetGet? I'd argue it's preferable as it doesn't require additional software to be on the client machine. Here is a shamelessly self-promoted example of a script similar to yours which uses InetGet and provides download status. edit: it is far from robust and doesn't have error handling, just FYI also doesn't have pause capability, ahem. Edited July 4, 2013 by spudw2k Spoiler Things I've Made: Always On Top Tool ◊ AU History ◊ Deck of Cards ◊ HideIt ◊ ICU ◊ Icon Freezer ◊ Ipod Ejector ◊ Junos Configuration Explorer ◊ Link Downloader ◊ MD5 Folder Enumerator ◊ PassGen ◊ Ping Tool ◊ Quick NIC ◊ Read OCR ◊ RemoteIT ◊ SchTasksGui ◊ SpyCam ◊ System Scan Report Tool ◊ System UpTime ◊ Transparency Machine ◊ VMWare ESX BuilderMisc Code Snippets: ADODB Example ◊ CheckHover ◊ Detect SafeMode ◊ DynEnumArray ◊ GetNetStatData ◊ HashArray ◊ IsBetweenDates ◊ Local Admins ◊ Make Choice ◊ Recursive File List ◊ Remove Sizebox Style ◊ Retrieve PNPDeviceID ◊ Retreive SysListView32 Contents ◊ Set IE Homepage ◊ Tickle Expired Password ◊ Transpose ArrayProjects: Drive Space Usage GUI ◊ LEDkIT ◊ Plasma_kIt ◊ Scan Engine Builder ◊ SpeeDBurner ◊ SubnetCalcCool Stuff: AutoItObject UDF ◊ Extract Icon From Proc ◊ GuiCtrlFontRotate ◊ Hex Edit Funcs ◊ Run binary ◊ Service_UDF Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now