外部モジュールを利用せずにVBSで文字列の暗号化を実装したいです。
RijndaelManagedクラスを利用して、AES-128-CBCでの暗号化を作ってみたんですが
暗号化文字列を今回WEBでやり取りさせたいので、base64に変換したかったり
パスフレーズも設定できるようにして、WEB側(python)でも同じパスフレーズで復号化できるようにしたいです。
どうかよろしくお願いします。
【test.vbs】
SET objRm = CreateObject("System.Security.Cryptography.RijndaelManaged")
SET objUe = CreateObject("System.Text.UTF8Encoding")
test="abc"
bytes = objUe.GetBytes_4(test)
With objRm
.KeySize = 128 .BlockSize = 128 .Mode = 1 ' CipherMode.CBC .IV .Key SET enc = .CreateEncryptor() SET dec = .CreateDecryptor()
End With
bytec=enc.TransformFinalBlock((bytes),0,lenb(bytes))
msgbox objUe.GetString((bytec))
byted=dec.TransformFinalBlock((bytec),0,lenb(bytec))
msgbox objUe.GetString((byted))
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。