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

📄 xinwenedit.asp

📁 这是一个在线考试系统 有比较强大的功能 是很不错的东西哦 大家可以看看哦
💻 ASP
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../check.asp"-->
 <%
call LinkData()
dim sql,rs,page,xid,biaoti,neirong,theACT,temp,riqi
Set rs = Server.CreateObject("ADODB.RecordSet")
 
page=request("page")
xid=request("xid")
sql="select * from xinwen where xid="&xid
rs.open sql,conn,1,1

biaoti=rs("biaoti")
neirong=rs("neirong")
rs.close
  %>
  
  <%
  theACT=request("theACT")
  if theACT="SAVE" then 
  
biaoti=request("biaoti")
neirong=request("neirong")	
riqi=Date()
	 
	 sql="select * from xinwen where xid="&xid
	 rs.open sql,conn,1,3
	 rs("biaoti")=biaoti
	 rs("neirong")=neirong
	 rs("riqi")=riqi
	 rs.update
	 rs.close
	 temp="xinwen.asp"
	 response.Redirect (temp)
	
	 end if
  conn.close
  %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>知识修改</title>
<link href="../teacher.css" rel="stylesheet" type="text/css">
</head>

<body bgColor="FloralWhite">

<form method="post" action="xinwenedit.asp" name="createForm">
<input type="hidden" name="xid"  value="<%=xid%>">
<table border="0" width="760" cellspacing="2" cellpadding="2" align="center">
    <tr> 
      <td colspan="2" align="center">知识修改</td>
    </tr>
    <tr> 
      <td >标题</td>
      <td> 
        <input type="text" name="biaoti" size="40" value="<%=biaoti%>">
      </td>
    </tr>
    <tr> 
      <td><div align="center">内容
      </div></td>
      <td><textarea name="neirong" cols="90" rows="20"><%=neirong%></textarea></td>
    </tr>
    <tr> 
      <td colspan="2" align="center"> 
        <input type="submit" value="提交">
        <input type="reset" value="重写">
        <input name="theACT" type="hidden" id="theACT" value="SAVE">
      </td>
    </tr>
  </table>
</form>

</body>
</html>

⌨️ 快捷键说明

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