加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

1) 在asp中通过vbs类达成rsa加密与破解,建议入精华

发布时间:2023-08-03 14:45:03 所属栏目:Asp教程 来源:
导读:在asp中通过vbs类实现rsa加密与解密,建议入精华

本文章有两文件组成

test.asp 测试演示文件

clsrsa.asp 实现rsa加密与解密的vbs类文件

下面是代码:

1. test.asp

<%

rem 文章标题:在asp中
在asp中通过vbs类实现rsa加密与解密,建议入精华
 
本文章有两文件组成
 
test.asp 测试演示文件
 
clsrsa.asp 实现rsa加密与解密的vbs类文件
 
下面是代码:
 
1. test.asp
 
<%
 
rem 文章标题:在asp中通过vbs类实现rsa加密与解密
 
rem 收集整理:yanek
 
rem 联系:[email protected]
 
%>
 
<%option explicit%>
 
<!--#include file="clsrsa.asp"-->
 
<%
 
dim lngkeye
 
dim lngkeyd
 
dim lngkeyn
 
dim strmessage
 
dim objrsa
 
if not request.form = "" then
 
    lngkeye = request.form("keye")
 
    lngkeyd = request.form("keyd")
 
    lngkeyn = request.form("keyn")
 
    strmessage = request.form("message")
 
    
 
    set objrsa = new clsrsa
 
    
 
    select case request.form("action")
 
        case "generate keys"
 
            call objrsa.genkey()
 
            lngkeye = objrsa.publickey
 
            lngkeyd = objrsa.privatekey
 
            lngkeyn = objrsa.modulus
 
        case "encrypt"
 
            objrsa.publickey = lngkeye
 
            objrsa.modulus = lngkeyn
 
            strmessage = objrsa.encode(strmessage)
 
        case "decrypt"
 
            objrsa.privatekey = lngkeyd
 
            objrsa.modulus = lngkeyn
 
            strmessage = objrsa.decode(strmessage)
 
    end select
 
    
 
    set objrsa = nothing
 
    
 
end if
 
%>
 
<html>
 
    <head>
 
        <title>rsa cipher demonstration</title>
 
    </head>
 
    <body>
 
        <h1>rsa cipher demonstration</h1>
 
        <p>
 
            you will first need to generate your public/privage key-pair
 
            before you can encrypt/decrypt messages.
 
        </p>
 
        <form method="post">
 
            <table>
 
                <tr>
 
                    <td>public key</td>
 
                    <td><input name="keye" value="<%=server.htmlencode(lngkeye)%>"></td>
 
                    <td rowspan="3">
 
                        <input type="submit" name="action" value="generate keys">
 
                    </td>
 
                </tr>
 
                <tr>
 
                    <td>private key</td>
 
       &nbs
 
 

(编辑:聊城站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章