易语言Access批量解密源码

系统结构:打开多文件对话框,取文件全名,写出密码到文件,API_WideCharToMultiByte,API_MultiByteToWideChar,

======窗口程序集_主窗口
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _拖放对象1_得到文件
           |  |
           |  |------ 打开多文件对话框
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _菜单_复制密码_被选择
           |  |
           |  |------ 取文件全名
           |  |
           |  |------ 写出密码到文件
           |  |
           |  |------ _超级列表框_结果_右键单击表项
           |  |
           |  |------ _菜单_清除记录_被选择
           |  |
           |  |------ _按钮_打开文件_被单击
           |  |
           |  |------ _超级列表框_结果_当前表项被改变
           |  |
           |  |------ _导出密码_被选择
           |  |
           |  |------ _菜单_窗口置顶_被选择
           |  |
           |  |------ _选择框_窗口置顶_被单击
           |  |
           |  |------ _菜单_清除密码_被选择
           |  |
           |  |------ _菜单_修改密码_被选择
           |  |
           |  |
======窗口程序集_修改密码
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _编辑框_新密码1_获得焦点
           |  |
           |  |------ _编辑框_新密码2_获得焦点
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   __文件对话框类_GetOpenFileName
           |  |
           |  |---[dll]------   API_WideCharToMultiByte
           |  |
           |  |---[dll]------   API_MultiByteToWideChar

调用的DLL命令:

.DLL命令 __文件对话框类_GetOpenFileName, 整数型, "comdlg32.dll", "GetOpenFileNameA"
    .参数 OPENFILENAME, __文件对话框类_文件对话框

.DLL命令 API_WideCharToMultiByte, 整数型, "kernel32.dll", "WideCharToMultiByte"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型, , 0
    .参数 lpWideCharStr, 字节集
    .参数 cchMultiByte, 整数型, , -1
    .参数 lpMultiByteStr, 文本型, 传址
    .参数 cchMultiByte, 整数型
    .参数 默认文本, 整数型, , 0
    .参数 使用默认文本, 整数型, , 0

.DLL命令 API_MultiByteToWideChar, 整数型, "kernel32.dll", "MultiByteToWideChar"
    .参数 CodePage, 整数型
    .参数 dwFlags, 整数型, , 0
    .参数 lpMultiByteStr, 文本型
    .参数 cchMultiByte, 整数型, , -1
    .参数 lpWideCharStr, 字节集, 传址
    .参数 cchWideChar, 整数型