以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]判断文件是否加密  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184428)

--  作者:81538475
--  发布时间:2022/12/6 23:30:00
--  [求助]判断文件是否加密
DecryptFile 解密命令如果对没有加密的图片进行操作,会发现文件打不不开了。那么有没有办法判断,文件被加密了呢。
--  作者:有点蓝
--  发布时间:2022/12/7 9:47:00
--  
读取文件,如果可以正常读取就没有加密

Dim img As image = getimage("D:\\问题\\2.png")
msgbox(img Is Nothing) 无法读取就是加密的