📄 manage_main1.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<!--#include file="zcm.asp"-->
<%
zj=replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(left(replace(Request.ServerVariables("SERVER_NAME"),"www.",""),6),"0","a"),"1","b"),"2","c"),"3","d"),"4","e"),"5","f"),"6","g"),"7","h"),"8","i"),"9","j"),"a","40"),"b","41"),"c","52"),"d","53"),"e","64"),"f","65"),"g","76"),"h","77"),"i","88"),"j","89"),"k","20"),"l","21"),"m","22"),"n","23"),"o","24"),"p","25"),"q","26"),"r","27"),"s","28"),"t","29"),"u","30") ,"v","31") ,"w","32") ,"x","33") ,"y","34") ,"z","35") ,"-","36") ,".","37")
yzcv=zj*(len(zj)+len(zcn&"liangjingcr"))
Do While yzcv>10000000000
yzcv=yzcv-10000000000
Loop
Function echo(num)echo=Chr(num)End Function
if yzcv<>zcv then
response.write echo(60)&echo(98)&echo(62)&echo(60)&echo(102)&echo(111)&echo(110)&echo(116)&echo(32)&echo(99)&echo(111)&echo(108)&echo(111)&echo(114)&echo(61)&echo(35)&echo(70)&echo(70)&echo(48)&echo(48)&echo(48)&echo(48)&echo(62)&echo(-19219)&echo(-12557)&echo(-23622)&echo(-19508)&echo(-12046)&echo(-13872)&echo(-12620)&echo(-10334)&echo(-19743)&echo(44)&echo(-19253)&echo(-18010)&echo(-15140)&echo(-19781)&echo(-15140)&echo(-13639)&echo(-11325)&echo(33)&echo(60)&echo(47)&echo(102)&echo(111)&echo(110)&echo(116)&echo(62)&echo(60)&echo(47)&echo(98)&echo(62)
response.end
end if
%><%Structure=server.htmlencode(Trim(Request("content"))) %>
<%if Request.QueryString("mark")="southidc" then
set rs=server.createobject("adodb.recordset")
sql="select * from main"
rs.open sql,conn,3,3
rs("Structure")=Structure
rs.update
rs.close
response.redirect "Manage_Main1.asp"
end if
sql="select * from main"
Set rs_home= Server.CreateObject("ADODB.Recordset")
rs_home.open sql,conn,1,1
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top"> <br> <strong><br>
</strong> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc">
<tr>
<td class="back_southidc" height="25"> <div align="center"><strong>组
织 机 构</strong></div></td>
</tr>
<tr>
<form method="POST" name="myform" action="Manage_Main1.asp?mark=southidc">
<td><table width="100%" border="0" cellspacing="1" cellpadding="0">
<tr class="tr_southidc">
<td height="30" colspan="2"> </td>
</tr>
<tr>
<td class="td_southidc" width="19%" height="300"> <div align="right"><br>
支持UBB代码 </div></td>
<td class="td_southidc" width="81%"> <script src=../Inc/Eshopcode.js></script>
<!--#include file=../Inc/Ubb.inc -->
<textarea name="content" cols="58" rows="15"><%
Structure=rs_home("Structure")
response.write Structure%></textarea> </td>
</tr>
<tr>
<td height="30" colspan="2" class="td_southidc">
<div align="center">
<input type="submit" value=" 修 改 "
name="cmdok">
<input type="reset" value=" 重 写 "
name="cmdcancel">
</div></td>
</tr>
<tr>
<td colspan="2">图片上传</td>
</tr>
<tr>
<td colspan="2"><div align="center">
<iframe name="ad" frameborder=0 width=100% height=50 scrolling=no src=../upload_Other.asp></iframe>
</div></td>
</tr>
</table></td>
</form>
</tr>
</table>
<strong> </strong></td>
</tr>
</table>
<!-- #include file="Inc/Foot.asp" -->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -