updatexinqing.asp

来自「我的小网站个人利用业余时间设计的」· ASP 代码 · 共 49 行

ASP
49
字号
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<!--#include file="conn.asp"-->
<%
     dim txtid
     txtid=request("PageId")
     'response.write(txtid)
	 on error resume next
     editsql="select * from xinqing where PageId='"&txtid&"'"
     set trexe=conn.execute(editsql)    
	 'set conn=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改小说</title>
</head>

<body background="image/back.gif">
<div align="center"><font size="+4">修改小说</font></div>
<div align="center">
<form id="form1" name="form1" method="post" action="answertxt.asp?PageId=<%=trexe("PageId")%>">
<table width="600" height="300" border="1"> 
<tr>
  <td width="100" height="60" align="center">要修改的小说:</td>
  <td width="500">第<%=trexe("PageId")%>篇:<%=trexe("title")%></td>
</tr>
<tr>
  <td height="100" align="center">修改:</td>
  <td height="145" align="center">
          修改标题:<input type="text" name="title" size="20">
    <textarea name="textanswer" cols="60" rows="25"></textarea>
	<input name="active" type="hidden" id="active" value="yes">
  </td>
</tr>
<tr><td height="50" colspan="2">
<center>
  <input type="submit" name="Submit" value="修改">
  <input type="reset" name="Submit2" value="重写">
  </center>

</td>
</tr>
</table>
</form>
</div>
</body>
</html>

⌨️ 快捷键说明

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