savearticle.asp

来自「教育管理系统」· ASP 代码 · 共 94 行

ASP
94 行
字号 
<!--#include file="articleconn.asp"--> 
<!--#include file="security.asp"-->
<!--#include file="inc/articlechar.inc"-->
<%
'------------------------------
'书生下载系统
'此系统如有什么BGU请到本站发帖
'谢谢使用本系统
'http://3344520.net
'3344520@848.net
'------------------------------
if request.form("title")="" then 
response.write "错误提示:请输入软件名称!"
response.end
end if
if request.form("url")="" then 
response.write "错误提示:请输入软件下载地址!"
response.end
end if
if request.form("dog")="" then 
response.write "错误提示:请输入软件大小!"
response.end
end if
if request.form("content")="" then 
response.write "错误提示:请输入软件简介!"
response.end
end if
if request.form("typeid")="" then 
response.write "错误提示:软件类别不能为空!"
response.end
end if
title=htmlencode2(request.form("title"))
content=htmlencode2(request.form("content"))
url=htmlencode2(request.form("url"))
url2=htmlencode2(request.form("url2"))
url3=htmlencode2(request.form("url3"))
url4=htmlencode2(request.form("url4"))
url5=htmlencode2(request.form("url5"))
jishu=request("jishu")
zt=request("zt")
images=htmlencode2(request.form("images"))
dog=htmlencode2(request.form("dog"))
best=request.form("best")
dim zhuid,typename
zhuid=request.form("zhuid")
typename=request.form("typename")
set rs=server.createobject("adodb.recordset")
sql="select * from learning where (articleid is null)" 
rs.open sql,conn,1,3
rs.addnew
rs("typeid")=Request.Form("typeid")
rs("softlevel")=Request.Form("softlevel")
rs("runsystem")=Request.Form("runsystem")
rs("zhuid")=zhuid
rs("title")=title
rs("content")=content
rs("jishu")=jishu
rs("zt")=zt
rs("url")=url
rs("url2")=url2
rs("url3")=url3
rs("url4")=url4
rs("url5")=url5
rs("dog")=dog
rs("images")=images
rs("best")=best
rs("dateandtime")=now()
rs.update
articleid=rs("articleid")
rs.close
%><head>
</head>
<div align="center">
  <table border="1" cellspacing="0" width="50%" bordercolorlight="#333333">
    <tr bgcolor="#333333"> 
      <td width="100%" height="20"> 
        <p align="center"><font color="#FFFFFF">添加软件成功</font> 
      </td>
    </tr>
    <tr>
      <td width="100%">
        <p align="left"><br>
          文件标题为：<%response.write title%></p>
    <p align="center">是否继续添加？<br>
    <br>
          <a href="addarticle.asp?zhuid=<%=zhuid%>&typename=<%=typename%>"> 是</a>&nbsp;&nbsp; 
          <a href="mimi.asp">否</a><br>
    <br>
    </p>
        </td>
    </tr>
    </table>
</div>

savearticle.asp - 源码说明

本页面展示了「教育管理系统」中的 savearticle.asp 源码文件，采用 ASP 编程语言编写，共 94 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与教育管理系统相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?