不论路劲多长 只取文件名称

21186213

LEOONL 发表于 2024-10-27 23:44
文件名是正确的吗 开始解密=真跳出循环了吗

loginlist.csv
channellist.csv

如果只写这两个 是正常的 多了的话 就不行

21186213

LEOONL 发表于 2024-10-27 23:44
文件名是正确的吗 开始解密=真跳出循环了吗

  

如果真 (取字节集长度 (原始CreateFileA) ＞ 0)
写到内存 (原始CreateFileA, 拦截CreateFileA, )
获取文件名称 ＝ 分割文本 ( #加密文件名, #换行符, )
计次循环首 (取数组成员数 (获取文件名称), i)
获取文件名称1 ＝ 分割文本 (获取文件名称 [i], #换行符, )
如果 (到小写 (文本_取右边 (打开文件名, “/”, , )) ＝ 获取文件名称 [i])
开始解密 ＝ 真
跳出循环 ()
开始解密 ＝ 假

计次循环尾 ()
句柄 ＝ 创建文件1_ (打开文件名, 访问权限, 共享方式, 安全特性, 创建方式, 文件属性, 从文件复制文件属性)
值 ＝ { 184 }
写到内存 (值 ＋ 到字节集 (&NEWCreateFileA) ＋ { 255, 224 }, 拦截CreateFileA, 8)
返回 (句柄)

.版本 2<br /> <br /> .如果真 (取字节集长度 (原始CreateFileA) ＞ 0)<br />     写到内存 (原始CreateFileA, 拦截CreateFileA, )<br /> .如果真结束<br /> 获取文件名称 ＝ 分割文本 (#加密文件名, #换行符, )<br /> .计次循环首 (取数组成员数 (获取文件名称), i)<br />     获取文件名称1 ＝ 分割文本 (获取文件名称 <i>, #换行符, )<br />     .如果 (到小写 (文本_取右边 (打开文件名, “/”, , )) ＝ 获取文件名称 <i>)<br />         开始解密 ＝ 真<br />         跳出循环 ()<br />     .否则<br />         开始解密 ＝ 假<br />     .如果结束<br /> <br /> .计次循环尾 ()<br /> 句柄 ＝ 创建文件1_ (打开文件名, 访问权限, 共享方式, 安全特性, 创建方式, 文件属性, 从文件复制文件属性)<br /> 值 ＝ { 184 }<br /> 写到内存 (值 ＋ 到字节集 (&NEWCreateFileA) ＋ { 255, 224 }, 拦截CreateFileA, 8)<br /> 返回 (句柄)

  

子程序名	返回值类型	公开	备 注
NEWReadFile	整数型
参数名	类 型	参考	可空	数组	备 注
文件句柄	整数型				文件的句柄
数据缓冲区	整数型				用于保存读入数据的一个缓冲区
字符数	整数型				要读入的字符数
实际读入字符数	整数型				从文件中实际读入的字符数
异步过程	整数型				OVERLAPPED，如文件打开时指定了FILE_FLAG_OVERLAPPED，那么必须用这个参数引用一个特殊的结构。那个结构定义了一次异步读取操作。否则，应将这个参数设为NULL（将函数声明成ByVal As 并传递零值）;

变量名	类 型	静态	数组	备 注
值	字节集
句柄	整数型
截获数据	字节集

如果真 (取字节集长度 (原始ReadFile) ＞ 0)
写到内存 (原始ReadFile, 拦截ReadFile, )
句柄 ＝ 读入数据_ (文件句柄, 数据缓冲区, 字符数, 实际读入字符数, 异步过程)
如果真 (开始解密 ＝ 真)
_内存_读字节集内存 (, 数据缓冲区, 截获数据, 字符数)
截获数据 ＝ 解密数据 (截获数据, “123456”, #RC4算法 )
_内存_写字节集内存 (, 数据缓冲区, 截获数据)
' 写出字节集 (文件号, 截获数据)
值 ＝ { 184 }
写到内存 (值 ＋ 到字节集 (&NEWReadFile) ＋ { 255, 224 }, 拦截ReadFile, 8)
返回 (句柄)

i支持库列表	支持库注释
dp1	数据操作支持库一

.版本 2<br /> .支持库 dp1<br /> <br /> .子程序 NEWReadFile, 整数型<br /> .参数 文件句柄, 整数型, , 文件的句柄<br /> .参数 数据缓冲区, 整数型, , 用于保存读入数据的一个缓冲区<br /> .参数 字符数, 整数型, , 要读入的字符数<br /> .参数 实际读入字符数, 整数型, , 从文件中实际读入的字符数<br /> .参数 异步过程, 整数型, , OVERLAPPED，如文件打开时指定了FILE_FLAG_OVERLAPPED，那么必须用这个参数引用一个特殊的结构。那个结构定义了一次异步读取操作。否则，应将这个参数设为NULL（将函数声明成ByVal As 并传递零值）;<br /> .局部变量 值, 字节集<br /> .局部变量 句柄, 整数型<br /> .局部变量 截获数据, 字节集<br /> <br /> .如果真 (取字节集长度 (原始ReadFile) ＞ 0)<br />     写到内存 (原始ReadFile, 拦截ReadFile, )<br /> .如果真结束<br /> 句柄 ＝ 读入数据_ (文件句柄, 数据缓冲区, 字符数, 实际读入字符数, 异步过程)<br /> .如果真 (开始解密 ＝ 真)<br />     _内存_读字节集内存 (, 数据缓冲区, 截获数据, 字符数)<br />     截获数据 ＝ 解密数据 (截获数据, “123456”, #RC4算法)<br />     _内存_写字节集内存 (, 数据缓冲区, 截获数据)<br />     ' 写出字节集 (文件号, 截获数据)<br /> .如果真结束<br /> 值 ＝ { 184 }<br /> 写到内存 (值 ＋ 到字节集 (&NEWReadFile) ＋ { 255, 224 }, 拦截ReadFile, 8)<br /> 返回 (句柄)

21186213

LEOONL 发表于 2024-10-27 20:11
你看看你这最后一个文本是slotitem.csv 不是 item.csv

大佬 求教了！！

21186213

LEOONL 发表于 2024-10-27 23:44
文件名是正确的吗 开始解密=真跳出循环了吗

21186213

LEOONL 发表于 2024-10-27 20:11
你看看你这最后一个文本是slotitem.csv 不是 item.csv

看单独测试了下  感觉是 把前面解密了 然后就跳出循环了 不再继续解密后面的了

LEOONL

21186213 发表于 2024-10-28 00:23
看单独测试了下  感觉是 把前面解密了 然后就跳出循环了 不再继续解密后面的了 ...

不知道你的解密子程序是怎么执行的

21186213

LEOONL 发表于 2024-10-28 00:31
不知道你的解密子程序是怎么执行的

DLL拦截解密.rar (249.94 KB, 下载次数: 1)

2024-10-28 00:36 上传

点击文件名下载附件

你看下

LEOONL

21186213 发表于 2024-10-28 00:36
你看下

没看懂要干嘛的，哪些代码是你写的，原没改过的源码有没有

21186213

LEOONL 发表于 2024-10-28 01:19
没看懂要干嘛的，哪些代码是你写的，原没改过的源码有没有

有的。我找给你https://www.eyuyan.la/post/3387.html这个

798924038

替换文本/ -> \ 然后 倒找文本 \ 用文本长度 - 找到的位置