في ASP ، يتم تنفيذ تشفير RSA وفك التشفير من خلال فئة VBS.
تحتوي هذه المقالة على تكوين وثيقة
ملف توضيح اختبار test.asp
CLSRSA.ASP ينفذ ملفات VBS لتشفير RSA وفك التشفير
ما يلي هو الرمز:
1. Test.asp
<٪
عنوان المقالة REM: تنفيذ تشفير RSA وفك التشفير من خلال فئة VBS في ASP
مجموعة REM والفرز: يانيك
جهة اتصال REM: [البريد الإلكتروني محمي]
٪>
<٪ خيار صريح ٪>
<!-#تضمين ملف = clsrsa.asp->
<٪
قاتمة lngkeye
قاتمة lngkeyd
قاتمة lngkeyn
قاتمة strmessage
قاتمة objrsa
إذا لم يكن الطلب.
lngkeye = request.form (keyee)
lngkeyd = request.form (keyd)
lngkeyn = request.form (keyn)
strmessage = request.form (رسالة)
تعيين OBJRSA = CLSRSA جديد
حدد Case request.form (إجراء)
حالة توليد مفاتيح
استدعاء 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 = لا شيء
إنهاء إذا
٪>
<html>
<head>
<title> RSA Cipher العرض </title>
</head>
<body>
<h1> RSA Cipher Demox </h1>
<p>
ستحتاج إلى إنشاء زوج مفاتيح الجمهور/الخصوصية الخاص بك
قبل أن تتمكن من تشفير الرسائل/فك تشفيرها.
</p>
<طريقة النموذج = post>
<griding>
<tr>
<td> المفتاح العمومي </td>
<td> <input name = key value = <٪ = server.htmlencode (lngkeye) ٪ >> </td>
<td rowspan = 3>
<نوع الإدخال = إرسال اسم = قيمة الإجراء = إنشاء مفاتيح>
</td>
</r>
<tr>
<td> المفتاح الخاص </td>
& nbs