CreateFileA 怎么把打开的文件名全部保存下来

21186213

LEOONL 发表于 2024-11-13 16:27
你换成 文本 ＝ 文本 ＋获取文件名称 【i】＋ #换行符 试试

  

如果真 (取字节集长度 (原始CreateFileA) ＞ 0)
写到内存 (原始CreateFileA, 拦截CreateFileA, )
获取文件名称 ＝ 分割文本 ( #需要解密文件, #换行符, )
文本2 ＝ 分割文本 (打开文件名, #换行符, )
计次循环首 (取数组成员数 (文本2), i)
文本 ＝ 文本 ＋ 文本2 [i] ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\文件名.txt”, 到字节集 (文本))
如果 (到小写 (文本_取右边 (处理斜杠 (打开文件名), “\”, , )) ＝ 获取文件名称 [i])
开始解密 ＝ 真
开始解密 ＝ 假
句柄 ＝ 创建文件1_ (打开文件名, 访问权限, 共享方式, 安全特性, 创建方式, 文件属性, 从文件复制文件属性)
值 ＝ { 184 }
写到内存 (值 ＋ 到字节集 (&NEWCreateFileA) ＋ { 255, 224 }, 拦截CreateFileA, 8)
返回 (句柄)

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

只写出一个 遇到新的就被替换了！！！

21186213

LEOONL 发表于 2024-11-13 16:27
你换成 文本 ＝ 文本 ＋获取文件名称 【i】＋ #换行符 试试

只写出一个~有新的就替换老的了

21186213

LEOONL 发表于 2024-11-13 16:15
你这个变量是文本型啊，不是数组怎么取，先分割成数组
[e=0].版本 2

写出来的是这个

D:\文件夹\文件夹\文件夹\文件夹\文件夹/rhathys.skel
有个换行 但是没数据了

然后就没了

21186213

LEOONL 发表于 2024-11-13 16:39
[e=0].版本 2

.子程序 NEWCreateFileA, 整数型, , 这里还原API

出来了一些  还是会被替换一些