#include Const $SV_TYPE_DOMAIN_ENUM = 0x80000000 Dim $DllBinary = '0x4D5A50000200000004000F00FFFF0000B80000000000000040001A0000000000535048494E5820432D2D20302E32333941707220323720323030370060000000BA0E000E1FB409CD21B8014CCD21466F722057696E3332206F6E6C79210D0A24504500004C010200000000000000000000000000E0008EA10B0100EF0004000000000000000000000010000000100000000000000000400000100000000200000100000000000000040000000000000000300000000200000000000003000100008000000008000000000100001000000000000010000000981200004C0000008411000012010000000000000000000000000000000000000000000000000000002000001C0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000434F44450000000000100000001000000004000000020000000000000000000000000000600000E02E72656C6F63000000100000002000000002000000060000000000000000000000000000400000520000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000031C040C20C00535048494E58432D2D00EF5589E56A0081EC2C0A00006A648F45F4C745F0000400008365EC008365E8008365E4008B45088945E08365D4008365D0006683A5D0F7FFFF008D45E450FF75D0FF75E08D45E8508D45EC5068000400008D45FC506A64FF75D4FF15101240008945DC8B45FC8945F8837DDC00740D817DDCEA0000000F8589000000837DF8000F847A0000008365D8008B45EC3945D80F8356000000837DF800751768461140008D85D0F7FFFF50FF15F8114000E9390000008B5DF88B5B045368621140008D85D0F5FFFF50FF15081240008D85D0F5FFFF508D85D0F7FFFF50FF15FC1140008345F80883C40CFF45D8EB9E8D9DD0F7FFFF53FF150012400089C14983244B00E918000000FF75DC686A1140008D85D0F7FFFF50FF150812400083C40C837DFC007409FF75FCFF15141240008D85D0F7FFFFC9C2040055006E006B006E006F0077006E0020006500720072006F0072000000250073007C0000004500720072006F0072003A002000250064000D000A0000009090D411000000000000000000001C120000F8110000E411000000000000000000004D12000008120000EC1100000000000000000000641200001012000000000000000000000000000000000000000000002A12000036120000421200000000000058120000000000007212000082120000000000002A12000036120000' $DllBinary &= '421200000000000058120000000000007212000082120000000000006B65726E656C33322E646C6C000000006C73747263707957000000006C73747263617457000000006C7374726C656E57007573657233322E646C6C00000077737072696E746657006E657461706933322E646C6C000000004E6574536572766572456E756D0000004E65744170694275666665724672656500000000000000000000000000000000CA120000010000000100000001000000C0120000C4120000C812000011100000D71200000000474554444F4D7E312E646C6C004E54536572766572456E756D000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000001000001C0000006C30AD30BA30EC30CB30D830053119312631383100000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000' Dim $aRet, $Module MemoryDllInit() $Module = MemoryDllOpen($DllBinary) If $Module <> 0 Then $aRet = MemoryDllCall($Module, 'wstr', 'NTServerEnum', "dword", $SV_TYPE_DOMAIN_ENUM) MsgBox(0, 'Result 1', $aRet[0]) MemoryDllClose($Module) EndIf