精易论坛

标题: C转E 代码求助 [打印本页]

---

作者: ShenMir    时间: 2025-1-8 22:11
标题: C转E 代码求助
int main()
{
       
        HINSTANCE hDllInst = LoadLibrary(TEXT("CaptchaLibrary.dll"));

       
        if (hDllInst)

        {
                typedef int(WINAPI *MYFUNC1)();
                typedef const char* (WINAPI *MYFUNC2)(const char*);
                typedef const char* (WINAPI *MYFUNC3)(const char*);
                typedef void(WINAPI *MYFUNC4)();
                string res;
                const char* result;
                MYFUNC1 _InitSession = NULL;
                MYFUNC2 _PredictBase64 = NULL;
                MYFUNC3 _PredictFile = NULL;
                MYFUNC4 _FreeSession = NULL;
                _InitSession = (MYFUNC1)GetProcAddress(hDllInst, "InitSession");
                _PredictBase64 = (MYFUNC2)GetProcAddress(hDllInst, "PredictBase64");
                _PredictFile = (MYFUNC3)GetProcAddress(hDllInst, "PredictFile");
                _FreeSession = (MYFUNC4)GetProcAddress(hDllInst, "FreeSession");

                int code = _InitSession();

                const char* s = "此处省略base64编码的文本型字符串";
                const char* f = "./test.png";
                printf("predictBase64: %s\n", _PredictBase64(s));
                printf("predictFile: %s\n", _PredictFile(f));
                _FreeSession();

                FreeLibrary(hDllInst);

                return 0;
        }
       
}

---

作者: 尛龍科技    时间: 2025-1-8 22:11
因为没有CaptchaLibrary.dll
我只能把我理解的给你了

  

DLL命令名	返回值类型	公开	备 注
LoadLibrary	整数型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
LoadLibraryA
参数名	类 型	传址	数组	备 注
lpLibFileName	文本型

DLL命令名	返回值类型	公开	备 注
FreeLibrary	整数型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
FreeLibrary
参数名	类 型	传址	数组	备 注
hLibModule	整数型

DLL命令名	返回值类型	公开	备 注
InitSession	整数型
DLL库文件名:
CaptchaLibrary.dll
在DLL库中对应命令名:
InitSession
参数名	类 型	传址	数组	备 注

DLL命令名	返回值类型	公开	备 注
PredictFile	文本型
DLL库文件名:
CaptchaLibrary.dll
在DLL库中对应命令名:
PredictFile
参数名	类 型	传址	数组	备 注
filePath	文本型

DLL命令名	返回值类型	公开	备 注
PredictBase64	文本型
DLL库文件名:
CaptchaLibrary.dll
在DLL库中对应命令名:
PredictBase64
参数名	类 型	传址	数组	备 注
base64Str	文本型

DLL命令名	返回值类型	公开	备 注
FreeSession
DLL库文件名:
CaptchaLibrary.dll
在DLL库中对应命令名:
FreeSession
参数名	类 型	传址	数组	备 注
handle	整数型

.版本 2<br /> <br /> .DLL命令 LoadLibrary, 整数型, "kernel32.dll", "LoadLibraryA"<br />     .参数 lpLibFileName, 文本型<br /> <br /> .DLL命令 FreeLibrary, 整数型, "kernel32.dll", "FreeLibrary"<br />     .参数 hLibModule, 整数型<br /> <br /> .DLL命令 InitSession, 整数型, "CaptchaLibrary.dll", "InitSession"<br /> <br /> .DLL命令 PredictFile, 文本型, "CaptchaLibrary.dll", "PredictFile"<br />     .参数 filePath, 文本型<br /> <br /> .DLL命令 PredictBase64, 文本型, "CaptchaLibrary.dll", "PredictBase64"<br />     .参数 base64Str, 文本型<br /> <br /> .DLL命令 FreeSession, , "CaptchaLibrary.dll", "FreeSession"<br />     .参数 handle, 整数型

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
dll句柄	整数型
s	文本型
f	文本型
code	整数型
result	文本型

dll句柄 ＝ LoadLibrary (“CaptchaLibrary.dll”)
如果真 (dll句柄 ＝ 0)
信息框 (“DLL 加载失败”, 0, “错误”, )
code ＝ InitSession ()
如果真 (code ≠ 0)
信息框 (“InitSession 失败，错误代码：” ＋ 到文本 (code), 0, “错误”, )
s ＝ “此处省略base64编码的文本型字符串”
f ＝ “./test.png”
result ＝ PredictBase64 (s)
信息框 (“predictBase64: ” ＋ result, 0, “结果”, )
result ＝ PredictFile (f)
信息框 (“predictFile: ” ＋ result, 0, “结果”, )
FreeSession ()
FreeLibrary (dll句柄)

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 dll句柄, 整数型<br /> .局部变量 s, 文本型<br /> .局部变量 f, 文本型<br /> .局部变量 code, 整数型<br /> .局部变量 result, 文本型<br /> <br /> dll句柄 ＝ LoadLibrary (“CaptchaLibrary.dll”)<br /> .如果真 (dll句柄 ＝ 0)<br />     信息框 (“DLL 加载失败”, 0, “错误”, )<br /> .如果真结束<br /> code ＝ InitSession ()<br /> .如果真 (code ≠ 0)<br />     信息框 (“InitSession 失败，错误代码：” ＋ 到文本 (code), 0, “错误”, )<br /> .如果真结束<br /> s ＝ “此处省略base64编码的文本型字符串”<br /> f ＝ “./test.png”<br /> result ＝ PredictBase64 (s)<br /> 信息框 (“predictBase64: ” ＋ result, 0, “结果”, )<br /> result ＝ PredictFile(f)<br /> 信息框 (“predictFile: ” ＋ result, 0, “结果”, )<br /> FreeSession ()<br /> FreeLibrary (dll句柄)

---

作者: 卿卿吖    时间: 2025-1-8 22:36
学习一下，好东西，感谢大佬的分享！

---

作者: 卿卿吖    时间: 2025-1-8 22:38
学习一下，好东西，感谢大佬的分享！

---

作者: opphk    时间: 2025-1-8 23:15
这应该是验证码识别你可以用论坛大佬开发的方便食用

---

作者: 孤神    时间: 2025-1-9 05:32
.版本 2
.支持库 spec

.子程序 _启动子程序, 整数型,, 请在本子程序中放置易程序入口代码

.局部变量 hDllInst, 整数型
.局部变量 _InitSession, 子程序指针
.局部变量 _PredictBase64, 子程序指针
.局部变量 _PredictFile, 子程序指针
.局部变量 _FreeSession, 子程序指针
.局部变量 code, 整数型
.局部变量 s, 文本型
.局部变量 f, 文本型

hDllInst ＝ 加载库 (“CaptchaLibrary.dll”)
.如果真 (hDllInst ≠ 0)
    _InitSession ＝ 获取Proc地址 (hDllInst, “InitSession”)
    _PredictBase64 ＝ 获取Proc地址 (hDllInst, “PredictBase64”)
    _PredictFile ＝ 获取Proc地址 (hDllInst, “PredictFile”)
    _FreeSession ＝ 获取Proc地址 (hDllInst, “FreeSession”)

    code ＝ 调用子程序 (_InitSession, )

    s ＝ “此处省略base64编码的文本型字符串”
    调试输出 (_PredictBase64 (s))

    f ＝ “./test.png”
    调试输出 (_PredictFile (f))

    调用子程序 (_FreeSession, )

    卸载库 (hDllInst)
.如果真结束
返回 0

---

作者: liwei321gogo    时间: 2025-1-9 08:17

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型

.局部变量 hDllInst, 整数型
.局部变量 _InitSession, 子程序指针
.局部变量 _PredictBase64, 子程序指针
.局部变量 _PredictFile, 子程序指针
.局部变量 _FreeSession, 子程序指针
.局部变量 code, 整数型
.局部变量 base64Data, 文本型
.局部变量 filePath, 文本型
.局部变量 resultBase64, 文本型
.局部变量 resultFile, 文本型
' 加载 DLL
hDllInst := 加载动态链接库 ("CaptchaLibrary.dll")
如果真 (hDllInst ＝ 0)
输出调试文本 ("Failed to load CaptchaLibrary.dll!")
返回 (1)

' 获取函数地址
_InitSession := 取函数地址 (hDllInst, "InitSession")
_PredictBase64 := 取函数地址 (hDllInst, "PredictBase64")
_PredictFile := 取函数地址 (hDllInst, "PredictFile")
_FreeSession := 取函数地址 (hDllInst, "FreeSession")
' 检查函数地址是否获取成功
如果真 (_InitSession ＝ 0 或 _PredictBase64 ＝ 0 或 _PredictFile ＝ 0 或 _FreeSession ＝ 0)
输出调试文本 ("Failed to get function address!")
卸载动态链接库 (hDllInst)
返回 (1)

' 初始化会话
code := 调用子程序 (_InitSession)
如果真 (code ≠ 0)
输出调试文本 ("Failed to initialize session!")
卸载动态链接库 (hDllInst)
返回 (1)

' 预测 Base64 编码的验证码
base64Data := "此处省略base64编码的文本型字符串"
resultBase64 := 调用子程序 (_PredictBase64, base64Data)
如果真 (resultBase64 ≠ "")
输出调试文本 ("predictBase64: " ＋ resultBase64)
输出调试文本 ("Failed to predict base64!")

' 预测文件中的验证码
filePath := "./test.png"
resultFile := 调用子程序 (_PredictFile, filePath)
如果真 (resultFile ≠ "")
输出调试文本 ("predictFile: " ＋ resultFile)
输出调试文本 ("Failed to predict file!")

' 释放会话
调用子程序 (_FreeSession)
' 卸载 DLL
卸载动态链接库 (hDllInst)
返回 (0)

.版本 2<br /> <br /> .子程序 _启动子程序, 整数型<br />     .局部变量 hDllInst, 整数型<br />     .局部变量 _InitSession, 子程序指针<br />     .局部变量 _PredictBase64, 子程序指针<br />     .局部变量 _PredictFile, 子程序指针<br />     .局部变量 _FreeSession, 子程序指针<br />     .局部变量 code, 整数型<br />     .局部变量 base64Data, 文本型<br />     .局部变量 filePath, 文本型<br />     .局部变量 resultBase64, 文本型<br />     .局部变量 resultFile, 文本型<br /> <br />     ' 加载 DLL<br />     hDllInst := 加载动态链接库 ("CaptchaLibrary.dll")<br />     .如果真 (hDllInst ＝ 0)<br />         输出调试文本 ("Failed to load CaptchaLibrary.dll!")<br />         返回 (1)<br />     .如果真结束<br /> <br />     ' 获取函数地址<br />     _InitSession := 取函数地址 (hDllInst, "InitSession")<br />     _PredictBase64 := 取函数地址 (hDllInst, "PredictBase64")<br />     _PredictFile := 取函数地址 (hDllInst, "PredictFile")<br />     _FreeSession := 取函数地址 (hDllInst, "FreeSession")<br /> <br />     ' 检查函数地址是否获取成功<br />     .如果真 (_InitSession ＝ 0 或 _PredictBase64 ＝ 0 或 _PredictFile ＝ 0 或 _FreeSession ＝ 0)<br />         输出调试文本 ("Failed to get function address!")<br />         卸载动态链接库 (hDllInst)<br />         返回 (1)<br />     .如果真结束<br /> <br />     ' 初始化会话<br />     code := 调用子程序 (_InitSession)<br />     .如果真 (code ≠ 0)<br />         输出调试文本 ("Failed to initialize session!")<br />         卸载动态链接库 (hDllInst)<br />         返回 (1)<br />     .如果真结束<br /> <br />     ' 预测 Base64 编码的验证码<br />     base64Data := "此处省略base64编码的文本型字符串"<br />     resultBase64 := 调用子程序 (_PredictBase64, base64Data)<br />     .如果真 (resultBase64 ≠ "")<br />         输出调试文本 ("predictBase64: " ＋ resultBase64)<br />     .否则<br />         输出调试文本 ("Failed to predict base64!")<br />     .如果真结束<br /> <br />     ' 预测文件中的验证码<br />     filePath := "./test.png"<br />     resultFile := 调用子程序 (_PredictFile, filePath)<br />     .如果真 (resultFile ≠ "")<br />         输出调试文本 ("predictFile: " ＋ resultFile)<br />     .否则<br />         输出调试文本 ("Failed to predict file!")<br />     .如果真结束<br /> <br />     ' 释放会话<br />     调用子程序 (_FreeSession)<br /> <br />     ' 卸载 DLL<br />     卸载动态链接库 (hDllInst)<br /> <br />     返回 (0)

---

作者: qvbydc    时间: 2025-1-9 09:32

尛龍科技 发表于 2025-1-9 01:21
因为没有CaptchaLibrary.dll
我只能把我理解的给你了
[e=0].版本 2

学到了,谢谢

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4