📄 addsoft_save.asp
字号:
<!--#INCLUDE FILE="data.asp" -->
<!--#include file="html.asp"-->
<%
Set mrs= Server.CreateObject("ADODB.Recordset")
strSql1="select * from user where username='"&Session("Uname")&"'"
mrs.open strSql1,Conn,3,3
%>
<%
set rs=server.createobject("ADODB.recordset")
rs.Open "SELECT * FROM soft Where id is null",conn,1,3
rs.addnew
nowtime=now()
sj=cstr(year(nowtime))+right("0"+cstr(month(nowtime)),2)+right("0"+cstr(day(nowtime)),2)
sk=cstr(year(nowtime))+"-"+right("0"+cstr(month(nowtime)),2)+"-"+right("0"+cstr(day(nowtime)),2)
jz=mid(rs("time2"),3,8)
rs("name") =htmlencode2(request("softname"))
rs("content") =htmlencode2(request("content"))
rs("url") =request("url")
rs("size")=request("size")
rs("remindtime")=request("year2")&request("month2")&request("day2")
rs("time2")=request("year2")&"-"&request("month2")&"-"&request("day2")
rs("time3")=sj
rs("time")=sk
if request("tx")="true" then
rs("tx1") =request("tx")
rs("timetx") =request("tixi")
ss=Dateadd("d",rs("timetx"),rs("time"))
rs("daoshitime1")=ss
rs("daoshitime2")=cstr(year(rs("daoshitime1")))+right("0"+cstr(month(rs("daoshitime1"))),2)+right("0"+cstr(day(rs("daoshitime1"))),2)
end if
if request("txz")="true" then
rs("tx2") =request("txz")
rs("timetx") =request("tixiz")
ss=Dateadd("d",rs("timetx"),rs("time"))
rs("daoshitime1")=ss
rs("daoshitime2")=cstr(year(rs("daoshitime1")))+right("0"+cstr(month(rs("daoshitime1"))),2)+right("0"+cstr(day(rs("daoshitime1"))),2)
end if
if request("txs")="true" then
rs("daoshitime")=request("year3")&request("month3")&request("day3")
rs("tx")=request("txs")
end if
rs("dx")=request("dx")
jz=mid(rs("time2"),3,8)
rs("jz")=jz
rs("userid")=session("Uid")
rs("best")=request("best")
rs("zz")=request("zz")
rs("zhipai")=mrs("name")
if rs("zz")=true then
rs("time2")="无终止"
rs("remindtime")="99999999"
end if
rs.Update
rs.close
Set rs=nothing
mrs.Update
mrs.close
Set mrs=nothing
Conn.Close
Set Conn=nothing
%>
<LINK href="oa.css" rel=stylesheet>
<script language=javascript>
opener.location=opener.location
</script>
<BODY>
<TABLE border=1 bordercolorlight='000000' bordercolordark=#ffffff cellspacing=0 cellpadding=0 align=center>
<TR>
<TD>文件已经成功加上，是否继续添加……<BR>
<P><P><A HREF="addsoft.asp">继续添加</A> <A HREF="javascript:window.close()">关闭窗口</A></TD>
</TR>
</table>
<%
set file=nothing
set upload=nothing ''删除此对象
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -