.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _选择框1_被单击

编辑框2.禁止 ＝ 选择框1.选中

.子程序 _按钮2_被单击

.如果真 (取反 (文件是否存在 (编辑框1.内容)))

    信息框 (“文件不存在！”, #错误图标, “错误”, )

    返回 ()

.如果真结束

.如果 (编辑框2.禁止)

    .如果 (changeFileOwnership (编辑框1.内容))

        信息框 (“设置成功！”, 0, “成功”, )

    .否则

        信息框 (“设置失败！”, #警告图标, , )

    .如果结束

    ' 本源码来自易语言资源网(www.5A5X.com)

.否则

    .如果 (changeFileOwnership (编辑框1.内容, 编辑框2.内容))

        信息框 (“设置成功！”, 0, , )

    .否则

        信息框 (“设置失败！”, #警告图标, “成功”, )

    .如果结束

.如果结束

.子程序 _按钮1_被单击

.如果真 (通用对话框1.打开 ())

    编辑框1.内容 ＝ 通用对话框1.文件名

.如果真结束

.子程序 __启动窗口_创建完毕

.局部变量 _user, 文本型

_user ＝ 取空白文本 (255)

API_WNetGetUser (“”, _user, 256)

编辑框2.内容 ＝ _user