⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 file_yj.asp

📁 asp程序,自动投稿系统,也可以用来学生交作业,原创程序.
💻 ASP
字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="conn.asp"-->
<%
id=request.Form("id")
reason=request.Form("reason")
if id<>"" then
sql="select * from file where id="&id
rs.open sql,conn,1,3
sql1="select * from result where fileid="&id
rs1.open sql1,conn,1,3

rs("zt")=4
rs("result")=reason
if rs1.eof then
	rs1.addnew
end if
rs1("title")=rs("title")
rs1("authorname")=rs("authorname")
rs1("username")=rs("username")
rs1("fileid")=rs("id")
rs1("date")=rs("date")
rs1("zt")="修改意见"
rs1("result")=reason
rs.update
rs1.update
	response.Write "<script langurage=javascript> alert('操作成功!')</script>"
 rs.close
 set rs=nothing
 conn.close
 set conn=nothing 
 response.Redirect "admin.asp"
 
else

ID=Request.querystring("ID")

if id="" then
	response.Write "<script langurage=javascript> alert('对不起, 您没有访问权限!')</script>"
	response.End
end if

sql="select * from file where id="&id
rs.open sql,conn,1,1
	

%>
<html>
<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<style type="text/css">
<!--
body,td,th {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 16px;
}
a {
	font-family: Arial, Helvetica, sans-serif;
	font-size: 16px;
}
-->
</style><title>修改意见</title></head>
<body>


<form name="form1" method="post" action="file_yj.asp">
  <table width="600"  border="0">
    <tr>
      <td height="26"><div align="center">文章题目</div></td>
      <td height="26"><%=rs("title")%></td>
    </tr>
    <tr>
      <td width="25%" height="26"><div align="center">第一作者</div></td>
      <td width="75%" height="26"><%=rs("authorname")%></td>
    </tr>
    <tr>
      <td height="26"><div align="center">联系人</div></td>
      <td height="26"><%=rs("username")%></td>
    </tr>
    <tr>
      <td height="26"><div align="center">投稿时间</div></td>
      <td height="26"><div align="left"><%=rs("date")%>
      </div></td>
    </tr>
    <tr>
      <td ><div align="center">修改意见</div></td>
      <td ><textarea name="reason" cols="50" rows="15"><%=rs("result")%></textarea></td>
    </tr>
    <tr>
      <td height="26" colspan="2"><div align="center"></div>        <div align="left"><input name="id" type="hidden" value="<%=id%>">
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
        <input name="Submit" type="submit" class="bt" value="确定">
        &nbsp;&nbsp;&nbsp;&nbsp;
        <input name="Submit2" type="button" onclick="history.go(-1);" class="bt" value="返回">
      </div></td>
    </tr>
  </table>
 <%
end if
 rs.close
 set rs=nothing
 conn.close
 set conn=nothing 
 %>
</form>
</body>
</html>

⌨️ 快捷键说明

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