📄 house_add.asp
字号:
<%@LANGUAGE="VBSCRIPT"%> <%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = "dsn=hotel;"
Recordset1.Source = "SELECT * FROM db_house"
Recordset1.CursorType = 3
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open
Recordset1_numRows = 0
%> <%
set Recordset2 = Server.CreateObject("ADODB.Recordset")
Recordset2.ActiveConnection = "dsn=hotel;"
Recordset2.Source = "SELECT * FROM view_housetype"
Recordset2.CursorType = 0
Recordset2.CursorLocation = 2
Recordset2.LockType = 3
Recordset2.Open
Recordset2_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF">
当前客房总数:<%=recordset1.recordcount%>套
<hr>
<form name="form1" method="post" action="">
<p>房号:
<input type="text" name="textfield">
</p>
<p>房名:
<input type="text" name="textfield2">
</p>
<p>房类:
<select name="select">
<%
While (NOT Recordset2.EOF)
%>
<option value="<%=(Recordset2.Fields.Item("id").Value)%>"><%=(Recordset2.Fields.Item("name").Value)%></option>
<%
Recordset2.MoveNext()
Wend
%>
</select>
</p>
<p>楼层:
<input type="text" name="textfield3" size="4" maxlength="2">
序号:
<input type="text" name="textfield4" size="4" maxlength="2">
</p>
<p>电话:
<input type="text" name="textfield5">
</p>
<p>房态:
<input type="hidden" name="hiddenField">
</p>
<p>住房人数:
<input type="hidden" name="hiddenField2">
</p>
<p>维修状态:
<input type="text" name="textfield7">
</p>
<p>房租:
<input type="text" name="textfield9">
</p>
<p>押金:
<input type="text" name="textfield8">
</p>
<p>折扣:
<input type="text" name="textfield10">
</p>
<p>备注:<br>
<textarea name="textfield11" cols="50" rows="5"></textarea>
</p>
<p>
<input type="submit" name="Submit" value="保 存">
<input type="reset" name="Submit2" value="取 消">
<input type="button" name="Submit3" value="返 回">
</p>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -