ASP에서 RSA 암호화 및 암호 해독은 VBS 클래스를 통해 구현됩니다
이 기사에는 두 개의 문서 구성이 있습니다
test.asp 테스트 데모 파일
Clsrsa.asp는 RSA 암호화 및 암호 해독 용 VBS 파일을 구현합니다
다음은 코드입니다.
1. test.asp
<%
REM 기사 제목 : ASP의 VBS 클래스를 통한 RSA 암호화 및 암호 해독 구현
REM 수집 및 정렬 : Yanek
REM 연락처 : [이메일 보호]
%>
<%옵션 명시 적%>
<!-#포함 파일 = clsrsa.asp->
<%
Dim lngkeye
희미한 lngkeyd
Dim lngkeyn
희미한 strmessage
희미한 objrsa
request.form =이 아닌 경우
lngkeye = request.form (keyee)
lngkeyd = request.form (keyd)
lngkeyn = request.form (keyn)
strmessage = request.form (메시지)
OBJRSA = NEW CLSRSA를 설정하십시오
사례 request.form (action) 선택
케이스는 키를 생성합니다
Objrsa.genkey ()에게 전화하십시오.
lngkeye = objrsa.publickey
lngkeyd = objrsa.privatekey
lngkeyn = objrsa.modulus
케이스 암호화
objrsa.publickey = lngkeye
objrsa.modulus = lngkeyn
strmessage = objrsa.encode (strmessage)
케이스 해독
objrsa.privatekey = lngkeyd
objrsa.modulus = lngkeyn
strmessage = objrsa.decode (strmessage)
종료 선택
OBJRSA = 아무것도 설정하지 않습니다
끝 If
%>
<html>
<헤드>
<title> RSA Cipher 데모 </title>
</head>
<body>
<H1> RSA 암호 데모 </h1>
<p>
공개/privage 키 페어 페어를 생성해야합니다
메시지를 암호화/암호화하기 전에.
</p>
<form 메소드 = post>
<테이블>
<tr>
<td> 공개 키 </td>
<td> <입력 이름 = 키 값 = <%= server.htmlencode (lngkeye)%>> </td>
<td rowspan = 3>
<입력 유형 = 제출 이름 = 동작 값 = 키 생성 키>
</td>
</tr>
<tr>
<td> 개인 키 </td>
& nbs