📄 category.asp

📁 电子商务网络购物系统
💻 ASP
字号:
<% Option Explicit %>
<!--#include file="conn.asp" -->
<%
			
Dim strMode
Dim strCatName
Dim intBoardID
 
intBoardID = CInt(Request.QueryString("CatID"))
strMode = Request("mode")
strSQL = "SELECT timesboard.* From timesboard WHERE timesboard.boardid=" & intBoardID & ";"
rsConn.LockType = 3
rsConn.Open strSQL, adoCon
If (strMode = "edit" OR strMode = "new") AND CBool(Request.Form("postBack")) Then
	If strMode = "new" Then rsConn.AddNew
	rsConn.Fields("boardname") = Request.Form("category")
	rsConn.Update
	rsConn.Close
	Set rsConn = Nothing
	adoCon.Close
	Set adoCon = Nothing
	Response.Redirect("disforum.asp")
	rsConn.Requery	
End If
If NOT rsConn.EOF Then
	intBoardID = CInt(rsConn("boardid"))
	strCatName = rsConn("boardname")
End If
rsConn.Close
Set rsConn = Nothing
adoCon.Close
Set adoCon = Nothing
%>  

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>分类信息</title>
<script  language="JavaScript">
<!-- Hide from older browsers...

function CheckForm () {
	if (document.frmNewForum.category.value==""){
		alert("请输入类别名称");
		return false;
	}
	
	return true
}
// -->
</script>
<link href="includes/style.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center"><span class="heading">论坛类别</span><br>
  <br />
  <a href="menu.asp" target="_self">返回到管理主菜单</a><br>
  <br />
  <a href="disforum.asp" target="_self">返回到论坛分类 论坛信息管理页面</a><br />
</div>
<form method="post" name="frmNewForum" action="category.asp?CatID=<% = intBoardID %>" onSubmit="return CheckForm();">
 <br />
 <table width="450" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#000000">
  <tr> 
   <td width="450"> <table width="100%" border="0" align="center" class="normal" cellpadding="4" cellspacing="1">
     <tr align="left" bgcolor="#CCCCCC"> 
            <td colspan="2" class="lgText"><b>类别信息</b></td>
     </tr>
     <tr class="arial" bgcolor="#FFFFFF"> 
            <td align="left" width="33%" class="text">类别名称*</td>
      <td width="67%" valign="top"> <input type="text" name="category" maxlength="50" size="30" value="<% = strCatName %>" > </td>
     </tr>
    </table></td>
  </tr>
 </table>
 <br />
 <div align="center"><br />
  <input type="hidden" name="postBack" value="true">
  <input type="hidden" name="mode" value="<% = strMode %>">
  <input name="Submit" type="submit" id="Submit" value="添加">
  <input name="Reset" type="reset" id="Reset" value="清除">
  <br />
 </div>
</form>
</body>
</html>
⌨️ 快捷键说明

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