📄 faqmodify.asp
字号:
<!-- #include file = "include/sysbase.asp" -->
<%
dim rsObj,strSQL
dim intID
intID = RealString(Request.QueryString("id"))
set rsObj = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM faq WHERE id = "&intID
rsObj.Open strSQL, conn, adOpenKeyset, adLockReadOnly
%>
<html>
<head>
<title>修改常见问题</title>
<meta http-equiv = "Content-Type" content = "text/html; charset = gb2312">
<link rel = "stylesheet" href = "include/main.css" type = "text/css">
</head>
<body text = "#000000" leftmargin = "0" topmargin = "3">
<%if not (rsObj.eof or err) then %>
<form name = "form1" action = "faqModifySave.asp" method = "post">
<table width = "98%" border = "1" bordercolordark = #9CC7EF bordercolorlight = #145AA0 cellspacing = "0" cellpadding = "2" align = "center">
<tr bgcolor = "#4296E7">
<td height = "26" colspan = "2">
<div align = "center"><font color = "#FFFFFF">修改常见问题</font></div>
</td>
</tr>
<tr>
<td nowrap>常见问题</td>
<td>
<input type = "text" name = "question" size = "70" value = "<%=rsObj("question")%>">
<input type = "hidden" name = "id" value = "<%=intID%>">
</td>
</tr>
<tr>
<td nowrap colspan = "2">问题答案</td>
</tr>
<tr>
<td nowrap colspan = "2">
<textarea name = "answer" cols = "78" rows = "20"><%=rsObj("answer")%></textarea>
</td>
</tr>
<tr bgcolor = "#4296E7">
<td colspan = "2" height = "24">
<div align = "center">
<input type = "submit" name = "Submit" value = "修改">
<input type = "button" name = "Submit2" value = "返回" onClick = "window.location = '<%=Session("adminOldUrl")%>'">
</div>
</td>
</tr>
</table>
</form>
<%else %>
无该记录，请<a href = "Javascript:window.history.go(-1)">返回</a>
<%end if %>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -