ASP에서 VBS 클래스를 통해 RSA 암호화 및 암호 해독 구현, 본질을 입력하는 것이 좋습니다.
이 기사는 두 개의 문서로 구성됩니다
test.asp 테스트 데모 파일
Clsrsa.asp는 RSA 암호화 및 암호 해독 VBS 파일을 구현합니다
코드는 다음과 같습니다.
1.estest.asp
코드 사본은 다음과 같습니다.
<%
REM 기사 제목 : ASP에서 VBS 클래스를 통한 RSA 암호화 및 암호 해독 구현
REM 수집 및 정렬 : Yanek
REM 연락처 : [email protected]
%>
<%옵션 출현%>
<!-#includefile = "clsrsa.asp"->
<%
Dimlngkeye
Dimlngkeyd
Dimlngkeyn
DIMSTRMESSAGE
Dimobjrsa
ifnotRequest.form = ""그런 다음
lngkeye = request.form ( "keye")
lngkeyd = request.form ( "keyd")
lngkeyn = request.form ( "keyn")
strmessage = request.form ( "메시지")
setobjrsa = newclsrsa
selectCaseRequest.form ( "action")
"GenerateKeys"사례
callobjrsa.genkey ()
lngkeye = objrsa.publickey
lngkeyd = objrsa.privatekey
lngkeyn = objrsa.modulus
"암호화"사례
objrsa.publickey = lngkeye
objrsa.modulus = lngkeyn
strmessage = objrsa.encode (strmessage)
"Desypt"사례
objrsa.privatekey = lngkeyd
objrsa.modulus = lngkeyn
strmessage = objrsa.decode (strmessage)
EndSelect
setobjrsa = 아무것도 없습니다
endif
%>
<html>
<헤드>
<title> rsacipherdemonstration </title>