In ASP werden die RSA -Verschlüsselung und -Delie in der VBS -Klasse implementiert.
Dieser Artikel enthält zwei Dokumente Komposition
test.asp test Demonstrationsdatei
CLSRSA.asp implementiert VBS -Dateien für die RSA -Verschlüsselung und -Deliektion
Das Folgende ist der Code:
1. Test.asp
<%
REM -Artikel Titel: Implementieren Sie die RSA -Verschlüsselung und -Delie über die VBS -Klasse in ASP
REM -Sammlung und Sortierung: Yanek
REM -Kontakt: [E -Mail geschützt]
%>
<%Option explizit%>
<!-#include file = clsrsa.asp->
<%
Dim Lngkeye
Dim lngkeyd
Dim lngkeyn
Dunkeln Strmessage
Dimer objrsa
wenn nicht anforderung.form = dann
lngkeye = request.form (keyee)
lngkeyd = request.form (keyd)
lngkeyn = request.form (Keyn)
strMessage = request.form (meldung)
Setzen Sie objrsa = neue clsrsa
Wählen Sie die Fallanforderung. Form (Aktion)
Fall generieren Schlüssel
Rufen Sie objrsa.genkey () an
lngkeye = objrsa.publickey
lngkeyd = objrsa.privateKey
lngkeyn = objrsa.modulus
Fallverschlüsseln
objrsa.publickey = lngkeye
objrsa.modulus = lngkeyn
Strmessage = objrsa.encode (strmessage)
Fall entschlüsselt
objrsa.privateKey = lngkeyd
objrsa.modulus = lngkeyn
Strmessage = objrsa.decode (strmessage)
Ende auswählen
Setzen Sie objrsa = nichts
Ende wenn
%>
<html>
<kopf>
<title> RSA -Verschlüsselungsdemonstration </title>
</head>
<body>
<h1> RSA -Cipher -Demonstration </h1>
<p>
Sie müssen Ihr öffentliches/privates Schlüsselpair-Pair generieren
Bevor Sie Nachrichten verschlüsseln/entschlüsseln können.
</p>
<Formmethode = post>
<tabelle>
<tr>
<td> öffentlicher Schlüssel </td>
<td> <Eingabename = Schlüsselwert = <%= server.htmlencode (lngkeye)%>> </td>
<td rowspan = 3>
<Eingabe type = senden name = den Aktionswert = generieren Tasten>
</td>
</tr>
<tr>
<td> Privatschlüssel </td>
& nbs