---------->JS+HTML加密：www.520diannao.com) `; b+ B0 I1 [6 F
电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站! Z1 I* O3 [$ x4 z
<html>
4 ~% C I" q5 m# L我爱电脑技术论坛<script script="JavaScript">打造最好的电脑自学交流论坛4 W- ?0 ^+ p) J. R9 c A k
function enCode(theText)
$ O- F; f6 j4 q' c/ h" V& a打造最好的电脑自学交流论坛{www.520diannao.com. W5 ^6 _+ V; ]5 c9 C( _' m
output=new String;打造最好的电脑自学交流论坛' L+ r% d) M/ Y* E& ~: I# P5 j @
TextSize=theText.length;www.520diannao.com4 x# F# Z4 B2 N8 ]" [' M
for (i = 0; i < TextSize; i++)电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站5 e5 `% e# ?& F1 ~1 [7 ^/ N: L7 x
{5 j) }5 K6 d; E1 {
if(theText.charCodeAt(i)=="13")www.520diannao.com& e3 n& Z6 |* E, D* |) V3 _1 x
{
# I8 T$ J8 q2 a2 P- {) h2 M我爱电脑技术社区--打造最好的电脑技术自学交流平台 output="鹏"+output;
4 |' q. r+ m/ S# c; f' uwww.520diannao.com }
4 Q, e; H: ~$ q# j! B, o( A else if(theText.charCodeAt(i)=="10")
) g; r: E- [8 ]9 j0 L, m" A" v打造最好的电脑自学交流论坛 {
* T8 B8 H6 ~* _打造最好的电脑自学交流论坛 output+="";% m: q3 k( v4 h
}
1 K7 B) f9 [# q: o3 ~我爱电脑技术社区--打造最好的电脑技术自学交流平台 else
, ?4 I( Q$ J1 y0 h) L我爱电脑技术社区--打造最好的电脑技术自学交流平台 {电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站* M1 U& Z' t' }* [" @2 w
output=theText.charAt(i)+output;打造最好的电脑自学交流论坛: v; E# Y* o% U1 k
}! A, W% E5 E0 `, T- k+ s' q& k
}电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站- R. s4 a9 e' Q! V
return output我爱电脑技术社区--打造最好的电脑技术自学交流平台& X4 `9 H& C; i5 V/ n6 w! b+ q
}
) I# y" S3 D, x" @0 G# n# X我爱电脑技术社区--打造最好的电脑技术自学交流平台</script>0 \# N) t6 W0 f/ k6 H7 F
<form name=encform onsubmit="return false;" />www.520diannao.com9 w5 }* s0 V, r! T; n' n- b
<textarea name=box1 rows=16 cols=120></textarea>
1 a' z0 l' m! y _9 ]2 I<br />我爱电脑技术论坛; x" }, P. L2 P$ D& V$ m
<input type=button value="加密到下面文本框" onClick="this.form.box2.value=enCode(this.form.box1.value);" /><br />打造最好的电脑自学交流论坛0 Q0 y. v3 ?' I. Y! F, Y6 X
<textarea name=box2 rows=16 cols=120></textarea>! x* F# e$ N0 K! p, {$ z7 s
</form>我爱电脑技术社区--打造最好的电脑技术自学交流平台' C$ Y o( @5 l- a1 n* N
</form>
* R) a( z! e, p7 Q1 K' G2 x电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站</html>
, c! C; D6 z6 X ~我爱电脑技术社区--打造最好的电脑技术自学交流平台保存为html格式然后用IE打开，将需要加密的部分填写上，然后点击按钮"加密到下面文本框" ，就可以得到加密后的字符串了。
9 l# K: R# G. @2 B6 n! _8 n9 i我爱电脑技术社区--打造最好的电脑技术自学交流平台 上面的加密函数是enCode,他的作用是将ASP代码(Code)中的换行换为鹏，得到Code1，然后将Code1倒序(13和10分别是回车和换行的编码)。比如：
+ {; D' U. @+ `; Q$ R" X$ n. G/ s+ M) C. o电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站我爱电脑技术社区--打造最好的电脑技术自学交流平台9 Z( s9 N, r: y8 f; a
Sub RRS(str)电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站: y) e, ~0 {! U& W/ L# p' b+ r
4 b, }# j: u5 y9 L- Vwww.520diannao.com response.write(str)
, j% _& B9 w9 l# {* zwww.520diannao.com
0 [* [5 w( g( }7 p% ] q我爱电脑技术社区--打造最好的电脑技术自学交流平台 End Sub; }" u# f: i4 l( p0 ^7 c7 g- e
/ A! Z1 Z5 @: K \
加密后就为
9 x" k' p& Z; @& g5 g) swww.520diannao.com
4 s# O# O3 T0 R5 H7 S& f7 q7 h; P打造最好的电脑自学交流论坛 buS dnE鹏)rts(etirw.esnopser 鹏)rts(SRR buSwww.520diannao.com1 a$ Q7 _" o+ r- _' V* i
0 |6 ^/ m- {) f3 x4 V打造最好的电脑自学交流论坛 写了加密函数后就要写出对于的解密函数，必须用ASP编写
z& d4 h8 X' C, ~( s$ L+ s我爱电脑技术社区--打造最好的电脑技术自学交流平台
0 M( R! z6 M, Q Kdim psEncode,psStr,psI
2 H F9 H8 ^8 I: O- N打造最好的电脑自学交流论坛Function unCode(psEncode) M! H1 D [! f# l
For psI=1 To Len(psEncode)
& c+ _' u0 S% E) M! g) h: M打造最好的电脑自学交流论坛If Mid(psEncode,psI,1)<>"鹏" Then
8 Z( ~# w; }" e7 a- Y# d! E5 f) y电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站psNewStr=Mid(psEncode,psI,1)&psNewStr
. a% z9 X: y7 ^. F7 P& z+ R, BElse打造最好的电脑自学交流论坛( f+ p# t/ Q w0 ~3 i
psNewStr=vbCrlf&psNewStr
1 I2 |, I; j. _6 n4 T' ?6 o& T电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站End If
& \9 x/ t& O9 J, \! ^www.520diannao.comNext
3 N0 t8 ]' H" {/ `) x; Y6 \- G$ {我爱电脑技术论坛unCode=psNewStr
9 w, p# |8 F$ P0 R ^电脑,技术,IT,学习,交流,网络安全,QQ,硬件,软件,编程,教程,建站End Function
7 g! c0 B8 I! D我爱电脑技术社区--打造最好的电脑技术自学交流平台
2 c% A" D1 b1 @' P& ~' I打造最好的电脑自学交流论坛
