Automation
63 files
-
Adobe Photoshop UDF
UDF for automating Adobe Photoshop software.
Features:
Creating, opening and saving documents Manipulating layer settings Applying effects to layers More features soon!
812 downloads
(0 reviews)0 comments
Updated
-
Network Adapters Info
By Trong
Network Adapter Info use WMI (Windows Management Instrumentation)
Features :
Show information network card. Easily copy information, for copy just click on the line want to copy. Notifications connection, connection loss. Supports exporting information to file (CSV/INI format). Run:
Export to file INI format: NetStatus.exe "PathFileOut.INI"
Export to file CSV format: NetStatus.exe "PathFileOut.CSV" CSV
Function:
Global Const $sNotAvailable = "N/A" Global Const $sBlankIP = "0.0.0.0" Global Const $sBlankMAC = "00:00:00:00:00:00" ;~ #include <Array.au3> ;~ _ArrayDisplay(_GetListAdaptersInfo(".")) Func _GetListAdaptersInfo($sComputer = ".") Local $Cols = 13, $strIndex, $objVAR, $objVARx, $zAdapter, $zAdapterName, $zSpeed, $zIndex, $zInterfaceIndex, $zGetIPType, $zAdapterStatus, $zIP, $zMAC, $zSubNetIP, $zGetwayIP, $zDNS1, $zGetwayMAC, $zDNS2 Local $aReturn[1][$Cols] = [[0, $Cols]] If $sComputer = Default Then $sComputer = @ComputerName Local $sListIndexInterfaceName = _ListIndexInterfaceName() Local $objWMI = ObjGet("winmgmts:\\" & $sComputer & "\root\cimv2") Local $objWQLx = $objWMI.ExecQuery("SELECT * FROM Win32_NetworkAdapter WHERE NetConnectionID != NULL", "WQL", 0x30) ;~ Local $objWQLx = $objWMI.ExecQuery('Select * From Win32_NetworkAdapter', "WQL", 0x30) If Not @error And IsObj($objWQLx) Then For $objVARx In $objWQLx $zAdapterName = $objVARx.NetConnectionID If (StringStripWS($zAdapterName, 8) = "") Then ContinueLoop $zSpeed = _ByteSuffixRound($objVARx.Speed) ; Vista+ If Int($zSpeed) <= 0 Then For $z = 0 To UBound($sListIndexInterfaceName) - 1 If $sListIndexInterfaceName[$z][1] = $zAdapterName Then $zSpeed = _ByteSuffixRound(InterfaceIndexSpeed($sListIndexInterfaceName[$z][0])) Next EndIf $zAdapterStatus = $objVARx.NetConnectionStatus Switch $zAdapterStatus Case 0, 3 $zAdapterStatus = "Disable" Case 1, 2 $zAdapterStatus = "Connected" Case $zAdapterStatus = 7 $zAdapterStatus = "unPlugged" Case Else $zAdapterStatus = $sNotAvailable EndSwitch $strIndex = $objVARx.Index Local $objWQL = $objWMI.ExecQuery('SELECT * FROM Win32_NetworkAdapterConfiguration WHERE Index=' & $strIndex, "WQL", 0x30) If Not @error And IsObj($objWQL) Then For $objVAR In $objWQL $zAdapter = $objVAR.Description $aReturn[0][0] += 1 $zIndex = $aReturn[0][0] ReDim $aReturn[$zIndex * 2][$aReturn[0][1]] $zInterfaceIndex = $objVAR.InterfaceIndex If Int($zInterfaceIndex) <= 0 Then For $z = 0 To UBound($sListIndexInterfaceName) - 1 If $sListIndexInterfaceName[$z][1] = $zAdapterName Then $zInterfaceIndex = $sListIndexInterfaceName[$z][0] Next EndIf $aReturn[$zIndex][0] = $zInterfaceIndex $aReturn[$zIndex][1] = $zAdapter $aReturn[$zIndex][2] = $zAdapterName $aReturn[$zIndex][3] = $zAdapterStatus $zGetIPType = $objVAR.DHCPEnabled If $zGetIPType Then $zGetIPType = "DHCP" Else $zGetIPType = "StaticIP" EndIf $aReturn[$zIndex][4] = $zGetIPType $zIP = $objVAR.IPAddress(0) If StringStripWS($zIP, 8) = "" Then $zIP = $sNotAvailable $aReturn[$zIndex][5] = $zIP $zSubNetIP = $objVAR.IPSubnet(0) If StringStripWS($zSubNetIP, 8) = "" Then $zSubNetIP = $sNotAvailable $aReturn[$zIndex][6] = $zSubNetIP $zMAC = $objVAR.MACAddress If StringStripWS($zMAC, 8) = "" Then $zMAC = $sNotAvailable $aReturn[$zIndex][7] = $zMAC $zGetwayIP = $objVAR.DefaultIPGateway(0) If StringStripWS($zGetwayIP, 8) = "" Then $zGetwayIP = $sNotAvailable $aReturn[$zIndex][8] = $zGetwayIP $zGetwayMAC = $sNotAvailable If $zGetwayIP <> $sNotAvailable Then $zGetwayMAC = _GetMACFromIP($zGetwayIP) $aReturn[$zIndex][9] = $zGetwayMAC $aReturn[$zIndex][10] = $sNotAvailable $aReturn[$zIndex][11] = $sNotAvailable If Number($zSpeed) = 0 Then $zSpeed = $sNotAvailable $aReturn[$zIndex][12] = $zSpeed Local $zDNS = $objVAR.DNSServerSearchOrder() If IsArray($zDNS) Then If (UBound($zDNS) - 1) > 0 Then $aReturn[$zIndex][10] = $zDNS[0] $aReturn[$zIndex][11] = $zDNS[1] Else $aReturn[$zIndex][10] = $zDNS[0] EndIf EndIf Next EndIf Next Return $aReturn EndIf Return SetError(1, 0, "") EndFunc ;==>_GetListAdaptersInfo Func _ListIndexInterfaceName() Local Const $tagIP_ADAPTER_ADDRESSES = "ulong Length;dword IfIndex;ptr Next;ptr AdapterName;ptr FirstUnicastAddress;" & "ptr FirstAnycastAddress;ptr FirstMulticastAddress;ptr FirstDnsServerAddress;ptr DnsSuffix;ptr Description;" & "ptr FriendlyName;byte PhysicalAddress[8];dword PhysicalAddressLength;dword Flags;dword Mtu;dword IfType;int OperStatus;" & "dword Ipv6IfIndex;dword ZoneIndices[16];ptr FirstPrefix;" & "uint64 TransmitLinkSpeed;uint64 ReceiveLinkSpeed;ptr FirstWinsServerAddress;ptr FirstGatewayAddress;" & "ulong Ipv4Metric;ulong Ipv6Metric;uint64 Luid;STRUCT;ptr Dhcpv4ServerSockAddr;int Dhcpv4ServerSockAddrLen;ENDSTRUCT;" & "ulong CompartmentId;STRUCT;ulong NetworkGuidData1;word NetworkGuidData2;word NetworkGuidData3;byte NetworkGuidData4[8];ENDSTRUCT;" & "int ConnectionType;int TunnelType;STRUCT;ptr Dhcpv6ServerSockAddr;int Dhcpv6ServerSockAddrLen;ENDSTRUCT;byte Dhcpv6ClientDuid[130];" & "ulong Dhcpv6ClientDuidLength;ulong Dhcpv6Iaid;ptr FirstDnsSuffix;" Local $aRet, $nBufSize, $stBuffer, $stIP_ADAPTER_ADDRESSES, $pIPAAStruct, $nIPAAStSize Local $pTemp, $nTemp, $nEntries, $aIndexEntries $aRet = DllCall("iphlpapi.dll", "ulong", "GetAdaptersAddresses", "ulong", 0, "ulong", 0x86, "ptr", 0, "ptr", 0, "ulong*", 0) If @error Then Return SetError(1, @error, "") If $aRet[0] Then If $aRet[0] <> 111 Or Not $aRet[5] Then Return SetError(2, $aRet[0], "") EndIf $nBufSize = $aRet[5] $stBuffer = DllStructCreate("int64;byte [" & $nBufSize & "];") $aRet = DllCall("iphlpapi.dll", "ulong", "GetAdaptersAddresses", "ulong", 0, "ulong", 0x86, "ptr", 0, "ptr", DllStructGetPtr($stBuffer), "ulong*", $nBufSize) If @error Then Return SetError(1, @error, "") If $aRet[0] Then Return SetError(2, $aRet[0], "") Dim $aIndexEntries[Floor($nBufSize / 72)][2] $nEntries = 0 $pIPAAStruct = DllStructGetPtr($stBuffer) While $pIPAAStruct <> 0 $stIP_ADAPTER_ADDRESSES = DllStructCreate($tagIP_ADAPTER_ADDRESSES, $pIPAAStruct) $nIPAAStSize = DllStructGetData($stIP_ADAPTER_ADDRESSES, "Length") $nTemp = DllStructGetData($stIP_ADAPTER_ADDRESSES, "OperStatus") If ($nTemp = 2 And Not False) Or DllStructGetData($stIP_ADAPTER_ADDRESSES, "IfType") = 24 Then Else $pTemp = DllStructGetData($stIP_ADAPTER_ADDRESSES, "FirstUnicastAddress") If $pTemp <> 0 Then $aIndexEntries[$nEntries][0] = DllStructGetData($stIP_ADAPTER_ADDRESSES, "IfIndex") $aIndexEntries[$nEntries][1] = _GetStringW_FromPtr(DllStructGetData($stIP_ADAPTER_ADDRESSES, "FriendlyName")) $nEntries += 1 EndIf EndIf $pIPAAStruct = DllStructGetData($stIP_ADAPTER_ADDRESSES, "Next") WEnd If $nEntries = 0 Then Return SetError(-1, 0, "") ReDim $aIndexEntries[$nEntries][2] Return SetExtended($nEntries, $aIndexEntries) EndFunc ;==>_ListIndexInterfaceName Func InterfaceIndexSpeed($IfIndex) Local $tBuffer, $pBuffer, $iResult, $iSpeed $tBuffer = DllStructCreate("wchar[256];dword[5];byte[8];dword[16];char[256]") $pBuffer = DllStructGetPtr($tBuffer) DllStructSetData($tBuffer, 2, $IfIndex, 1) $iResult = DllCall("iphlpapi.dll", "long", "GetIfEntry", "ptr", $pBuffer) If @error Then Return SetError(@error, @extended, 0) $iSpeed = DllStructGetData($tBuffer, 2, 4) ;~ $sDescr = DllStructGetData($tBuffer, 5) $tBuffer = 0 Return SetError($iResult[0], $iSpeed / 1000 / 1000, $iSpeed) EndFunc ;==>InterfaceIndexSpeed Func _GetStringW_FromPtr($pStr) If Not IsPtr($pStr) Or $pStr = 0 Then Return SetError(1, 0, "") Local $aRet = DllCall("kernel32.dll", "ptr", "lstrcpynW", "wstr", "", "ptr", $pStr, "int", 32767) If @error Or Not $aRet[0] Then Return SetError(@error, 0, "") Return $aRet[1] EndFunc ;==>_GetStringW_FromPtr Func _GetMACFromIP($rMAC) If ($rMAC = "") Or ($rMAC = $sNotAvailable) Then Return $sNotAvailable Local $sbMAC = DllStructCreate("byte[6]") Local $siMAC = DllStructCreate("int") DllStructSetData($siMAC, 1, 6) Local $rHexMAC = DllCall("Ws2_32.dll", "int", "inet_addr", "str", $rMAC) $rMAC = $rHexMAC[0] $rHexMAC = DllCall("iphlpapi.dll", "int", "SendARP", "int", $rMAC, "int", 0, "ptr", DllStructGetPtr($sbMAC), "ptr", DllStructGetPtr($siMAC)) $rMAC = "" For $i = 0 To 5 If $i Then $rMAC &= ":" $rMAC = $rMAC & Hex(DllStructGetData($sbMAC, 1, $i + 1), 2) Next If ($rMAC = "") Or ($rMAC = $sBlankMAC) Or ($rMAC = $sNotAvailable) Then Return $sNotAvailable Return $rMAC EndFunc ;==>_GetMACFromIP Func _ByteSuffixRound($iBytes, $iRound = 2) $iBytes = Number($iBytes) If $iBytes > 1000000000 Then Return $sNotAvailable Local $A, $aArray[5] = ["Bps", "Kbps", "Mbps", "Gbps", "Tbps"] While $iBytes > 999 $A += 1 If $A > 3 Then ExitLoop $iBytes /= 1000 WEnd Return Round($iBytes, $iRound) & " " & $aArray[$A] EndFunc ;==>_ByteSuffixRound ;==>CreateContentCSV
1,721 downloads
-
Attributes Tool
By Trong
Attributes Tool
Features :
USB Hidden Folder Fix: Show hidden files in USB and delete (.ink) files. Rename Unicode (Vietnamese to ASCII - Loại bỏ dấu Tiếng Việt ở tên tập tin và thư mục). Set timestamp for the files/folders. Quickly delete files/folders. |R|: cleanup junk file on computer. |H|: Hide HIDDEN files in Windows. |S|: Show HIDDEN files in Windows.
Use :
Select mode Drag and drop files/folder into program window Or press buttons and select files/folders. Or Run: AttributesTool.exe "AnyFilesPath.ext" "AnyFilesPath.ext" "AnyFilesPath.ext" (Using the previous configuration was selected!)
Run as Administrator and select Try Force to the best use!
Function:
#RequireAdmin Func _SetAttributes($sFileDirIN, $sAttribSet, $sRecurseDir = 1, $sForce = 1) If Not FileExists($sFileDirIN) Then Return SetError(1, 0, 0) $sAttribSet = StringStripWS($sAttribSet, 8) If $sAttribSet = "" Then Return SetError(2, 0, 0) If $sRecurseDir = 1 Then If StringInStr(FileGetAttrib($sFileDirIN), 'D') <> 1 Then $sRecurseDir = 0 EndIf Local $SetAttrib = FileSetAttrib($sFileDirIN, $sAttribSet, $sRecurseDir) If (@error Or $SetAttrib = 0) And $sForce = 1 Then _TakeOwnership($sFileDirIN) $SetAttrib = FileSetAttrib($sFileDirIN, $sAttribSet, $sRecurseDir) EndIf Return SetError($SetAttrib = 0, 0, $SetAttrib > 0) EndFunc ;==>_SetAttributes Func _TakeOwnership($xFile) If Not FileExists($xFile) Then Return SetError(1, 0, $xFile) If StringInStr(FileGetAttrib($xFile), 'D') <> 0 Then RunWait(@ComSpec & ' /c takeown /f "' & $xFile & '" /R /D Y', '', @SW_HIDE) RunWait(@ComSpec & ' /c Echo y|cacls "' & $xFile & '" /T /C /G Administrators:F', '', @SW_HIDE) RunWait(@ComSpec & ' /c icacls "' & $xFile & '" /grant Administrators:F /T /C /Q', '', @SW_HIDE) Return SetError(0, 0, 0) Else RunWait(@ComSpec & ' /c takeown /f "' & $xFile & '"', '', @SW_HIDE) RunWait(@ComSpec & ' /c Echo y|cacls "' & $xFile & '" /C /G Administrators:F', '', @SW_HIDE) RunWait(@ComSpec & ' /c icacls "' & $xFile & '" /grant Administrators:F /Q', '', @SW_HIDE) Return SetError(0, 0, 1) EndIf Return $xFile EndFunc ;==>_TakeOwnership Func _IsUSB($sDrive) Local $sIsUSB = 0, $sType = DriveGetType($sDrive, 3) If DriveGetType($sDrive, 1) = "Removable" Or $sType = "USB" Or $sType = "SD" Or $sType = "MMC" Then $sIsUSB = 1 Return $sIsUSB EndFunc ;==>_IsUSB Func _SplitPath($sFilePath, $sType = 0) Local $sDrive, $sDir, $sFileName, $sExtension, $sReturn Local $aArray = StringRegExp($sFilePath, "^\h*((?:\\\\\?\\)*(\\\\[^\?\/\\]+|[A-Za-z]:)?(.*[\/\\]\h*)?((?:[^\.\/\\]|(?(?=\.[^\/\\]*\.)\.))*)?([^\/\\]*))$", 1) If @error Then ReDim $aArray[5] $aArray[0] = $sFilePath EndIf $sDrive = $aArray[1] If StringLeft($aArray[2], 1) == "/" Then $sDir = StringRegExpReplace($aArray[2], "\h*[\/\\]+\h*", "\/") Else $sDir = StringRegExpReplace($aArray[2], "\h*[\/\\]+\h*", "\\") EndIf $aArray[2] = $sDir $sFileName = $aArray[3] $sExtension = $aArray[4] If $sType = 1 Then Return $sDrive If $sType = 2 Then Return $sDir If $sType = 3 Then Return $sFileName If $sType = 4 Then Return $sExtension If $sType = 5 Then Return $sFileName & $sExtension If $sType = 6 Then Return $sDrive & $sDir If $sType = 7 Then Return $sDrive & $sDir & $sFileName Return $aArray EndFunc ;==>_SplitPath
422 downloads
(0 reviews)0 comments
Updated
-
(0 reviews)
0 comments
Updated
-
Blender UDF (Experimental)
This is an experimental UDF for automating Blender 3D software using AutoIt. The package comes with a Python addon for Blender, allowing such automation and a simple example of how to use this UDF.
Enjoy!
836 downloads
-
JavaManagement.au3 UDF
By mLipok
This UDF is desinged to manage JAVA Settings and Environment. This UDF is NOT designed to interact with JAVA Applets
Support topic is here:
note: Oh, only now (27 minutes) I noticed that there is no AU3 file - now it is sorry.
376 downloads
(0 reviews)0 comments
Updated
-
(0 reviews)0 comments
Submitted
-
Auto-SignIn
By ur
Usage: Create a shortcut pointing to this file and pass arguments username and password to it in target location.
Auto-SignIn: When it is running in background it will pass credentials automatically to Windows Security Windows.Please check the forum mentioned for more details.
It will pass data to below type of window.
712 downloads
(0 reviews)0 comments
Updated
-
Opera Library
By MrCreatoR
Opera Browser Automation UDF Library!
32 (and more to go) adapted functions to manipulate the most common routines for Opera Browser!
Note: This UDF Library tested on Opera versions: 8.54-9.5, 10.63.3516, few critical functions tested also on 11.x-12.x.
Change Log:
v1.08 [21.Jun.2013]
Fixed issue with getting opera profile path (mostly related to _OperaGetMailDir).
v1.07 [04.Jun.2013]
+ Added _OperaGetDownloadsDir function.
+ Added _OperaGetSessionFiles function.
+ Added global $i_Opera_SearchAllDrives variable to allow profile dir detection on other drives. Usefull when installed more than one OS.
+ Added global $s_Opera_ProfileDir variable to specify custom profile dir (this variable should be empty if you need to use _OperaGetProfileDir).
Fixed few functions to work better with new Opera versions.
Fixed internal __Opera_GetOperaPageHandle function (used in public _OperaScreenCapture function).
v1.06 [12.Jul.2012]
Fixed _OperaGetDir function:
- To be compatible with x64 system.
- Changed/expanded parameters, now used $iFlag to determine the function behavior, see function header for more details.
_OperaIsRuning function renamed to _OperaIsRunning. Old function name still supported.
Renamed internal functions to __Opera_*.
v1.05 [08.Jul.2012]
Fixed _OperaGetTitle function, the title was incorrect if $sOpDir was specified and $iRet <> 2.
Fixed __Correct_Opera_Path internal function to replace back slashes (/).
v1.04 [26.Jun.2011]
Fixed following functions to be more compatible with Opera 11.x:
_OperaGetProfileDir
_OperaMultiUserModeIsOn
_OperaGetUserJSDir
__Correct_Opera_Path
Fixed major bugs with recognizing Opera Dir (if $sOpDir parameter is passed as wrong Opera dir path).
Fixed _OperaGetUserJSDir function (now working better with relative pathes).
Renamed and changed _Opera_Integration_Example function. Now it's considered active function and named _Opera_Integration_Module.
Changed _OperaSelectFolder function. Added new optional parameter $hParent.
Changed _OperaAddMenuItem and _OperaRemoveMenuItem functions. Added new optional parameter $iBackup.
Fixed _OperaAddMenuItem function. Encoding issues.
+ Added _OperaGetCacheDir function.
+ Added optional $iGetLastInstallPath parameter to _OperaGetDir function.
If this parameter is 1, then function will try to detect the last installed Opera path,
instead of the path that Opera.exe was last time launched from.
v1.03 [16.May.2011]
UDF renamed to Opera.au3.
Fixed _OperaScreenCapture function (now compatible with Opera 10.6, but still having an issue with capturing panels).
Fixed few major issues with getting preference file's pathes.
Fixed _OperaGetDir() function.
Fixed _OperaGetProfileDir() function (errors when getting profile dir on multiuser mode).
Changed _OperaFindDir function.
- Now the $sInitPath parameter can accept pathes (delimited with "|").
- Now -1 as second parameter ($iRetCount) tels to the function to return all found Opera dirs.
- Also the function now works faster.
+ Opera 10.6 support.
+ Added _OperaToggleMenuItemState function.
+ Added optional $sStandard_Name parameter to _OperaSetConfigFile function:
If this parameter is a string (default is -1), then it's used as standard file name
(instead of "standard_" & $sConfig_Prefix & ".ini").
v1.02 [03.Jul.2009]
Now compatible with AutoIt 3.3.0.0.
+ Opera 10 support.
+ Added _OperaGetBookmarksFile() function.
+ Added _OperaScreenCapture() function...
ATTENTION: supported only for v3.2.10.0 or higher, due to (lack of) callback support.
+ Added _OperaAddMenuItem()/_OperaRemoveMenuItem() function.
Fixed few function to read relative paths in opera prefs file.
v1.01 [5.Jan.2008]
Now compatible with AutoIt 3.2.10.0.
Variable names and spell corrections.
+ Added 2 more UDFs:
_OperaRestart()
_OperaMultiUserModeIsOn()
v1.0 [28.Dec.2007]
First Release..
11,724 downloads
(3 reviews)0 comments
Updated
-
IE.au3
By DaleHohm
Title: Internet Explorer Automation UDF Library for AutoIt3
Filename: IE.au3
Description: A collection of functions for creating, attaching to, reading from and manipulating Internet Explorer
Author: DaleHohm
Version: T3.0-0
Last Update: 9/3/12
Requirements: AutoIt3 3.3.9 or higher
This version is checked into the development stream for the next AutoIt beta release, but will work with the most recently released V3.3.9.x beta.
I am releasing it here so that it can get some testing now and help some people with some of the issues it fixes in the realm of COM error handling (and "the WEND error").
This file will be removed when it is included in a public beta release.
Dale
7,457 downloads
-
ADFunctions.Au3 -- Active Directory Functions
UDF Library containing functions for manipulating data in Active Directory / Exchange
13,429 downloads
(7 reviews)0 comments
Updated
-
Winamp Automation Library
By MrCreatoR
Name/Title: Winamp Automation Library (Winamp 2.x +).
Description:
34 Functions to handle Winamp Media Player (http://winamp.com).
This library written base on the SDK that provided at Wanamp's home page: http://www.winamp.com/development/sdk
Version: 1.3
Requirements: AutoIt 3.2.10.0 or higher, Winamp 2.x or higher.
Note: This UDF Library tested on Winamp v5.x.
2,112 downloads
(1 review)0 comments
Updated
-
AutoIt Menu for Opera Browser
By MrCreatoR
This menu is designed for easy/convenient access to the AutoIt language tools and AutoIt forums from Opera Browser.
Screenshots:
Main Menu [AutoIt Forum Expanded]
Tools Menu
Preferences Dialog ("Items Prefs" Tab)
Preferences Dialog ("Sel.Code Prefs" Tab)
Integration Dialog ("Main" Tab)
Integration Dialog ("Tools" Tab)
P.S
Read AutMenu_Readme.txt (in the archive) for more details.
* Source/Resources available here.
5,066 downloads
(2 reviews)0 comments
Updated