manage_honor_add.asp

全新后台新闻编辑器 2.全新后台下载编辑器 3.增加图片友情链接管理功能 4.JMail在线发送邮件,支持在线导出Email 5.新增在后台网站配置中指定网站首页新闻条数 6.后台

<!--#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
%><%if Request.QueryString("mark")="southidc" then%>
<%
title=server.htmlencode(Trim(Request("title")))
img=server.htmlencode(Trim(Request("img")))
%>

<%
If title="" Then
response.write "SORRY <br>"
response.write "请输入更新内容的标题!!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If img="" Then
response.write "SORRY <br>"
response.write "内容不能为空!!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from honor "
rs.open sql,conn,1,3
rs.addnew
rs("title")=title
rs("img")=img
rs.update
rs.close
response.redirect "Manage_honor.asp"
end if
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <br> <br> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc">
        <tr> 
          <td class="back_southidc" height="25"> <div align="center"><strong>添加荣誉 <br>
              </strong></div></td>
        </tr>
        <tr> 
          <form method="post" name="myform" action="Manage_honor_add.asp?mark=southidc">
            <td><div align="center"> 
                <table width="100%" border="0" cellspacing="1" cellpadding="0">
                  <tr bgcolor="#ECF5FF"> 
                    <td width="8%" height="25"> 
                      <div align="center">荣誉名称</div></td>
                    <td width="62%"> 
                      <input type="text" name="title" class="inputtext" maxlength="30" size="25"></td>
                  </tr>
                  <tr bgcolor="#ECF5FF"> 
                    <td height="22" bgcolor="#ECF5FF"> 
                      <div align="center">荣誉证书</div></td>
                    <td> 
                      <input name="img" type="text" class="inputtext" id="img" size="30" maxlength="50"> 
                      <font color="#FF0000"> * 图片地址</font></td>
                  </tr>
                  <tr bgcolor="#ECF5FF"> 
                    <td height="25" colspan="2"> 
                      <div align="center"> 
                        <input name="submit" type="submit" value="确定">
                        &nbsp; 
                        <input name="reset" type="reset" value="取消">
                      </div></td>
                  </tr>
                  <tr> 
                    <td colspan="2">图片上传</td>
                  </tr>
                  <tr> 
                    <td colspan="2"> <div align="left">
                        <iframe style="top:2px" ID="UploadFiles" src="../upload_Photo.asp?PhotoUrlID=3" frameborder=0 scrolling=no width="300" height="25"></iframe>
                      </div></td>
                  </tr>
                </table>
              </div></td>
          </form>
        </tr>
      </table>
      <br> </td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->