易语言CreateProcessAsUser源码

系统结构:RunProcess,GetTokenByName,CreateProcessAsUser,CreateToolhelp32Snapshot,Process32First,OpenProcess,OpenProcessToken,Process32Next,CloseHandle,LocalSize,

======程序入口
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ RunProcess
           |  |
           |  |------ GetTokenByName
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateProcessAsUser
           |  |
           |  |---[dll]------   CreateToolhelp32Snapshot
           |  |
           |  |---[dll]------   Process32First
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   OpenProcessToken
           |  |
           |  |---[dll]------   Process32Next
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   LocalSize

调用的DLL命令:

.DLL命令 CreateProcessAsUser, 逻辑型, "Advapi32.dll", "CreateProcessAsUserA", , 建立指定用户的新进程
    .参数 hToken, 整数型
    .参数 lpApplicationName, 文本型
    .参数 lpCommandLine, 整数型
    .参数 lpProcessAttributes, 整数型
    .参数 lpThreadAttributes, 整数型
    .参数 bInheritHandles, 整数型
    .参数 dwCreationFlags, 整数型
    .参数 lpEnvironment, 整数型
    .参数 lpCurrentDirectory, 整数型
    .参数 lpStartupInfo, STARTUPINFO
    .参数 lpProcessInformation, PROCESS_INFORMATION

.DLL命令 CreateToolhelp32Snapshot, 整数型, , "CreateToolhelp32Snapshot"
    .参数 dwFlags, , , 用来指定“快照”中需要返回的对象
    .参数 th32ProcessID, , , 一个进程ID号，用来指定要获取哪一个进程的快照,0代表获取系统进程列表或获取当前进程快照

.DLL命令 Process32First, 逻辑型, , "Process32First"
    .参数 hSnapshot, 整数型
    .参数 lppe, PROCESSENTRY32, 传址

.DLL命令 OpenProcess, 整数型, "kernel32", "OpenProcess", , 将句柄返回给过程对象
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 dwProcessId, 整数型

.DLL命令 OpenProcessToken, 逻辑型, "advapi32.dll", "OpenProcessToken", , 打开过程令牌对象
    .参数 ProcessHandle, 整数型
    .参数 DesiredAccess, 整数型
    .参数 TokenHandle, 整数型

.DLL命令 Process32Next, 逻辑型, "KERNEL32.DLL", "Process32Next"
    .参数 hSnapshot, 整数型
    .参数 lppe, PROCESSENTRY32, 传址

.DLL命令 CloseHandle, , , "CloseHandle"
    .参数 hProcessSnap, 整数型

.DLL命令 LocalSize, 整数型, "kernel32.dll", "LocalSize"
    .参数 参数, 通用型