📄 cardtype_add.asp
字号:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../login/check_power.asp"-->
<%
table_name="cardtype"
if check_power("参数设置")=0 then
response.redirect("/login/check_false.asp")
else%><%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = "dsn=hotel;"
Recordset1.Source = "SELECT * FROM view_"&table_name
Recordset1.CursorType = 3
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open
Recordset1_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
<!--
function check_form(theform){
if (theform.name.value==""){
alert("请填写名称.");
return false;
}
return true;
}
//-->
</script>
<%response.write "<"&"script language=javascript>"%><%=chr(13)+chr(10)%>
<%response.write "<!--"%><%=chr(13)+chr(10)%>
<%response.write "function go"&table_name&"_show(){"%><%=chr(13)+chr(10)%>
<%response.write " location.assign("""&table_name&"_show.asp"");"%><%=chr(13)+chr(10)%>
<%response.write "}"%><%=chr(13)+chr(10)%>
<%response.write "//-->"%><%=chr(13)+chr(10)%>
<%response.write "<"&"/script>"%><%=chr(13)+chr(10)%>
</head>
<body bgcolor="#FFFFFF">
当前记录总数:<%=recordset1.recordcount%>
<hr>
<form name="form1" method="post" action="op_<%=table_name%>_add.asp" onsubmit="return check_form(this)">
<p>名称:
<input type="text" name="name" size="30">
</p>
<p>说明: <br>
<textarea name="memo" cols="40" rows="5"></textarea>
</p>
<p>
<input type="submit" name="Submit" value="保 存">
<input type="reset" name="Submit2" value="取 消">
<input type="button" name="Submit3" value="返 回" onclick="go<%=table_name%>_show()">
</p>
</form>
</body>
</html>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -