获取Windwos环境信息-Environ函数-易勋
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


获取Windwos环境信息-Environ函数

发表时间:2018/11/1 11:12:05 评论(0) 浏览(273)  评论 | 加入收藏 | 复制
   
摘 要:怎么可以获取Windows用户登陆名以供使用呢?
正 文:

有个项目需要用到Windows的用户登陆名来进行相关处理,这样就需要用到Environ函数(帮助文档):

Environ("USERNAME")
一句代码即可读取到用户登陆名。


写一个函数来循环Environ,使我们知道,通过Environ可以从Windwos中获取到哪些信息:

Public Function GetAllEnviron()
    Dim intI As Integer
    intI = 1
    Do Until Nz(Environ(intI), "") = ""
        Debug.Print intI & ":" & Environ(intI)
        intI = intI + 1
    Loop
End Function


调用GetAllEnviron即可在立即窗体显示出所有信息:


Access软件网交流QQ群(群号:198465573)
 
 相关文章
返回操作系统的临时目录,系统目录,WINDOWS目录   【黄海  2004/11/18】
如何取得WINDOWS和access的安装目录  【朱亦文  2004/11/10】
在access中如何将某一程序设置成为当WINDOWS启动自动执行...  【朱亦文  2004/11/10】
Windows API 函数 for Visual Basic(资...  【陈国强   2004/11/10】
在access中如何将某一程序设置成为当WINDOWS启动自动执行...  【不详  2007/10/15】
显示并激活Windows已运行的程序  【咱家是猫  2008/2/2】
获取Windows登录机器名及用户  【咱家是猫  2008/2/2】
 
 访客评论
总记录:0篇  页次:0/0 9 1 :
 
 发表评论
评论内容 (必填)

常见问答
技术分类
相关资源
文章搜索
关于作者

易勋

文章分类

文章存档

友情链接