自动同意进群自动审核进群易语言源码

自动同意进群自动审核进群易语言源码

.版本 2

.程序集 窗口程序集_窗口1

.子程序 _按钮1_被单击, , , 保存设置

' 保存了设置后，后面的代码就去CQ应用的'Type=302 请求-群添加'哪根据你这里设置的参数执行功能
.如果 (选择框1.选中 ＝ 真)
    写配置项 (应用目录 ＋ “config.d”, “config”, “自动同意”, “真”)

.否则
    写配置项 (应用目录 ＋ “config.d”, “config”, “自动同意”, “假”)
.如果结束

.如果 (选择框2.选中 ＝ 真)
    写配置项 (应用目录 ＋ “config.d”, “config”, “自动审核”, “真”)

.否则
    写配置项 (应用目录 ＋ “config.d”, “config”, “自动审核”, “假”)
.如果结束
信息框 (“保存成功”, 0, , )

.子程序 _窗口1_创建完毕, , , 读取设置

' 每次打开窗口就把之前设置的参数读取出来，还原到图形界面
.如果 (读配置项 (应用目录 ＋ “config.d”, “config”, “自动同意”, ) ＝ “真”)
    选择框1.选中 ＝ 真
.否则
    选择框1.选中 ＝ 假
.如果结束

.如果 (读配置项 (应用目录 ＋ “config.d”, “config”, “自动审核”, ) ＝ “真”)
    选择框2.选中 ＝ 真

@三叶资源网