[已解决]_Crypt_EncryptData加密后的字符串写入文本文件就变成乱码

smooth

$bEncrypted输出正常，但是写入文本文件就变成了乱码。

  16 = 强制使用二进制(字节)模式(参考注意)
   32 = 使用 Unicode UTF16 小编码读写模式,读取不会覆盖存在的BOM.
   64 = 使用 Unicode UTF16 大编码读写模式,读取不会覆盖存在的BOM.
   128 = 使用 Unicode UTF8 (带BOM)读写模式,读取不会覆盖存在的BOM.
   256 = 使用 Unicode UTF8 (无BOM)读写模式.
   16384 = 当打开一个文件读取时(文件没有BOM), 使用完整文件 UTF8 检测. 如果没有使用这一模式,则只会检测文件最前端的 UTF8 标志.
文件夹路径必须存在(如果没有指定模式 '8' - 见注释).

这些参数我都试过了，写入全部都变成乱码，这是咋回事呢？谢谢！

#include <Crypt.au3>
Local Const $sUserKey = "WDZnn" ; 
Local $sData = "44-8A-5B-62-65-8A" ; 
Local $bEncrypted = _Crypt_EncryptData($sData, $sUserKey, $CALG_RC4)
MsgBox(0,0,$bEncrypted)
Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt", 2)
FileWrite($hFiles, $bEncrypted)
FileClose($hFiles)

xyx115

#include <Crypt.au3>
Local Const $sUserKey = "WDZnn" ; 
Local $sData = "44-8A-5B-62-65-8A" ; 
Local $bEncrypted = _Crypt_EncryptData($sData, $sUserKey, $CALG_RC4)
MsgBox(0,0,$bEncrypted)
Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt", 256+1)
FileWrite($hFiles, $bEncrypted)
FileClose($hFiles)

Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt", 256+1)
这样就可以解决问题。具体的参看教程。我也不懂

xyx115

#include <Crypt.au3>
Local Const $sUserKey = "WDZnn" ; 
Local $sData = "44-8A-5B-62-65-8A" ; 
Local $bEncrypted = _Crypt_EncryptData($sData, $sUserKey, $CALG_RC4)
MsgBox(0,0,$bEncrypted)
Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt", 256+1)
FileWrite($hFiles, $bEncrypted)
FileClose($hFiles)

Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt", 256+1)
这样就可以解决问题。具体的参看教程。我也不懂

xyx115

刚才的不对，我的试验环境和你的有区别。实际测试，需要这样
Local $hFiles = FileOpen(@ScriptDir & "\RegInfo.txt",2)
FileWrite($hFiles,$bEncrypted&@CRLF)
重点是$bEncrypted&@CRLF

smooth

回复 4# xyx115
按你说的就成了，不知道这是为什么。谢谢！

gjotrfdq

路过留下脚印