swatsapkraz Posted July 12, 2017 Posted July 12, 2017 (edited) First script here. Thanks for taking the time. I want to download a file from my dropbox or other cloud file host and I want autoit to read the file and proceed. Here are the references I've gone through, it's just I'm not familiar yet with autoit so I'm looking for advice:https://www.autoitscript.com/autoit3/docs/functions/InetGet.htm https://www.autoitscript.com/autoit3/docs/functions/FileRead.htm How would I start out downloading a text file from dropbox and if in the file there is a 1 then it will proceed with the rest of the script if there is a 0 or if the file cannot be downloaded I want it to just end. Thank you for taking the time to read this and I apologize in advance if this seems very trivial for some but this is my first script and I'm hoping this is the correct place to ask this question. Edited July 12, 2017 by swatsapkraz
Neutro Posted July 12, 2017 Posted July 12, 2017 (edited) Hello swatsapkraz, What you want to do can be translated to search for "1" in the file and proceed if found, otherwise do nothing (searching for 0 is not needed if 1 is not found). I created 2 dropbox links, the first one links to a file which contains 1 and the other do not: https://www.dropbox.com/s/c27k3gv5oanhjvc/file_to_proceed.txt?dl=1 https://www.dropbox.com/s/g76mnemzg2lai4z/file_to_NOT_proceed.txt?dl=1 Use the following code to download the above files (change $file_url with the link you want to test) and check if they need to be proceeded or not: #include <File.au3> $file_url = "https://www.dropbox.com/s/g76mnemzg2lai4z/file_to_NOT_proceed.txt?dl=1" ;downloading the file $download_result = InetGet($file_url, @scriptdir & "\downloaded_file.txt", 3) if $download_result <> 0 Then ;if the download worked ;checking if there is 1 or 0 inside the file $file_content = "" _FileReadToArray(@scriptdir & "\downloaded_file.txt", $file_content) if IsArray($file_content) then ;if the file is not empty we search inside for 1 $search_for_number_one = _ArraySearch($file_content, "1", "", "", "", 1) if $search_for_number_one <> -1 then ; the number 1 has been found inside the file so it must be proceeded msgbox("","","file contains 1 and must be proceeded") else msgbox("","","file does NOT contain 1 and must NOT be proceeded") EndIf EndIf endif Enjoy Edited July 12, 2017 by Neutro swatsapkraz 1 Identify active network connections and change DNS server - Easily export Windows network settings Clean temporary files from Windows users profiles directories - List Active Directory Groups members Export content of an Outlook mailbox to a PST file - File patch manager - IRC chat connect example Thanks again for your help Water!
swatsapkraz Posted July 12, 2017 Author Posted July 12, 2017 Very nice. Thank you, I did try it and it works flawlessly.
Danyfirex Posted July 12, 2017 Posted July 12, 2017 @Neutro Try to use some best coding practices. Saludos Danysys.com AutoIt... UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut
Trong Posted July 12, 2017 Posted July 12, 2017 (edited) 34 minutes ago, Danyfirex said: @Neutro Try to use some best coding practices. Like this ?: Global $inetFile = 'https://www.dropbox.com/s/c27k3gv5oanhjvc/file_to_proceed.txt?dl=1' Global $localFile = @ScriptDir & "\file_to_proceed.txt" ConsoleWrite("Download File: " & $inetFile & @CRLF) ConsoleWrite("Save to: " & $localFile & @CRLF) Global $dlResult = InetGet($inetFile, $localFile, 3) ? "OK" : "Failed" ; Download file Global $iError = @error, $iKey = "1" ConsoleWrite("Download result: " & ($dlResult) & " - Error=" & $iError & @CRLF) If ($dlResult <> "OK") Then Exit MsgBox(48, @ScriptName, "Download file Error: " & $iError & @CRLF & "Link: " & $inetFile) Global $sFileContent = FileRead($localFile) ;read file to var If StringInStr($sFileContent, $iKey) Then ; check key MsgBox(32, @ScriptName, "OK - Do somethink here") ; OK Else MsgBox(48, @ScriptName, "ERROR - " & $iKey & " is not found") EndIf Saludos Edited July 12, 2017 by Trong Enjoy my work? Buy me a 🍻 or tip via ❤️ PayPal
Danyfirex Posted July 12, 2017 Posted July 12, 2017 @Trong Nop. Like this: https://www.autoitscript.com/wiki/Best_coding_practices Saludos Trong 1 Danysys.com AutoIt... UDFs: VirusTotal API 2.0 UDF - libZPlay UDF - Apps: Guitar Tab Tester - VirusTotal Hash Checker Examples: Text-to-Speech ISpVoice Interface - Get installed applications - Enable/Disable Network connection PrintHookProc - WINTRUST - Mute Microphone Level - Get Connected NetWorks - Create NetWork Connection ShortCut
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