?? roomtaggadd.asp
字號:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>學生入住</title>
<style type="text/css">
<!--
body {
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
.style9 {
color: #FF0000;
font-size: 16px;
font-weight: bold;
}
-->
</style>
<script language=javascript>
function winclose() {
window.opener.location.reload();
window.close();
}
</script>
</head>
<body onmouseover="self.status='紅笛軟件:服務網址[http://weekaa.com/red]';return true" onUnload="winclose();">
<%
Set hdobj = Server.CreateObject("HD.comOpen")'請確保此行在最前
Connkaa = hdobj.WeekaaConn()
La=request.QueryString("Latagg")
roomtagg=request.form("roomtagg")
Set rno=Server.Createobject("Adodb.RecordSet")
sqlno = "Select * From [HomeNo] where (ID is null)"
rno.Open sqlno,Connkaa,1,3
rno.addnew
rno("a")=La
rno("b")=roomtagg
rno("nam")=session("AdminUser")
rno("tim")=now()
rno.Update
response.write "<br><br><br><br><br><div align='center' class='style9'>"&La&"房被標注為"&roomtagg&"</div>"
call hdobj.infoadd("標注房間")
%>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -