📄 index.asp
字号:
<script>
</script>
<!--#include file="const.inc"-->
<%
'-----------------------------------------
oabusyname=request.cookies("oabusyname")
oabusyusername=request.cookies("oabusyusername")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
if oabusyusername="" then
response.write("<script language=""javascript"">")
response.write("window.top.location.href='../../default.asp';")
response.write("</script>")
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../css/eintrdemo.css">
<script language="JavaScript">
<!--
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
function MM_findObj(n, d) { //v4.0
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && document.getElementById) x=document.getElementById(n); return x;
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" topmargin="0" leftmargin="0" style="background-image: url('images/main_bg.gif'); background-attachment: scroll; background-repeat: no-repeat; background-position: left bottom" onLoad="MM_preloadImages('images/more_on.gif','images/manage_on.gif','images/meal_on.gif')" >
<table width="100%" border="0" cellspacing="0" cellpadding="1" bgcolor="#4e5960">
<tr>
<td class="heading" bgcolor="#4e5960" height="3"></td>
</tr>
<tr>
<td width="86%" class=heading> <font color="#FFFFFF"><b>定餐</b></font><font color="#FFFFFF"><b></b></font></td>
<%if meal_admin=1 then%>
<td width="14%"><font color="#FFFFFF"><b><a href="meallist.asp" onClick="return OpenWindows(this.href);" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image1','','images/manage_on.gif',1)"><img name="Image1" border="0" src="images/manage_off.gif" width="85" height="19" hspace="10"></a></b></font></td>
<%end if%>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="109" valign="top" align="center"> <!--#include file="left.inc"-->
<td align="center">
<%
set rs=server.CreateObject ("adodb.recordset")
rs.Open "select * from adminmeal order by mealid",conn,3,1
%>
<form action="submeal.asp" name="form1" method="post" onsubmit="return chk();">
<table width="100%" border="0" cellpadding="2" cellspacing="1" >
<tr bgcolor="#999999">
<td colspan=2 class="heading"><font color="#ffffff"><b>网上定餐</b></font></td>
</tr>
<tr>
<td bgcolor="#EFEFEF" width=60 height=20> 中饭</td>
<td bgcolor="#EFEFEF" height=20>
<%
vdate=cstr(year(date())) & "/" & cstr(month(date())) & "/" & cstr(day(date()))
createTime=showtwo(hour(now())) & showtwo(minute(now()))
response.write(createtime)
response.write(vdate)
if createTime>lunchTime then%>
<font color=red>因过时，无法定午餐！</font>
<%else%>
<select name="lunch">
<option value="0" selected>-请选择午餐种类-</option>
<%
if not rs.EOF then
do while not rs.EOF
%>
<option value="<%=rs("mealid")%>"><%=rs("mealname")%></option>
<%
rs.MoveNext
loop
rs.MoveFirst
end if
%>
</select>
<%end if%>
</td>
</tr>
<tr>
<td bgcolor="#EFEFEF" width=60 height=20> 晚饭</td>
<td bgcolor="#EFEFEF" height=20>
<%if createTime>supperTime then%>
<font color=red>因过时，无法定晚餐！</font>
<%else%>
<select name="supper">
<option value="0" selected>-请选择晚餐种类-</option>
<%
do while not rs.EOF
%>
<option value="<%=rs("mealid")%>"><%=rs("mealname")%></option>
<%
rs.MoveNext
loop
%>
</select>
<%end if%>
</td>
</tr>
<tr>
<td bgcolor="#EFEFEF" width=60 height=20> 用户</td>
<td bgcolor="#EFEFEF" height=20>
<input name="userid" size=16 maxlength="16" value="<%=oabusyusername%>">
</td>
</tr>
<tr>
<td bgcolor="#EFEFEF" width=60 height=20> 密码</td>
<td bgcolor="#EFEFEF" height=20>
<input name="pwd" type="password" size=16 maxlength="16">
</td>
</tr>
<tr>
<td bgcolor="#EFEFEF" width=60 height=20></td>
<td bgcolor="#EFEFEF" height=20> <a href="javascript:document.form1.submit();" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image2','','images/meal_on.gif',1)"><img name="Image2" border="0" src="images/meal_off.gif" width="60" height="19"></a>
</td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</BODY>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -