.版本 2 .程序集 JSEncrypt .程序集变量 对象, 对象 .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用 .局部变量 结果, 整数型 CoInitialize (0) 对象.创建 (“MSScriptControl.ScriptControl”, ) ' 创建 对象.写属性 (“Language”, “JavaScript”) 对象.数值方法 (“AddCode”, #rsa_js) ' 载入JSEncrypt .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用 对象.清除 () CoUninitialize () .子程序 置公钥, , 公开 .参数 公钥文本, 文本型 公钥文本 ＝ 子文本替换 (公钥文本, #换行符, , , , 真) 对象.数值方法 (“Eval”, “rsa_setPublicKey('” ＋ 公钥文本 ＋ “')”) .子程序 置私钥, , 公开 .参数 私钥文本, 文本型 私钥文本 ＝ 子文本替换 (私钥文本, #换行符, , , , 真) 对象.数值方法 (“Eval”, “rsa_setPrivateKey('” ＋ 私钥文本 ＋ “')”) .子程序 加密, 文本型, 公开 .参数 待加密文本, 文本型 返回 (对象.文本方法 (“Eval”, “rsa_enc('” ＋ 待加密文本 ＋ “')”)) .子程序 解密, 文本型, 公开 .参数 待解密文本, 文本型 .局部变量 结果, 文本型 返回 (对象.文本方法 (“Eval”, “rsa_dec('” ＋ 待解密文本 ＋ “')”))