manage_yenewsadd.asp

来自「烈火之家整站程序 本程序集商业娱乐一体,本来是给自己用的但是我的国外空间支持不够」· ASP 代码 · 共 84 行

<%@ language="VBScript"%>
<!--#include file="admin.asp"-->
<!--#include file="conn.asp"-->
<%if Request.QueryString("no")="eshop" then%>
<%
title=server.htmlencode(Trim(Request("title")))
content=server.htmlencode(Trim(Request("content")))
%>
<%


If title="" Then
response.write "SORRY <br>"
response.write "请输入更新内容的标题!!<a href=""javascript:history.go(-1)"">返回重输</a>"
response.end
end if
If content="" 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 Yenews "
rs.open sql,conn,1,3
rs.addnew
rs("title")=title
rs("content")=content
rs("counter")=0
rs.update
rs.close
response.redirect "Manage_yeNews.asp"
end if
%>
<!-- #include file="../Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
        <tr class=a4> 
          <td height="40"> <div align="center"><strong>添加技术文档
              </strong></div></td>
        </tr>
       <tr class=a4> 

            <form method="post" action="Manage_yeNewsAdd.asp?no=eshop"><td><div align="center"> 
                <table width="100%" border="0" cellspacing="2" cellpadding="3">
                  <tr> 
                    <td width="8%" height="25" bgcolor="#C0C0C0"> <div align="center">标&nbsp;&nbsp;题</div></td>
                    <td width="62%" bgcolor="#C0C0C0"><input type="text" name="title" class="inputtext" maxlength="30" size="25"></td>
                  </tr>
                  <tr> 
                    <td height="22" bgcolor="#E3E3E3"> 
                      <div align="center">UBB代码</div></td>
                    <td bgcolor="#E3E3E3"><script src=../Inc/eshopcode.js></script> 
                      <!--#include file=../Inc/Ubb.inc -->
                    </td>
                  </tr>
                  <tr> 
                    <td height="25" bgcolor="#C0C0C0"><div align="center">内&nbsp;&nbsp;容</div></td>
                    <td height="25" bgcolor="#C0C0C0">
<textarea name="content" cols="57" rows="12" wrap="PHYSICAL"></textarea></td>
                  </tr>
                  <tr> 
                    <td height="25" colspan="2" bgcolor="#E3E3E3"> 
                      <div align="center"> 
                        <input type="submit" value="确定">
                        &nbsp; 
                        <input type="reset" value="取消">
                      </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=../uploada.asp></iframe></div></td>
                  </tr>
                </table>
            </div></td></form>
        </tr>
      </table>
      <br>
      <br>
    </td>
  </tr>
</table>
<!-- #include file="../Inc/Foot.asp" -->