http://lucky_love.www1.dotnetplayground.com/
The following example implements an reversible encryption example function. The code is very simple, this is not explained here. code show as below:
Encstring.aspx
<% @ Page language = "vb" autoeventwireup = "false" codebehind = "encString.aspx.vb" inherits = "aspxweb.encstring"%>
An example of reversible encryption </ title> <meta name =" generator "content =" Microsoft Visual Studio.Net 7.0> <meta name = "code_language" content = "Visual Basic 7.0 "> <meta name =" vs_defaultClientScript "content =" JavaScript "> <meta name =" vs_targetSchema "content =" http://schemas.microsoft.com/intellisense/ie5 "> </ HEAD> <body MS_POSITIONING = "GridLayout> <h3 align =" center "> an reversible encryption example </ h3> <p align =" center> <form id = "form1" method = "post" runat = "server"> <font face = "Song"> <ask = "textbox1" runat = "server" width = "96%> <asp: textbox> <ask: radiobuttonlist id =" radiobuttonlist1 "runat =" server "font-bold = "True" repeatdirection = "horizontal" autopostback = "true" overselectedIndIndexchanged = "showres"> </ asp: radiobuttonlist> <ask: textbox id = "TextBox2" runat = "S ERVER "width =" 96% "> </ asp: textbox> </ font> </ form> </ p> </ body> </ html> Encstring.aspx.vb</p>
<p>Imports SystemImports System.IOImports System.XmlImports System.TextImports System.Security.CryptographyPublic Class EncString Inherits System.Web.UI.Page Protected WithEvents TextBox1 As System.Web.UI.WebControls.TextBox Protected WithEvents TextBox2 As System.Web.UI.WebControls .TextBox Protected WithEvents Form1 As System.Web.UI.HtmlControls.HtmlForm Protected WithEvents RadioButtonList1 As System.Web.UI.WebControls.RadioButtonList # Region "Web Form Designer Generated Code" 'This call is required by the Web Form Designer. <System .Diagnostics.DebuggerStepThrough ()> Private Sub InitializeComponent () End Sub Private Sub Page_Init (ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Init 'CODEGEN: This method call is required by the Web Form Designer 'Do not modify it using the code editor. InitializationComponent () end sub # end region private sub page_load (byval sender as system.object, _ byval e as system.eventargs) Handles mybase.load' PUT user code to initialize the page here If Not IsPostBack Then Dim MyList As New ArrayList () MyList.Add ( "Encryption") MyList.Add ( "decrypt") RadioButtonList1.DataSource = MyList RadioButtonList1.DataBind () End If End Sub 'encryption Public Shared Function EncryptText (ByVal strText As String) As String Return Encrypt (strText, "&% # @,:? *") End Function 'decryption Public Shared Function DecryptText (ByVal strText As String) As String Return decrypt (strText, " &% # @?,: * ") End Function 'Encryption Function Private Shared Function Encrypt (Byval Strencrkey As String) AS String Dim Bykey () as byte =</p>
<p>{} DIM IV () AS BYTE = {& H12, & H34, & HAB, & H78, & H90, & Hab, & HCD, & HEF} try bykey = system.text.encoding.utf8.getbytes (Strench ") DIM DES AS NEW DESCryptoServiceProvider () Dim inputByteArray () As Byte = Encoding.UTF8.GetBytes (strText) Dim ms As New MemoryStream () Dim cs As New CryptoStream (ms, des.CreateEncryptor (byKey, IV), CryptoStreamMode.Write) cs.Write ( inputByteArray, 0, inputByteArray.Length) cs.FlushFinalBlock () Return Convert.ToBase64String (ms.ToArray ()) Catch ex As Exception Return ex.Message End Try End function 'decryption function Private Shared function decrypt (ByVal strText As String, _ ByVal sDecrKey As String) As String Dim byKey () As Byte = {} Dim IV () As Byte = {& H12, & H34, & H56, & H78, & H90, & HAB, & HCD, & HEF} Dim inputByteArray (strText.Length) As Byte Try Bykey = system.text.Encoding.utf8.getbytes (left (sdecrkey, 8)) Dim des new descryptoserviceProvider () InputByTearray = Convert.Fromb ase64String (strText) Dim ms As New MemoryStream () Dim cs As New CryptoStream (ms, des.CreateDecryptor (byKey, IV), CryptoStreamMode.Write) cs.Write (inputByteArray, 0, inputByteArray.Length) cs.FlushFinalBlock () Dim encoding As System.Text.Encoding = System.Text.Encoding.UTF8 Return encoding.GetString (ms.ToArray ()) Catch ex As Exception Return ex.Message End Try End Function Public Sub showRes (ByVal sender As Object, _ ByVal e As system.eventargs) Handles RadiobuttonList1.Selected Indexchanged IF RadiobuttonList1.SelectedIndex = 0 Then TextBox2.text =</p></div><div class="text-center mt-3 text-grey">
转载请注明原文地址:https://www.9cbs.com/read-42010.html</div><div class="plugin d-flex justify-content-center mt-3"></div><hr><div class="row"><div class="col-lg-12 text-muted mt-2"><i class="icon-tags mr-2"></i><span class="badge border border-secondary mr-2"><h2 class="h6 mb-0 small"><a class="text-secondary" href="tag-2.html">9cbs</a></h2></span></div></div></div></div><div class="card card-postlist border-white shadow"><div class="card-body"><div class="card-title"><div class="d-flex justify-content-between"><div><b>New Post</b>(<span class="posts">0</span>)
</div><div></div></div></div><ul class="postlist list-unstyled">
</ul></div></div><div class="d-none threadlist"><input type="checkbox" name="modtid" value="42010" checked /></div></div></div></div></div><footer class="text-muted small bg-dark py-4 mt-3" id="footer"><div class="container"><div class="row"><div class="col">CopyRight © 2020 All Rights Reserved
</div><div class="col text-right">Processed:
<b>0.041</b>, SQL:
<b>9</b></div></div></div></footer><script src="./lang/en-us/lang.js?2.2.0"></script><script src="view/js/jquery.min.js?2.2.0"></script><script src="view/js/popper.min.js?2.2.0"></script><script src="view/js/bootstrap.min.js?2.2.0"></script><script src="view/js/xiuno.js?2.2.0"></script><script src="view/js/bootstrap-plugin.js?2.2.0"></script><script src="view/js/async.min.js?2.2.0"></script><script src="view/js/form.js?2.2.0"></script><script>
var debug = DEBUG = 0;
var url_rewrite_on = 1;
var url_path = './';
var forumarr = {"1":"Tech"};
var fid = 1;
var uid = 0;
var gid = 0;
xn.options.water_image_url = 'view/img/water-small.png';
</script><script src="view/js/wellcms.js?2.2.0"></script><a class="scroll-to-top rounded" href="javascript:void(0);"><i class="icon-angle-up"></i></a><a class="scroll-to-bottom rounded" href="javascript:void(0);" style="display: inline;"><i class="icon-angle-down"></i></a></body></html><script>
var forum_url = 'list-1.html';
var safe_token = 'tkMCa4EqVcN5qTAW_2BF1cvU2nCwXbney2Nadga96ztOURAihPxJTStgRp9esC9lI0SzNdnHw_2B5vKgoYRY';
var body = $('body');
body.on('submit', '#form', function() {
var jthis = $(this);
var jsubmit = jthis.find('#submit');
jthis.reset();
jsubmit.button('loading');
var postdata = jthis.serializeObject();
$.xpost(jthis.attr('action'), postdata, function(code, message) {
if(code == 0) {
location.reload();
} else {
$.alert(message);
jsubmit.button('reset');
}
});
return false;
});
function resize_image() {
var jmessagelist = $('div.message');
var first_width = jmessagelist.width();
jmessagelist.each(function() {
var jdiv = $(this);
var maxwidth = jdiv.attr('isfirst') ? first_width : jdiv.width();
var jmessage_width = Math.min(jdiv.width(), maxwidth);
jdiv.find('img, embed, iframe, video').each(function() {
var jimg = $(this);
var img_width = this.org_width;
var img_height = this.org_height;
if(!img_width) {
var img_width = jimg.attr('width');
var img_height = jimg.attr('height');
this.org_width = img_width;
this.org_height = img_height;
}
if(img_width > jmessage_width) {
if(this.tagName == 'IMG') {
jimg.width(jmessage_width);
jimg.css('height', 'auto');
jimg.css('cursor', 'pointer');
jimg.on('click', function() {
});
} else {
jimg.width(jmessage_width);
var height = (img_height / img_width) * jimg.width();
jimg.height(height);
}
}
});
});
}
function resize_table() {
$('div.message').each(function() {
var jdiv = $(this);
jdiv.find('table').addClass('table').wrap('<div class="table-responsive"></div>');
});
}
$(function() {
resize_image();
resize_table();
$(window).on('resize', resize_image);
});
var jmessage = $('#message');
jmessage.on('focus', function() {if(jmessage.t) { clearTimeout(jmessage.t); jmessage.t = null; } jmessage.css('height', '6rem'); });
jmessage.on('blur', function() {jmessage.t = setTimeout(function() { jmessage.css('height', '2.5rem');}, 1000); });
$('#nav li[data-active="fid-1"]').addClass('active');
</script>
