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 + -
显示快捷键?