易语言系统管理源码

易语言系统管理源码系统结构:获取用户信息,列举用户,Unicode转Ansi,Ansi转Unicode,取状态,取模块,列举组,修改列,列举端口,提升进程权限,列举服务,状态,列举进程,通过句柄取图标,OpenProcess,Close,SetHandle,GetSaveHandle,GetProcessImagePathAndCommandLine,初始化颜色表,CaptureDC,GetBitsAddress,GetBitsSize,BytesPerLine,Create,SetPixelColor,GetBitmapInfoAddress,GetWidth,GetHeight,WIDTHBYTES,GetColorTableAddress,GetBitCount,BMP文件头转字节集,BMP信息头转字节集,CNoColorTable,GetColorTableSize,NumDIBColorEntries,Write,API_NetUserEnum,API_RtlMoveMemory,API_NetApiBufferFree,API_lstrlen,API_NetUserGetInfo,API_RtlMoveMemory2,API_MultiByteToWideChar,API_宽字符到双字节,API_宽字符到双字节1,API_NetGroupEnum,API_htons,取模块信息,GetExtendedTcpTable,取自进程ID,创建系统快照,关闭系统快照,打开进程_,打开令牌对象,取权限令牌,置进程权限,关闭对象,API_取Window和DOS版本扩展,API_OpenSCManager,API_EnumServicesStatusEx,API_CloseServiceHandle,API_GetProcessMemoryInfo,API_CloseHandle,GetModuleHandleA,GetProcAddress,CreateRemoteThread,GetExitCodeThread,WaitForSingleObject,ReadProcessMemory,API_NetUserDel,API_NetUserAdd,API_NetUserSetInfo,API_lstrcpyn,API_lstrcpyn2,API_NetUserGetLocalGroups,API_NetLocalGroupSetInfo,API_NetLocalGroupAdd,API_NetLocalGroupDel,SHGetFileInfo,GetDC,CreateSolidBrush,FillRect,DrawIconEx,CreateCompatibleBitmap,CreateCompatibleDC,SelectObject,ReleaseDC,DeleteDC,DeleteObject,DrawIcon,GetClassLongA,FindWindowA,GetWindow,GetWindowTextA,GetWindowTextLengthA,GetDesktopWindow,IsWindowVisible,GetCurrentProcess,WriteProcessMemory,memcpy,CreateDIBSection,BitBlt,GdiFlush,SendMessage,API_QueryServiceStatus,API_OpenService,API_ControlService,API_StartService,API_QueryServiceStatusEx, ======主窗口程序集 || ||------获取用户信息 || ||------列举用户 || ||------Unicode转Ansi || ||------Ansi转Unicode || ||------_树型框1_项目被选择 || ||------取状态 || ||------取模块 || ||------列举组 || ||------修改列 || ||------列举端口 || ||------提升进程权限 || ||------__启动窗口_创建完毕 || ||------列举服务 || ||------状态 || ||------列举进程 || ||------_超级列表框1_右键单击表项 || ||------_删除_被选择 || ||------_新用户_被选择 || ||------_设置密码_被选择 || ||------_超级列表框1_被双击 || ||------_树型框1_按下某键 || ||------_超级列表框1_按下某键 || ||------_超级列表框1_结束编辑 || ||------_关闭进程2_被选择 || ||------_新建组_被选择 || ||------_删除组_被选择 || ||------通过句柄取图标 || ||------_关闭进程_被选择 || ||------_刷新_被选择 || ||------_属性_被选择 || ||------_启动_被选择 || ||------_停止_被选择 || ||------_标签1_鼠标左键被按下 || || ======CImagePathAndCommandLine || ||------_初始化 || ||------_销毁 || ||------OpenProcess || ||------Close || ||------SetHandle || ||------GetSaveHandle || ||------GetProcessImagePathAndCommandLine || || ======添加用户程序集 || ||------_按钮1_被单击 || ||------_编辑框1_内容被改变 || ||------_添加新用户_将被销毁 || ||------_添加新用户_创建完毕 || ||------_按钮2_被单击 || || ======修改密码程序集 || ||------_按钮1_被单击 || ||------_修改密码_创建完毕 || ||------_按钮2_被单击 || || ======用户信息程序集 || ||------_用户信息_创建完毕 || ||------_按钮2_被单击 || ||------_按钮1_被单击 || || ======添加组程序集 || ||------_编辑框1_内容被改变 || ||------_按钮3_被单击 || ||------_按钮4_被单击 || ||------_新组_将被销毁 || || ======位图操作类 || ||------_初始化 || ||------_销毁 || ||------初始化颜色表 || ||------CaptureDC || ||------GetBitsAddress || ||------GetBitsSize || ||------BytesPerLine || ||------Create || ||------SetPixelColor || ||------GetBitmapInfoAddress || ||------GetWidth || ||------GetHeight || ||------WIDTHBYTES || ||------GetColorTableAddress || ||------GetBitCount || ||------BMP文件头转字节集 || ||------BMP信息头转字节集 || ||------CNoColorTable || ||------GetColorTableSize || ||------NumDIBColorEntries || ||------Write || || ======服务程序集 || ||------_服务窗口_创建完毕 || ||------_超级按钮5_被单击 || ||------_超级按钮6_被单击 || ||------_超级按钮1_被单击 || ||------_超级按钮2_被单击 || ||------_时钟1_周期事件 || ||------_组合框1_列表项被选择 || || ======调用的Dll || ||---[dll]------API_NetUserEnum || ||---[dll]------API_RtlMoveMemory || ||---[dll]------API_NetApiBufferFree || ||---[dll]------API_lstrlen || ||---[dll]------API_NetUserGetInfo || ||---[dll]------API_RtlMoveMemory2 || ||---[dll]------API_MultiByteToWideChar || ||---[dll]------API_宽字符到双字节 || ||---[dll]------API_宽字符到双字节1 || ||---[dll]------API_NetGroupEnum || ||---[dll]------API_htons || ||---[dll]------取模块信息 || ||---[dll]------GetExtendedTcpTable || ||---[dll]------取自进程ID || ||---[dll]------创建系统快照 || ||---[dll]------关闭系统快照 || ||---[dll]------打开进程_ || ||---[dll]------打开令牌对象 || ||---[dll]------取权限令牌 || ||---[dll]------置进程权限 || ||---[dll]------关闭对象 || ||---[dll]------API_取Window和DOS版本扩展 || ||---[dll]------API_OpenSCManager || ||---[dll]------API_EnumServicesStatusEx || ||---[dll]------API_CloseServiceHandle || ||---[dll]------API_GetProcessMemoryInfo || ||---[dll]------API_CloseHandle || ||---[dll]------GetModuleHandleA || ||---[dll]------GetProcAddress || ||---[dll]------CreateRemoteThread || ||---[dll]------GetExitCodeThread || ||---[dll]------WaitForSingleObject || ||---[dll]------ReadProcessMemory || ||---[dll]------API_NetUserDel || ||---[dll]------API_NetUserAdd || ||---[dll]------API_NetUserSetInfo || ||---[dll]------API_lstrcpyn || ||---[dll]------API_lstrcpyn2 || ||---[dll]------API_NetUserGetLocalGroups || ||---[dll]------API_NetLocalGroupSetInfo || ||---[dll]------API_NetLocalGroupAdd || ||---[dll]------API_NetLocalGroupDel || ||---[dll]------SHGetFileInfo || ||---[dll]------GetDC || ||---[dll]------CreateSolidBrush || ||---[dll]------FillRect || ||---[dll]------DrawIconEx || ||---[dll]------CreateCompatibleBitmap || ||---[dll]------CreateCompatibleDC || ||---[dll]------SelectObject || ||---[dll]------ReleaseDC || ||---[dll]------DeleteDC || ||---[dll]------DeleteObject || ||---[dll]------DrawIcon || ||---[dll]------GetClassLongA || ||---[dll]------FindWindowA || ||---[dll]------GetWindow || ||---[dll]------GetWindowTextA || ||---[dll]------GetWindowTextLengthA || ||---[dll]------GetDesktopWindow || ||---[dll]------IsWindowVisible || ||---[dll]------GetCurrentProcess || ||---[dll]------WriteProcessMemory || ||---[dll]------memcpy || ||---[dll]------CreateDIBSection || ||---[dll]------BitBlt || ||---[dll]------GdiFlush || ||---[dll]------SendMessage || ||---[dll]------API_QueryServiceStatus || ||---[dll]------API_OpenService || ||---[dll]------API_ControlService || ||---[dll]------API_StartService || ||---[dll]------API_QueryServiceStatusEx 调用的DLL命令: .DLL命令API_NetUserEnum,整数型,"NETAPI32.DLL","NetUserEnum" .参数servername,整数型 .参数level,整数型 .参数filter,整数型 .参数bufptr,整数型,传址 .参数prefmaxlen,整数型,传址 .参数entriesread,整数型,传址 .参数totalentries,整数型,传址 .参数resume_handle,整数型,传址 .DLL命令API_RtlMoveMemory,,"kernel32.dll","RtlMoveMemory" .参数Destination,整数型,传址 .参数Source,整数型 .参数Length,整数型 .DLL命令API_NetApiBufferFree,整数型,"NETAPI32.DLL","NetApiBufferFree" .参数Buffer,整数型 .DLL命令API_lstrlen,整数型,"kernel32","lstrlenW",,返回字符串中字符数 .参数lpString,整数型 .DLL命令API_NetUserGetInfo,整数型,"NETAPI32.DLL","NetUserGetInfo" .参数servername,整数型 .参数userName,字节集,传址 .参数level,整数型 .参数bufptr,整数型,传址 .DLL命令API_RtlMoveMemory2,,"kernel32.dll","RtlMoveMemory" .参数Destination,ENUM_SERVICE_STATUS_PROCESS .参数Source,字节集 .参数Length,整数型 .DLL命令API_MultiByteToWideChar,整数型,"kernel32","MultiByteToWideChar",,将多媒体字符串映像为通配字符串 .参数CodePage,整数型 .参数dwFlags,整数型 .参数lpMultiByteStr,文本型 .参数cchMultiByte,整数型 .参数lpWideCharStr,字节集,传址 .参数cchWideChar,整数型 .DLL命令API_宽字符到双字节,,"kernel32.dll","WideCharToMultiByte" .参数代码页,整数型,,CodePage .参数标志,整数型,,dwFlags .参数宽字符文本,字节集,,lpWideCharStr .参数宽字符文本长度,整数型,,cchWideChar .参数双字节文本,字节集,,lpMultiByteStr .参数双字节文本长度,整数型,,cchMultiByte .参数默认文本,整数型,,lpDefaultChar .参数使用默认文本,逻辑型,,lpUsedDefaultChar .DLL命令API_宽字符到双字节1,整数型,"kernel32.dll","WideCharToMultiByte" .参数代码页,整数型,,CodePage .参数标志,整数型,,dwFlags .参数宽字符文本,字节集,,lpWideCharStr .参数宽字符文本长度,整数型,,cchWideChar .参数双字节文本,整数型,,lpMultiByteStr .参数双字节文本长度,整数型,,cchMultiByte .参数默认文本,整数型,,lpDefaultChar .参数使用默认文本,逻辑型,,lpUsedDefaultChar .DLL命令API_NetGroupEnum,整数型,"NETAPI32.DLL","NetLocalGroupEnum" .参数servername,整数型 .参数level,整数型 .参数bufptr,整数型,传址 .参数prefmaxlen,整数型 .参数entriesread,整数型,传址 .参数totalentries,整数型,传址 .参数resume_handle,整数型,传址 .DLL命令API_htons,整数型,"ws2_32.dll","htons" .参数hostshort,整数型 .DLL命令取模块信息,整数型,"kernel32.dll","Module32First" .参数进程句柄,整数型 .参数模块信息,模块信息 .DLL命令GetExtendedTcpTable,整数型,"iphlpapi.dll","GetExtendedTcpTable" .参数pTcpTable,字节集,传址 .参数pdwSize,整数型,传址 .参数bOrder,逻辑型,,是否排序 .参数ulAf,整数型,,AF_INET=2 .参数TableClass,整数型,,未知类型：TCP_TABLE_CLASS。TCP_TABLE_OWNER_PID_ALL=5 .参数Reserved,整数型 .DLL命令取自进程ID,整数型,"kernel32.dll","GetCurrentProcessId",公开 .DLL命令创建系统快照,整数型,"kernel32.dll","CreateToolhelp32Snapshot",,返回快照后的句柄 .参数快照标志,整数型,,进程＝15，线程=4，DLL＝8，堆= .参数参数,整数型 .DLL命令关闭系统快照,整数型,"kernel32.dll","CloseHandle" .参数快照句柄,整数型 .DLL命令打开进程_,整数型,"kernel32.dll","OpenProcess" .参数访问级别,整数型,,2035711完全访问 .参数子进程继承,整数型,,0为子进程继承 .参数进程ID,整数型,,要打开的进程标识 .DLL命令打开令牌对象,逻辑型,"advapi32.dll","OpenProcessToken",,打开过程令牌对象 .参数进程句柄,整数型 .参数权限,整数型 .参数令牌句柄,整数型,传址 .DLL命令取权限令牌,整数型,"advapi32.dll","LookupPrivilegeValueA",,返回特权名LUID .参数系统服务名,整数型,,lpSystemName .参数权限名,文本型,传址 .参数权限结构,LUID,传址 .DLL命令置进程权限,逻辑型,"advapi32.dll","AdjustTokenPrivileges",,使能/取消令牌特权 .参数令牌句柄,整数型 .参数DisableAllPrivileges,逻辑型 .参数NewState,进程权限,传址 .参数BufferLength,整数型 .参数PreviousState,整数型 .参数ReturnLength,整数型 .DLL命令关闭对象,整数型,"kernel32.dll","CloseHandle" .参数对象句柄,整数型 .DLL命令API_取Window和DOS版本扩展,整数型,,"GetVersionExA",,在一个OSVERSIONINFO结构中载入与平台和操作系统有关的版本信息非零表示成功，零表示失败 .参数版本,OSVERSIONINFO,,OSVERSIONINFO，用于装载版本信息的结构。在正式调用函数之前，必须先将这个结构的dwOSVersionInfoSize字段设为结构的大小（148）; .DLL命令API_OpenSCManager,整数型,"advapi32.dll","OpenSCManagerA",,连接服务控件管理器 .参数lpMachineName,整数型 .参数lpDatabaseName,整数型 .参数dwDesiredAccess,整数型 .DLL命令API_EnumServicesStatusEx,整数型,"ADVAPI32.DLL","EnumServicesStatusExA" .参数hSCManager,整数型 .参数InfoLevel,整数型 .参数dwServiceType,整数型 .参数dwServiceState,整数型 .参数lpServices,字节集,传址 .参数cbBufSize,整数型 .参数pcbBytesNeeded,整数型,传址 .参数lpServicesReturned,整数型,传址 .参数lpResumeHandle,整数型 .参数pszGroupName,整数型 .DLL命令API_CloseServiceHandle,整数型,"advapi32.dll","CloseServiceHandle",,关闭ServiceControlManager对象 .参数hSCObject,整数型 .DLL命令API_GetProcessMemoryInfo,整数型,"psapi.dll","GetProcessMemoryInfo" .参数Process,整数型 .参数ppsmemCounters,字节集,传址 .参数cb,整数型 .DLL命令API_CloseHandle,整数型,"kernel32","CloseHandle" .参数hObject,整数型,,欲关闭的一个对象的句柄; .DLL命令GetModuleHandleA,整数型 .参数lpModuleName,文本型 .DLL命令GetProcAddress,整数型 .参数hModule,整数型 .参数lpProcName,文本型 .DLL命令CreateRemoteThread,整数型 .参数hProcess,整数型 .参数lpThreadAttributes,整数型 .参数dwStackSize,整数型 .参数lpStartAddress,整数型 .参数lpParameter,整数型 .参数dwCreationFlags,整数型 .参数lpThreadId,整数型 .DLL命令GetExitCodeThread,逻辑型,,"GetExitCodeThread" .参数hThread .参数lpExitCode,,传址 .DLL命令WaitForSingleObject,整数型 .参数hHandle,整数型 .参数dwMilliseconds,整数型 .DLL命令ReadProcessMemory,逻辑型 .参数hProcess,整数型 .参数lpBaseAddress,整数型 .参数lpBuffer,文本型 .参数nSize,整数型 .参数lpNumberOfBytesRead,整数型,传址 .DLL命令API_NetUserDel,整数型,"NETAPI32.DLL","NetUserDel" .参数servername,整数型 .参数userName,字节集 .DLL命令API_NetUserAdd,整数型,"NETAPI32.DLL","NetUserAdd" .参数servername,整数型 .参数level,整数型 .参数buf,UserStruct,传址 .参数parm_err,整数型,传址 .DLL命令API_NetUserSetInfo,整数型,"NETAPI32.DLL","NetUserSetInfo" .参数servername,整数型 .参数userName,字节集 .参数level,整数型 .参数buf,整数型,传址 .参数parm_err,整数型 .DLL命令API_lstrcpyn,整数型,,"lstrcpyn" .参数欲取其指针的文本,字节集,传址 .参数欲取其指针的文本,字节集,传址 .参数保留,整数型,,0 .DLL命令API_lstrcpyn2,整数型,,"lstrcpyn" .参数欲取其指针的文本,整数型,传址 .参数欲取其指针的文本,整数型,传址 .参数保留,整数型,,0 .DLL命令API_NetUserGetLocalGroups,整数型,"NETAPI32.DLL","NetUserGetLocalGroups" .参数servername,整数型 .参数userName,字节集 .参数level,整数型 .参数flags,整数型 .参数bufptr,整数型,传址 .参数prefmaxlen,整数型,传址 .参数entriesread,整数型,传址 .参数totalentries,整数型,传址 .DLL命令API_NetLocalGroupSetInfo,整数型,"NETAPI32.DLL","NetLocalGroupSetInfo" .参数servername,整数型 .参数groupname,字节集 .参数level,整数型 .参数buf,整数型,传址 .参数parm_err,整数型 .DLL命令API_NetLocalGroupAdd,整数型,"NETAPI32.DLL","NetLocalGroupAdd" .参数servername,整数型 .参数level,整数型 .参数buf,整数型,传址 .参数parm_err,整数型 .DLL命令API_NetLocalGroupDel,整数型,"NETAPI32.DLL","NetLocalGroupDel" .参数servername,整数型 .参数groupname,字节集 .DLL命令SHGetFileInfo,整数型,,"SHGetFileInfo",公开 .参数pszPath,文本型 .参数dwFileAttributes,整数型 .参数psfi,SHFILEINFO .参数cbFileInfo,整数型 .参数uFlags,整数型 .DLL命令GetDC,整数型,,"GetDC",公开 .参数hwnd .DLL命令CreateSolidBrush,整数型,"gdi32.dll","CreateSolidBrush",公开 .参数crColor,整数型 .DLL命令FillRect,整数型,"user32.dll","FillRect",公开 .参数hdc,整数型 .参数lpRect,RECT,传址 .参数hBrush,整数型 .DLL命令DrawIconEx,整数型,,"DrawIconEx",公开,描绘一个图标或鼠标指针 .参数hdc .参数xLeft .参数yTop .参数hIcon .参数cxWidth .参数cyWidth .参数istepIfAniCur .参数hbrFlickerFreeDraw .参数diFlags .DLL命令CreateCompatibleBitmap,整数型,"gdi32.dll","CreateCompatibleBitmap",公开,执行成功返回位图句柄，零表示失败 .参数hdc,整数型,,设备场景句柄 .参数nWidth,整数型,,位图宽度 .参数nHeight,整数型,,位图高度 .DLL命令CreateCompatibleDC,整数型,"gdi32.dll","CreateCompatibleDC",公开,新设备场景句柄，若出错则为零 .参数hdc,整数型,,hdc，源设备场景句柄 .DLL命令SelectObject,整数型,"gdi32.dll","SelectObject",公开,每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式,与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION，COMPLEXREGION或NULLREGION对区域进行描述，GDI_ERROR表示出错 .参数hdc,整数型,,一个设备场景的句柄 .参数hObject,整数型,,一个画笔、位图、刷子、字体或区域的句柄 .DLL命令ReleaseDC,逻辑型,"user32.dll","ReleaseDC",公开 .参数hwnd,整数型 .参数hDC,整数型 .DLL命令DeleteDC,整数型,"gdi32.dll","DeleteDC",公开,删除专用设备场景或信息场景，释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景,执行成功则为非零，失败则为零 .参数hdc,整数型,,将要删除的设备场景 .DLL命令DeleteObject,整数型,"gdi32.dll","DeleteObject",公开,用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放,非零表示成功，零表示失败 .参数hObject,整数型,,一个GDI对象的句柄 .DLL命令DrawIcon,整数型,"user32","DrawIcon" .参数hDC,整数型 .参数x,整数型 .参数y,整数型 .参数hIcon,整数型 .DLL命令GetClassLongA,整数型 .参数hwnd .参数m .DLL命令FindWindowA,整数型 .参数类名 .参数标题,文本型 .DLL命令GetWindow,整数型 .参数源窗口 .参数关系 .DLL命令GetWindowTextA .参数hwnd .参数标题,文本型,传址 .参数long .DLL命令GetWindowTextLengthA,整数型 .参数hwnd .DLL命令GetDesktopWindow,整数型 .DLL命令IsWindowVisible,逻辑型 .参数hwnd .DLL命令GetCurrentProcess,整数型,"kernel32.dll","GetCurrentProcess",,获取当前进程句柄 .DLL命令WriteProcessMemory,整数型,"kernel32.dll","WriteProcessMemory",,写内存数据 .参数hProcess,整数型,,进程句柄 .参数pBaseAddress,整数型,,内存地址 .参数lpBuffer,字节集,传址,数据指针 .参数nSize,整数型,,长度 .参数lpNumberOfBytesWritten,整数型,,实际写出长度 .DLL命令memcpy,,"Kernel32.dll","RtlMoveMemory",,复制内存(无返回值) .参数Destination,整数型,,目的指针 .参数Source,整数型,,源指针 .参数Length,整数型,,复制长度 .DLL命令CreateDIBSection,整数型,"gdi32.dll","CreateDIBSection" .参数hDC,整数型 .参数pBitmapInfo,字节集,传址 .参数un,整数型 .参数lplpVoid,整数型,传址 .参数handle,整数型 .参数dw,整数型 .DLL命令BitBlt,整数型,"gdi32.dll","BitBlt" .参数hDestDC,整数型 .参数x,整数型 .参数y,整数型 .参数nWidth,整数型 .参数nHeight,整数型 .参数hSrcDC,整数型 .参数xSrc,整数型 .参数ySrc,整数型 .参数dwRop,整数型 .DLL命令GdiFlush,整数型,"gdi32.dll","GdiFlush",,执行任何未决的绘图操作,如所有未决的绘图操作都成功完成，就返回TRUE（非零）。如任何一个操作失败，就返回零值 .DLL命令SendMessage,整数型,"user32.dll","SendMessageA" .参数hwnd,整数型 .参数wMsg,整数型 .参数wParam,整数型 .参数lParam,整数型 .DLL命令API_QueryServiceStatus,整数型,"advapi32.dll","QueryServiceStatus",,获取服务状态 .参数hService,整数型 .参数lpServiceStatus,SERVICE_STATUS,传址 .DLL命令API_OpenService,整数型,"advapi32.dll","OpenServiceA",,打开服务 .参数hSCManager,整数型 .参数lpServiceName,文本型 .参数dwDesiredAccess,整数型 .DLL命令API_ControlService,整数型,"advapi32.dll","ControlService",,向服务器发送控件 .参数hService,整数型 .参数dwControl,整数型 .参数lpServiceStatus,SERVICE_STATUS,传址 .DLL命令API_StartService,整数型,"advapi32.dll","StartServiceA",,开始运行服务 .参数hService,整数型 .参数dwNumServiceArgs,整数型 .参数lpServiceArgVectors,整数型 .DLL命令API_QueryServiceStatusEx,整数型,"ADVAPI32.DLL","QueryServiceStatusEx" .参数hService,整数型 .参数InfoLevel,整数型 .参数lpBuffer,字节集 .参数cbBufSize,整数型 .参数pcbBytesNeeded,整数型,传址