📄 savepron.asp

📁 顶级影视站ＡＳＰ源代码系统。很全面很强大。数据库用access

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="primary_admin.asp"-->
<!--#include file="HMconnection.asp"-->
<%dim news_id,title,newsauthor,imagesname,imagefile,content,pronRS1
news_id=trim(request("news_id"))
title=request.Form("title")
newsauthor=trim(request.Form("newsauthor"))
imagesname=trim(request.Form("imagesname"))
if imagesname="" or imagesname="abcd.jpg" then imagesname=""
imagefile=trim(trim(request.Form("imagefile")))
content=trim(request.Form("content"))
content=replace(content," ","&nbsp;")
content=replace(content,Chr(13),"<br>")
set pronRS1=server.createobject("adodb.recordset")
 if news_id<>"" then
  pronRS1.open "select * from news where news_id="&news_id,conn,1,3
 else 
  pronRS1.open "select * from news" ,conn,1,3
  pronRS1.addnew
 end if
pronRS1("news_title")=title
pronRS1("newsauthor")=newsauthor
pronRS1("npicfile")=imagefile
pronRS1("npicname")=imagesname
pronRS1("news_content")=content
pronRS1.update
pronRS1.close
set pronRS1=nothing
set conn=nothing
%>
<html>
<head>
<title>顶级影视 设计维护:QQ:1243619 Email:yakai@163.net</title>
<link rel="stylesheet" type="text/css" href="../style/style.css">
</head>
<body>
<div align="center" >
<%if news_id="" then%>
<table border="1" cellspacing="0" width="450" bgcolor="#00FFFF">
    <tr bgcolor="#0099FF"> 
      <td width="100%" height="27">
        <p align="center"><font color="#FFFFFF">添加成功</font> 
      </td>
   </tr>
   <tr>
    <td width="100%">
      <p align="center"><br>
          您刚刚添加的公告名称为： 
          <%response.write title%>
      </p>
        <p align="center">是否继续添加？按否返回管理页面。<br>
          <br>
        <a href="addpron.asp"> 是</a>&nbsp;&nbsp;
        <a href="admin.asp">否</a><br><br>
      </p>
     </td>
   </tr>
</table>
<%else%>
<table border="1" cellspacing="0" width="450" bgcolor="#00FFFF">
    <tr bgcolor="#0099FF"> 
      <td width="100%" height="27">
        <p align="center"><font color="#FFFFFF">修改成功</font> 
      </td>
   </tr>
   <tr>
    <td width="100%">
      <p align="center"><br>
          您刚刚修改的公告名称为： 
          <%response.write title%>
      </p>
        <p align="center">是否继续修改？按否返回管理页面。<br>
          <br>
        <a href="managepronounce.asp"> 是</a>&nbsp;&nbsp;
        <a href="admin.asp">否</a><br><br>
      </p>
     </td>
   </tr>
</table>
<%end if%>
</div>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -