Расширение стандартной AutoIt библиотеки WinAPI.au3

; Author: sforce5
Func _shlwapi_PathIsURLW($sURL)
	Return DllCall("shlwapi.dll", "int", "PathIsURLW", "wstr", $sURL)
EndFunc

; Author: sforce5
Func _shlwapi_PathIsNetworkPathW($sPath)
	$ret = DllCall("shlwapi.dll", "int", "PathIsNetworkPathW", "wstr", $sPath)
	Return $ret[0]
EndFunc

; Name...........: _WinAPI_SetConsoleTextAttribute
; Description ...: Changes the text and/or background color of text in the Windows console.
; Syntax.........: _WinAPI_SetConsoleTextAttribute($hConsole, $iColor, $hDLL = "Kernel32.dll")
; Parameters ....: $hConsole    - Handle to the console screen buffer
;                  $iColor      - Color style to apply to the console.
;                  $hDLL        - Handle to the DLL to call. (Leave blank to open Kernel32.dll each call)
; Return values .: Success      - True
;                  Failure      - False
; Author ........: Ken Piper (Kealper)
; URL ............: http://www.autoitscript.com/forum/index.php?showtopic=110218
Func _WinAPI_SetConsoleTextAttribute($hConsole, $iColor)
    $ret = DllCall("Kernel32.dll", "BOOL", "SetConsoleTextAttribute", "HANDLE", $hConsole, "WORD", $iColor)
    If @error Then Return SetError(@error, @extended, False)
    Return $ret[0]
EndFunc

#Include <WinAPIEx.au3>

$hKey = _WinAPI_RegConnectRegistry('\\Vasya', $HKEY_LOCAL_MACHINE)
If @error Then
	MsgBox(16, 'Error', 'Error code: ' & @extended)
	Exit
EndIf
...
_WinAPI_RegCloseKey($hKey)

Func _WinAPI_RegConnectRegistry($sMachineName, $hKey)

	Local $Ret = DllCall('advapi32.dll', 'long', 'RegConnectRegistryW', 'wstr', $sMachineName, 'ulong_ptr', $hKey, 'ulong_ptr*', 0)

	If @error Then
		Return SetError(1, 0, 0)
	Else
		If $Ret[0] Then
			Return SetError(1, $Ret[0], 0)
		EndIf
	EndIf
	Return $Ret[3]
EndFunc   ;==>_WinAPI_RegConnectRegistry