?? menutype_add.asp
字號:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../login/check_power.asp"-->
<%
table_name="menutype"
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 + -