Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 07/25/2015 in all areas

  1. 28-7-2015: All downloads are currently unavailable due to Google blocking the access due to false positive virus warnings. 25-7-2015: Uploaded a new SciTE4AutoIt3.exe with mainly fixes, see details below. Enjoy, Jos Addition/Changes/Fixes in the current installer: -------------------------------------------------------------------------------------------------- 25-7-2015 *** SciTE v 3.5.4. (Jos)     Fixed regression for highlight.current.word.stoponspace not working after last merge.     Fixed regression in AutoItAutoComplete.lua.     Implemented a separate lexerstyle (style.au3.16) for the UserUDF's table, an lexer feature available since 2009. *** Updated AutoIt3Wrapper v15.725.1310.0 (Jos)     - 15.503.1200.1: Removed obsolete Debug console messages.     - 15.503.1200.2: Updated dropdownlist with scrollbar. (argumentum)     - 15.503.1200.3: Added logic to ensure we have the proper SciTE Director handle in case of multiple instances.     - 15.503.1200.4: updated the GUI with the proper available options for au3stripper. *** Updated Au3Stripper v15.725.1310.0 (Jos)     - 15.503.1200.1: Added check for File encoding for include files and strip the BOM which was leading to an invalid merged script.     - 15.503.1200.2: Updated some logic for /SV /SF /RM and removed /SOI as that was broken beyond repair     - 15.503.1200.3: Fixed regression with Commentbloxks leaving the #CE causing an au3check warning. *** Updated SciTEConfig v15.725.1310.0 (Jos)     - 15.503.1200.1: Implemented the User UDF separate Lexing style already available since 2009 . *** Updated abbrev.properties. (mLipok)     - Cleaned up and added some abbreviations and updated the documentation in the helpfile. -------------------------------------------------------------------------------------------------- [/code]==> ScitillaHistory page containing all SciTE-Scintilla updates. ==> Visit the SciTE4AutoIt3 Download page for the latest versions ==> Check the newly formatted online documentation for an overview of all extra's you get with this installer.
    6 points
  2. I was needing to check all my connected networks and check if there is internet connection. so I wrote this function. #include <MsgBoxConstants.au3> #include <Array.au3> Global $NLM_ENUM_NETWORK_CONNECTED = 0x01 ;~ Global $NLM_ENUM_NETWORK_DISCONNECTED = 0x02 ;~ Global $NLM_ENUM_NETWORK_ALL = 0x03 Global Enum $eName, $eIsConectedtoInternet Local $aNetworks = GetNetWorks() If @extended Then For $i = 0 To @extended - 1 ConsoleWrite("NetWork Name: " & $aNetworks[$i][$eName] & "| IsConectedToInternet: " & $aNetworks[$i][$eIsConectedtoInternet] & @CRLF) Next _ArrayDisplay($aNetworks, "NetWork Name|NetWork Is Conected to Internet") EndIf ;~ Success: Return an 2DArray[][] and sets @extended Ubound of Array ;~ Failure: Return 0 and set @extended 0 Func GetNetWorks($NLM_ENUM_NETWORK = $NLM_ENUM_NETWORK_CONNECTED) Local $aNetworks[0][2] ;[n][0]NetWorks Name|[n][1]isConnectedtoInternet Local $INetworks = 0 Local $ReDim = 0 Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") Local $oINetworkListManager = ObjCreate("{DCB00C01-570F-4A9B-8D69-199FDBA5723B}") ;Create INetworkListManager Object by CLSID If Not IsObj($oINetworkListManager) Then Return 0 $INetworks = $oINetworkListManager.GetNetworks($NLM_ENUM_NETWORK) If Not IsObj($INetworks) Then Return 0 For $INetwork In $INetworks $ReDim = UBound($aNetworks, 1) + 1 ReDim $aNetworks[$ReDim][2] $aNetworks[$ReDim - 1][0] = $INetwork.GetName $aNetworks[$ReDim - 1][1] = $INetwork.isConnectedtoInternet Next $oINetworkListManager = 0 ;Free Return SetExtended($ReDim, $aNetworks) EndFunc ;==>GetNetWorks ; User's COM error function. Will be called if COM error occurs Func _ErrFunc($oError) ; Do anything here. ConsoleWrite(@ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode) & @CRLF & @CRLF) EndFunc ;==>_ErrFunc Saludos
    2 points
  3. Hello. I've been recently experimenting with _WinAPI_SetWinEventHook and _WinAPI_RegisterShellHookWindow functions and this little script is the result of the experiment. It allows you to change window opening animations (still working on that), menu popup animations and some window behaviors (including wobbly effect while moving). Screenshots: Download: AutoItFX.zip
    1 point
  4. So I think it's time to publish this little tutorial I have made on using DllCall() and DllStructs. It's not near completion but I think it's a good start at least This tutorial is mostly aimed for people who have never used DllCall() before or have very limited knowledge about it. In the future I will update it with more advanced topics so more advanced users can make use of it too. Well here goes. Dealing_with_Dll.pdf Previous downloads: 31 Suggestions, language corrections and errors in the tutorial is of course welcome.
    1 point
  5. This is an AutoIt UDF to help you upload images using Imgur API. Simple example: #NoTrayIcon #include 'Imgur.au3' Global $fp = FileOpenDialog('Open', @ScriptDir, 'Images (*.jpg;*.gif;*.png;*.bmp)', 1) If Not @error Then Local $image_url = _imgur_upload($fp) If @error Then MsgBox(16 + 262144, 'Error', 'Upload image failed!') Else ; Open with default browser ShellExecute($image_url) EndIf EndIfDownload: Imgur UDF by Juno_okyo.zip Github: https://github.com/J2TeaM/AutoIt-Imgur-UDF ----- In the UDF, I have used Base64 and JSON UDF by @Ward. Thank you!
    1 point
  6. TheDcoder

    Magic Number Calculator

    The long awaited! Magic Number CalculatorMagic Number Calculator is a useful tool if you have code which does not uses constants but instead use magic numbers to specify Styles & ExStyles... Its Features: Small & Compact Standalone exeutableAutomatically generates the Corrected function lineMade for the lazy, Press the "Press the Paste Button", "Press the Calculate Button", Wait, "Press the Copy Button" & Done!Fast CalculationsThe Unlicensed Open Source >>> Links <<< Source & Version Archive Bug Submission & Bug Tracker >>>Download<<< https://www.autoitscript.com/forum/files/file/352-magic-number-calculator/ Please Report Bugs & Request Features in the Bug Submission form! It will help me keep track of all requests! P.S If you are not able to view the sources & version archive, please try disabling your adblocker
    1 point
  7. Or _StringBetween... #include <String.au3> $before = 'ue="1001372">27/07 05:00<' $after = _StringBetween($before, ">", "<")[0] MsgBox(262144, "Result", $before & @CRLF & $after, 0)
    1 point
  8. trancexx

    how work dll with AutoIt

    In layman's terms, you can "store" as much data as you want in dll. Dll uses chunk of memory space of your process, therefore maximum lifetime of some data depends on lifetime of your process. Unloading the dll frees reserved chunk and renders used memory invalid. You can unload a dll at any time, and if you don't do that AutoIt will do it for you by default before it terminates. You can not store variable. You can store data that variable holds.
    1 point
  9. MyDream

    AutoCamo - 98.18b

    souldjer777, theres actually more method/software than you think, theres also obsidium protector, artan protector, private exe protector/etc...and theres also crypter tools too. How good they are at protecting your program/source code I'm not sure. You'll have to ask(email) them one by one. BTW, I dont know what you mean by decamo? You could always combine more than one protection but the main problem is false alarm. If thats not a problem for you, then just mix and match and test out. PS: I can't seem to remove the bold text in the first sentence, sorry.
    1 point
  10. $before = 'ue="1001372">27/07 05:00<' $after = StringSplit($before, "<>")[2] MsgBox(262144, "Result", $before & @CRLF & $after, 0)
    1 point
  11. for sure some regex guru will provide a magic solution, anyway in the while this "workaround" could be quick a way. $sString = 'ue="1001372">27/07 05:00<' ; ConsoleWrite(StringReplace($sString, StringLeft($sString, StringInStr($sString, ">")), "") & @CRLF)edit: or this if the "u" char is not always at first position: $sString = 'ue="1001372">27/07 05:00<' ; ConsoleWrite(StringReplace($sString, StringMid($sString, StringInStr($sString, "u"), StringInStr($sString, ">")), "") & @CRLF)
    1 point
  12. or also like this: $sString = 'ue="1001372">27/07 05:00<' ; $sOutput = StringLeft(StringRight($sString, 12), 11) ; MsgBox(0, 0, "Input:" & @TAB & $sString & @CRLF & "Out :" & @TAB & $sOutput)
    1 point
  13. You can try RegExp $var = 'ue="1001372">27/07 05:00<' MsgBox(0,'',Trim($var)) Func Trim($var) Local $match = StringRegExp($var,'(.*?)(\d{2})(\/)(\d{2})(\s)(\d{2})(:)(\d{2})',1) Local $result = '' If IsArray($match) Then For $i = 1 To UBound($match)-1 $result &= $match[$i] Next EndIf Return $result EndFunc
    1 point
  14. From the SciTE4AutoIt3 helpfile (AUtoIt3Wrapper: #AutoIt3Wrapper_Res_Icon_Add=C:\Program Files (x86)\AutoIt3\Icons\au3.ico #AutoIt3Wrapper_Res_Icon_Add=C:\Program Files (x86)\AutoIt3\Icons\au3script_v10.ico #AutoIt3Wrapper_Res_Icon_Add=C:\Program Files (x86)\AutoIt3\Icons\au3script_v9.ico #AutoIt3Wrapper_Res_Icon_Add=C:\Program Files (x86)\AutoIt3\Icons\filetype-blank.ico #include <ButtonConstants.au3> ; Create the GUI $hGUI = GUICreate("Demo icon resources") $cButton = GUICtrlCreateButton("", 10, 10, 40, 40, $BS_ICON) $cLabel = GUICtrlCreateLabel("", 70, 25, 200, 20) GUISetState(@SW_SHOW, $hGUI) ; Now run through the added icons in the resource table For $x = 201 To 204 ; Change the tray icon $rc1 = TraySetIcon(@ScriptFullPath, $x) ; Change the icon in the button $rc2 = GUICtrlSetImage($cButton, @ScriptFullPath, $x) GUICtrlSetData($cLabel, "Icon Name: " & $x) TrayTip("Added icon: " & $x, "TraySetIcon rc: " & $rc1 & @CRLF & "GUICtrlSetImage rc: " & $rc2, 3) ; Allow time for icon to be seen Sleep(5000) Next ; Delete the GUI GUIDelete($hGUI) Compile it and run the compiled exe. Jos
    1 point
  15. 1 point
  16. Jon

    Forum Upgrade Status

    Added: Fixed animation that got lost on:
    1 point
  17. Like I just posted in this thread. This thread is a train wreck
    1 point
  18. kylomas

    _FileReadToArray

    TrickyDeath, See _FileReadToArray in the Help file. A small example... #include <array.au3> #include <file.au3> ; create and populate test array local $aTest[10][5] for $i = 0 to ubound($aTest) - 1 for $j = 0 to ubound($aTest,2) - 1 $aTest[$i][$j] = 'Row ' & stringformat('%03i',$i) & ' Col ' & stringformat('%03i',$j) Next Next ; display the array _arraydisplay($aTest) ; write the array to a file _filewritefromarray(@scriptdir & '\test.txt',$aTest) ; display the file using the default program for the .TXT extention ;shellexecute(@scriptdir & '\test.txt') ; declare new array and read file to it local $aTest2 _FileReadToArray(@scriptdir & '\test.txt',$aTest2, $FRTA_NOCOUNT, '|') ; display the new array _arraydisplay($aTest2) kylomas edit: The 4TH parameter of _FileReadToArray is how you tell the function what character(s) separates the columns.
    1 point
  19. The source code is very clean. So, if you want, you can convert to WinHttp by yourself, it is open source. Currently, it has simple as possible.
    1 point
×
×
  • Create New...