การใช้การเข้ารหัส RSA และการถอดรหัสผ่านคลาส VBS ใน ASP ขอแนะนำให้ป้อน Essence
บทความนี้ประกอบด้วยเอกสารสองฉบับ
test.asp test ไฟล์ตัวอย่าง
clsrsa.asp ใช้ไฟล์การเข้ารหัส RSA และการถอดรหัสไฟล์ VBS
นี่คือรหัส:
1. ทดสอบ.
การคัดลอกรหัสมีดังนี้:
-
ชื่อบทความ REM: การใช้การเข้ารหัส RSA และการถอดรหัสผ่านคลาส VBS ใน ASP
คอลเลกชันและการเรียงลำดับ REM: Yanek
REM ติดต่อ: [email protected]
-
<%ตัวเลือก Explicit%>
<!-#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 ("การกระทำ")
กรณี "GenerateKeys"
callobjrsa.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)
endelect
setObjrsa = ไม่มีอะไร
endif
-
<html>
<head>
<title> rsacipherDemonstration </title>