• 当前位置: 首页 > 系统I类源码 > 系统工具源码易语言取系统所有用户信息源码
  • 易语言取系统所有用户信息源码

    • 软件授权:
      开源软件
    • 软件大小:
      5.66 KB
    • 文件类型:
      .zip,.e
    • 下载次数:
    • 上传用户:
      心脏
    • 发布时间:
      2018-10-11 21:04
    • 软件等阶:
    • 运行环境:
      Winall,Win2003,WinXP,Win7,Win8
    • 软件评级:

    软件介绍             



     

    易语言取系统所有用户信息源码


    系统结构:取所有用户,getUserNetworkInfo,getPointerToByteStringA,Unicode转Ansi,Ansi转Unicode,rgbGetComputerName,API_NetUserEnum,API_NetUserGetInfo,API_CopyMemory,API_GetComputerName,API_GetUserName,API_NetApiBufferFree,API_lstrlen,API_lstrlenW,API_WideCharToMultiByte,API_MultiByteToWideChar,API_LocalSize_user_info_10,


    ======程序集1
               |  |
               |  |------ _启动子程序
               |  |
               |  |------ 取所有用户
               |  |
               |  |------ getUserNetworkInfo
               |  |
               |  |
    ======helper
               |  |
               |  |------ getPointerToByteStringA
               |  |
               |  |------ Unicode转Ansi
               |  |
               |  |------ Ansi转Unicode
               |  |
               |  |------ rgbGetComputerName
               |  |
               |  |
    ======调用的Dll
               |  |
               |  |---[dll]------   API_NetUserEnum
               |  |
               |  |---[dll]------   API_NetUserGetInfo
               |  |
               |  |---[dll]------   API_CopyMemory
               |  |
               |  |---[dll]------   API_GetComputerName
               |  |
               |  |---[dll]------   API_GetUserName
               |  |
               |  |---[dll]------   API_NetApiBufferFree
               |  |
               |  |---[dll]------   API_lstrlen
               |  |
               |  |---[dll]------   API_lstrlenW
               |  |
               |  |---[dll]------   API_WideCharToMultiByte
               |  |
               |  |---[dll]------   API_MultiByteToWideChar
               |  |
               |  |---[dll]------   API_LocalSize_user_info_10

      


    易语言取系统所有用户信息源码


    调用的DLL命令:


    .DLL命令 API_NetUserEnum, 整数型, "NETAPI32.DLL", "NetUserEnum", ,  
        .参数 servername, 文本型, 传址
        .参数 level, 整数型
        .参数 filter, 整数型
        .参数 bufptr, 整数型, 传址
        .参数 prefmaxlen, 整数型
        .参数 entriesread, 整数型, 传址
        .参数 totalentries, 整数型, 传址
        .参数 resume_handle, 整数型, 传址


    .DLL命令 API_NetUserGetInfo, 整数型, "NETAPI32.DLL", "NetUserGetInfo", ,  
        .参数 servername, 文本型, 传址
        .参数 userName, 字节集, 传址
        .参数 level, 整数型
        .参数 bufptr, 整数型, 传址


    .DLL命令 API_CopyMemory, , "kernel32", "RtlMoveMemory", ,  
        .参数 pDest, 整数型
        .参数 pSrc, 整数型
        .参数 ByteLen, 整数型


    .DLL命令 API_GetComputerName, 整数型, "kernel32", "GetComputerNameA", , 取得这台计算机的名称 TRUE(非零)表示成功,否则返回零。会设置GetLastError
        .参数 lpBuffer, 文本型, , 随同计算机名载入的字串缓冲区
        .参数 nSize, 整数型, 传址, 缓冲区的长度。这个变量随同返回计算机名的实际长度载入  示例Dim s$s$ = Dim dl&Dim sz&sz& = MAX_COMPUTERNAME_LENGTH+1dl& = GetComputerName(s$, sz)其他也许你会发现,MAX_COMPUTERNAME_LENGTH常数在vb自带的api文本查看器中找不到。的确,我也没有找到。但我有一个工具:Listapi,这个常数在它那里可以找到;


    .DLL命令 API_GetUserName, 整数型, "advapi32.dll", "GetUserNameA", , 取得当前用户的名字 TRUE(非零)表示成功,否则返回零。会设置GetLastError
        .参数 lpBuffer, 文本型, , 一个字串缓冲区,预先初始化成由nSize指定的长度。它将用于容纳用户名
        .参数 nSize, 整数型, , 初始化成lpBuffer的长度。返回以后,它会包含载入lpBuffer的字符数量示例Dim s$, cnt&, dl&cnt& = 199s$ = dl& = GetUserName(s$, cnt)Debug.Print Left; cnt;


    .DLL命令 API_NetApiBufferFree, 整数型, "NETAPI32.DLL", "NetApiBufferFree", ,  
        .参数 Buffer, 整数型


    .DLL命令 API_lstrlen, 整数型, "kernel32", "lstrlenA", , 返回字符串中字符数 
        .参数 lpString, 整数型


    .DLL命令 API_lstrlenW, 整数型, "kernel32", "lstrlenW", , 返回字符串中字符数 
        .参数 lpString, 整数型


    .DLL命令 API_WideCharToMultiByte, 整数型, "kernel32", "WideCharToMultiByte"
        .参数 CodePage, 整数型
        .参数 dwFlags, 整数型
        .参数 lpWideCharStr, 字节集
        .参数 cchWideChar, 整数型
        .参数 lpMultiByteStr, 文本型
        .参数 cchMultiByte, 整数型
        .参数 lpDefaultChar, 整数型
        .参数 lpUsedDefaultChar, 整数型


    .DLL命令 API_MultiByteToWideChar, 整数型, "kernel32", "MultiByteToWideChar", , 将多媒体字符串映像为通配字符串 
        .参数 CodePage, 整数型
        .参数 dwFlags, 整数型
        .参数 lpMultiByteStr, 文本型
        .参数 cchMultiByte, 整数型
        .参数 lpWideCharStr, 字节集
        .参数 cchWideChar, 整数型


    .DLL命令 API_LocalSize_user_info_10, 整数型, "kernel32", "LocalSize", , 返回本地内存块大小 
        .参数 hMem, USER_INFO_10

    相关软件

    下载说明

    本站目前主要提供易语言源码、模块、支持库等下载大部分源码均为ZIP打包,
    注:本站源码主要来源于网络收集。如有侵犯您的利益,请联系我们,我们将及时删除!
    部分源码可能含有危险代码,(如关机、格式化磁盘等),请看清代码在运行。
    由此产生的一切后果本站均不负责。源码仅用于学习使用,如需运用到商业场景请咨询原作者。

    使用本站源码开发的产品均与本站无任何关系,请大家遵守国家相关法律。

     

    推荐排行

    • 易语言糊模查找窗口标题

      易语言糊模查找窗口标题并弹出源码,枚举系统所有窗口,GetWindow,GetWindowText,GetWindowTextLength,FindWindow,ShowWindow...

    • 易语言其它简易换肤13种源

      易语言其它简易换肤13种源码,配色...

    • 易语言简单的验证码识别

      易语言简单的验证码识别加界面源码,主识别程序,是否符合,说明,程序初始化,显示验证码,分割图片,对应识别,替换杂色,全部替换色,除指定色外全部除去,读入图片...

    • 易语言笔划输入法一整套

      易语言笔划输入法一整套文件源码,子程序1,数清,清,按钮1,按钮2,按钮3,按钮4,按钮5,注,投递文本,解码火星文,计1,笔画字刷新,操作,字刷新,计,填,GetGUIThreadInfo,ClientToScreen,屏幕截图,拖动屏幕...

    • 易语言窗口渐变源码

      易语言窗口渐变源码,CreateSolidBrush,DeleteObject,FillRect,GetDC...

    • 易语言窗体拉动源码

      易语言窗体拉动源码,设置系统菜单,API_设置窗口区域,创建椭圆区域,取窗口风格,置窗口风格...

    • 易语言突破灰色按钮和水

      易语言突破灰色按钮和水波特效,突破灰色按钮和水波特效源码,装载图片,水周期,水波特效,装载图片_,接收装载图返回的整数,水周期_,窗口绘图,水波特效_,突破灰色按钮,激活按钮,取得当...

    • 易语言突破灰色按钮和水

      易语言突破灰色按钮和水波特效源码,装载图片,水周期,水波特效,突破灰色按钮,激活按钮,取得当前活动窗口句柄,枚举所有子窗体,是否活动窗口,激活窗口...

    • 易语言科大讯飞语音库调

      易语言科大讯飞语音库调用例程源码,刷新窗口,取错误码,初始化,反初始化,连接语音服务器,断开语音服务器,置合成参数,取合成参数,字符串合成到音频文件,文本文件合成到音频文件,播放...