<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<html>
|
<head>
|
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
|
<title>测试文档</title>
|
</head>
|
|
<body>
|
<!--#include file="ClassCryptoAES.asp"-->
|
<!--#include file="SHA1.asp"-->
|
<%
|
Dim Enkey
|
Enkey="1eSbetpojD5hX4PqLpXkdXUdTPDs2Pmepr2gxEqnamX"
|
Dim cls
|
Set cls=new ClassCryptoAES
|
cls.EncodingAESKey=Enkey
|
'Response.Write Cls.Decode(Cls.encode(enkey+"="))
|
|
Response.Write Cls.encode("123")&"<br>"
|
|
Response.Write Cls.Decode(Cls.encode(enkey+"="))
|
|
%>
|
|
</body>
|
</html>
|
