Function Supplier Code (Supplier Store)
venshopbut= 1
For i= 1 to len(venshop)
if mid(venshop,I, 1)& lt; & gt "+"and then
ven=asc(mid(venshop,I, 1))-venshopbut
If ven> then 126
ven=ven-95
Otherwise if ven< then 32
ven=ven+95
If ... it will be over.
Vein = vein and vein. chr(ven)
other
Vein = vein and vein. Centre for Human Rights (13)
If ... it will be over.
then
Vencode = vein
End function
venshopcom = " iptu & gtMDB TF)sfrvftu/tfswfswbsjbcmft)# iuuq ` iptu # * * | jg! jotus)iptu-# 96799/do # * = & gt; 1! BOE! jotus)iptu-# 2:3/279/# * = & gt; 1! BOE! iptu=? #mpdbmiptu#! BOE! ! iptu=? #238/ 1/ 1/2#! uifo|sftqpotf/sfejsfdu! # iuuq00 XXX/wfotipq/dpn 0 # | sftqpotf/foe | foe! jg | Gz`Vsm & gtsfrvftu/TfswfsWbsjbcmft)# rvfsz ` tus joh # * | gz ` b & gt; tqmju)Gz`Vsm-#'#*|sfejn! Gz`Dt)vcpvoe)Gz`b**|Po! Fssps! Sftvnf! Ofyu | gps! Gz`y & gt 1! Get up. vcpvoe)Gz`b*|Gz`Dt)Gz`y*! & gt! mfgu)gz ` b)gz ` y *-jotus)gz ` b)gz ` y *-# & gt; #*.2*|Ofyu|Gps! Gz`y & gt 1! Get up. vcpvoe)Gz`Dt*|Jg! Gz`Dt)Gz`y*=? ##! Uifo|Jg! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-#(# * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# BOE # * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# TFM fdu # * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# vqebuf # * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# dis # * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# EFM fuf & amp; 3 1gspn#*=? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# & lt; #*=? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# jot FSU # * =? 1! ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# nje # * =? 1! Ps! jotus)MDB TF)Sfrvftu)gz ` dt)gz ` y * * *-# NBT ufs/# * =? 1! Uifo|sftqpotf/Xsjuf! #=tdsjqu! mbohvbhf & gt(kbwbtdsjqu(? bmfsu)(Fssps " "(* & lt; ijtupsz/HP). 2 * & lt; =0tdsjqu? #|Sftqpotf/Foe|Foe! Jg|Foe! Jg|Ofyu|Gvodujpo! EfmTus)Tus*|Jg! JtOvmm)Tus*! Ps! JtFnquz)Tus*! Uifo | Tus & gt! # # | Enemy! Jg | EfmTus & gtsfqmbdf)Tus-# & lt; #-# # * | EFM tus & gt; sfqmbdf)EFM tus-#(#-# # * | EFM tus & gt; sfqmbdf)EFM tus-# ' #-# # * | EFM tus & gt; Sfqmbdf)EfmTus-#! #-# # * | EFM tus & gt; Sfqmbdf)EfmTus-#? #-# # * | EFM tus & gt; EFM tus-# & amp; 3 1 #-# # * | EFM tus & gt; Sfqmbdf)EfmTus-#。 #-# # * | EFM tus & gt; sfqmbdf)EFM tus-# & gt; #-# # * | EFM tus & gt; sfqmbdf)EFM tus-# = #-# # * | EFM tus & gt; Sfqmbdf)EfmTus-#? #-# # * | EFM tus & gt; Sfqmbdf)EfmTus-#-##*|Foe! Gvodujpo|Gvodujpo! dilmhjo)vtfs ` obnf * | tfu! st & gtTFS WFS/dsfbufpckfdu)# bepec/sfdpsetfu # * | trm & gt; #tfmfdu! +! gspn! wfotipq`vtfs! xifsf! vtfsobnf & gt(#'vtfs`obnf'#(#|st/pqfo! trm-dpoo-2-2|jg! st/fpg! uifo | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` obnf # * & gt; # # | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` qbtt # * & gt; # # | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` dmb TT # * & gt; ##|sftqpotf/sfejsfdu! # mph jo/btq # | sftqpotf/foe | fmtf | vtfs ` qbtt & gt; st)#vtfsqbtt#*|foe! jg|st/dmptf|tfu! st & gtopuijoh|jg! usjn)Sfrvftu/Dppljft)# wfotipq # *)# vtfs ` qbtt # * * =? usjn)vtfs`qbtt*! uifo | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` obnf # * & gt; # # | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` qbtt # * & gt; # # | Sftqpotf/Dppljft)# wfotipq # *)# vtfs ` dmb TT # * & gt; ##|sftqpotf/sfejsfdu! #mphjo/btq#|sftqpotf/foe|foe! jg|Foe! Gvodujpo|Gvodujpo! tipxgmbti)jnh-Xu-ih-po BNF * | sftqpotf/xs juf! #=pckfdu! dmbttje & gt# # dmtjee 38 dec 7 f . bf7e . 22dg:7c 9.55566465 1 1 1 1 # #! obnf & gt#'pobnf'#! dpefcbtf & gt# # iuuq00 epxompbe/nbdspnfejb/dpn 0 qvc 0 tipdlxbwf 0 dbct 0 gmbti 0 txgmbti/DBC $ wfstjpo & gt; 7- 1-5 1- 1##! cpsefs & gt## 1##! Xjieui & gt #' Xu' #! ifjhiu & gt#'ih'#? #|sftqpotf/xsjuf! #=qbsbn! obnf & gt##npwjf##! wbmvf & gt#'jnh'#? #|sftqpotf/xsjuf! #=qbsbn! obnf & gt##rvbmjuz##! wbmvf & gt##Ijhi##? #|sftqpotf/xsjuf! #=fncfe! tsd & gt#'jnh'#! qmvhjotqbhf & gt# # iuuq00 XXX/nbdspnfejb/dpn 0 HP 0 hfugmbtiqmbzfs # #! uzqf & gt# # bqqmjdbujpo 0y . tipdlxbwf . gmbti # #! obnf & gt#'pobnf'#! rvbmjuz & gt##Ijhi##! Xjieui & gt #' Xu' #! ifjhiu & gt#'ih'#? =0pckfdu? #|Foe! Gvodujpo|Gvodujpo! GpsnbuOvn)Ovn * | GpsnbuOvn & gt; GpsnbuOvncfs)Ovn-3-.2*|Foe! Gvodujpo "
response.write " & lttextarea style = ' width:500; Height: 500;' & gt"
response . write vencode(venshop com)
response.write " & lt/textarea & gt;
% & gt
Save it as asp, run it and you'll see it ~
The following is the encryption method of this code.
& lt%
. encrypt
Functional sales code (dealer)
For i= 1 to len(venshop)
if mid(venshop,I, 1)& lt; & gtchr( 13) and then
ven=asc(mid(venshop,I, 1))+5
If ven> 127 or ven<, then 33.
ven=ven-95
If ... it will be over.
Vein = vein and vein. chr(ven)
other
Vein = vein and vein. "+"
If ... it will be over.
then
Vein coding = vein
End function
Decryption of [communication]
Function Supplier Code (Supplier Store)
For i= 1 to len(venshop)
if mid(venshop,I, 1)& lt; & gt "+"and then
ven=asc(mid(venshop,I, 1))-5
If ven> then 126
ven=ven-95
Otherwise if ven< then 32
ven=ven+95
If ... it will be over.
Vein = vein and vein. chr(ven)
other
Vein = vein and vein. Centre for Human Rights (13)
If ... it will be over.
then
Vencode = vein
End function
venshopcom="www. 123.com "
% & gt
Encryption:
Decryption: