本例完整演示了AutoIt3的几个特性
- 隐藏托盘图标
- 调用Dos命令
- 显示对话框
- 用资源管理器打开指定目录
代码可以直接使用,注意修改目录
; 不显示托盘图标
#NoTrayIcon
#include <Process.au3>
Example()
Func Example()
; 显示OA帐号输入框
Local $user = InputBox("安全检查", "你的OA帐号?", "", "")
;要求用户输入密码, 并验证密码的有效性!
Local $passwd = InputBox("安全检查", "您的OA密码?", "", "*")
;执行DOS命令,删除所有的网络连接
Local $reuslt = _RunDos("net use * /del /y")
;执行DOS命令,用输入的权限信息添加新的网络连接,实际使用时请将127.0.0.1 替换成你要访问的目录
Local $result = _RunDos("net use \\127.0.0.1 /user:gd\" & $user & " " & $passwd & "")
;用资源管理器打开网络连接
Local $PID = Run("explorer.exe \\127.0.0.1", "", @SW_MAXIMIZE)
EndFunc
网友评论