ASPでVBSクラスを通じてRSA暗号化と復号化を実装すると、エッセンスを入力することをお勧めします
この記事は、2つのドキュメントで構成されています
test.aspテストデモファイル
CLSRSA.ASPは、RSA暗号化と復号化VBSファイルを実装します
これがコードです:
1.Test.asp
コードコピーは次のとおりです。
<%
REM記事タイトル:ASPのVBSクラスを通じてRSA暗号化と復号化の実装
REMコレクションとソート:Yanek
REM連絡先:[email protected]
%>
<%optionexplicit%>
<! - #includefile = "clsrsa.asp" - >
<%
dimlngkeye
dimlngkeyd
dimlngkeyn
薄暗いストーメッジ
dimobjrsa
ifnotrequest.form = "" then
lngkeye = request.form( "keye")
lngkeyd = request.form( "keyd")
lngkeyn = request.form( "keyn")
strmessage = request.form( "メッセージ")
setobjrsa = newclsrsa
selectcaserequest.form( "action")
ケース「GeneateKeys」
callobjrsa.genkey()
lngkeye = objrsa.publickey
lngkeyd = objrsa.privatekey
lngkeyn = objrsa.modulus
ケース「暗号化」
objrsa.publickey = lngkeye
objrsa.modulus = lngkeyn
strmessage = objrsa.encode(strmessage)
ケース「Decrypt」
objrsa.privatekey = lngkeyd
objrsa.modulus = lngkeyn
strmessage = objrsa.decode(strmessage)
EndSelect
setobjrsa =何もない
endif
%>
<html>
<head>
<title> rsacipherdemonstration </title>