六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

一個對于日期選擇的很實用的小東西

[摘要]以前做頁面時經常需要制作日期選擇框,例如出生日期、查詢日期等等,通常的做法是制作三個下拉列表(select),分別用于選擇年、月、日,但該方法在各方面的表現都很令人不耐煩,于是我做了這個日期選擇頁面,它不是組件,也不是函數,只是一個普通的ASP頁面,用于返回用戶選擇的日期變量。 *********...

以前做頁面時經常需要制作日期選擇框,例如出生日期、查詢日期等等,通常的做法是制作三個下拉列表(select),分別用于選擇年、月、日,但該方法在各方面的表現都很令人不耐煩,于是我做了這個日期選擇頁面,它不是組件,也不是函數,只是一個普通的ASP頁面,用于返回用戶選擇的日期變量。

************************************************************************

<%
'day.asp
%>
<html>
<head>
<title>選擇日期</title>
<style type=text/css>
<!--
body{margin:0;font-size:9pt;color:#5E639B}
td{font-size:9pt;color:#000000}
a:link {color:#000000;text-decoration: none}
a:visited {color:#000000;text-decoration: none}
a:active {color:#000000;text-decoration: none}
a:hover { color:#ff3333;text-decoration: none}
-->
</style>
<Script Language="JavaScript">
function getDay(v){
window.opener.document.<%=request.querystring("form")%>.<%=request.querystring("field")%>.value=v;
window.close();
return false;
}
</Script>
</head>
<body bgcolor=#ffffff onBlur="window.focus()">
<%
oldDate=request("oldDate")
if not isDate(oldDate) then oldDate=date
yy=year(cdate(oldDate))
mm=month(cdate(oldDate))
if request("yy")<>"" then yy=request("yy")
if request("mm")<>"" then mm=request("mm")
if yy="" then yy=year(date)
if mm="" then mm=month(date)
if mm>12 then mm=1:yy=yy+1
if mm<1 then mm=12:yy=yy-1

dim m(12)
m(1)=31
m(3)=31
m(5)=31
m(7)=31
m(8)=31
m(10)=31
m(12)=31
m(2)=28
m(4)=30
m(6)=30
m(9)=30
m(11)=30
if (yy mod 4=0 and yy mod 100<>0) or yy mod 400=0 then m(2)=29
mms=m(mm)
week1=(weekday(cdate(yy & "-" & mm & "-1"))-1)
%>
<table width=250 cellspacing=1 cellpadding=0 bgcolor=#FFDFDF align=center>
<tr>
<td colspan=7 align=center>
<table width=100% height=20 cellspacing=0 cellpadding=0>
<tr height=20>
<td width=30 align=center>
<a href=day.asp?form=<%=request("form")%>&field=<%=request("field")%>&yy=<%=(yy-1)%>&mm=<%=mm%>>
<font face=webdings style=color:#000000 title="上一年">7</font>
</a>
<td width=30 align=center>
<a href=day.asp?form=<%=request("form")%>&field=<%=request("field")%>&mm=<%=(mm-1)%>&yy=<%=yy%>>
<font face=webdings style=color:#000000 title="上一月">3</font>
</a>
<td width=130 align=center style="FONT:9pt Verdana,Geneva,sans-serif;color:#CD0101">
<b><%=yy%> 年 &nbsp; <%=mm%> 月</b>
<td width=30 align=center>
<a href=day.asp?form=<%=request("form")%>&field=<%=request("field")%>&mm=<%=(mm+1)%>&yy=<%=yy%>>
<font face=webdings style=color:#000000 title="下一月">4</font>
</a>
<td width=30 align=center>
<a href=day.asp?form=<%=request("form")%>&field=<%=request("field")%>&yy=<%=(yy+1)%>&mm=<%=mm%>>
<font face=webdings style=color:#000000 title="下一年">8</font>
</a>
</table>
<tr bgcolor=#ffffff height=20>
<td width=35 align=center bgcolor=#FFF4F4 style=color:#ff6633>日
<td width=35 align=center bgcolor=#FFF4F4>一
<td width=35 align=center bgcolor=#FFF4F4>二
<td width=35 align=center bgcolor=#FFF4F4>三
<td width=35 align=center bgcolor=#FFF4F4>四
<td width=35 align=center bgcolor=#FFF4F4>五
<td width=35 align=center bgcolor=#FFF4F4>六
<%
if week1<>0 then
response.write "<tr>"
for i=1 to week1
response.write "<td width=35 height=20 bgcolor=#ffffff>&nbsp;"
next
end if
for i=1 to mms
if (i+week1-1) mod 7=0 then response.write "<tr>"
response.write "<td width=35 height=20 align=center bgcolor=#ffffff>"
if cdate(yy & "-" & mm & "-" & i)=date() then
%>
<input type=button value=<%=i%>
style="BORDER:#CD0101 1px groove;width:30;height:16;font-size:9pt;background-color:#FFD9D9;color:#CD0101"
onclick="javascript:getDay('<%=yy%>-<%=mm%>-<%=i%>');" title="<%=yy%>年<%=mm%>月<%=i%>日(今天)">
<%
else
%>
<input type=button value=<%=i%>
style="BORDER:#000000 1px groove;width:30;height:16;font-size:9pt;background-color:#ffffff;color:#000000"
onclick="javascript:getDay('<%=yy%>-<%=mm%>-<%=i%>');" title="<%=yy%>年<%=mm%>月<%=i%>日">
<%
end if
next
if (mms+week1) mod 7<>0 then
for i=1 to (7-((mms+week1) mod 7))
response.write "<td width=35 height=20 bgcolor=#ffffff>&nbsp;"
next
end if
%>
</table><br>
<div align=center><a href="javascript:window.close()">〖關閉本窗口〗</a></div>
</body>
</html>

************************************************************************

調用day.asp頁面的代碼:

<form name=form1>
<input name=date1 value=<%=date()%> readonly onClick="javascript:window.open('day.asp?form=form1&field=date1&oldDate='+this.value,'','directorys=no,toolbar=no,status=no,menubar=no,scrollbars=no,resizable=no,width=250,height=200,top=220,left=250');"
</form>

************************************************************************

其中,打開day.asp頁面時,需要傳遞幾個參數,分別是:

1)form:日期選擇框所在的表單名稱,本例為form1,可根據應用自行更改

2)field:日期選擇框的名稱,本例為date1,可根據應用自行更改

3)olddate:日期選擇框的當前值,不需改動。



我叫“積木”,歡迎和我成為朋友!




主站蜘蛛池模板: 亚洲高清资源在线观看 | 色一色在线观看视频网站 | 亚洲国产精品久久卡一 | 日日摸夜夜添夜夜爽免费视频 | 欧美一区日韩一区中文字幕页 | 日韩中文字幕精品一区在线 | 影音先锋国产精品 | 日本a级三级三级三级久久 日本a级片在线播放 | 四虎影院入口 | 午夜黄色网址 | 最近日本韩国观看 | 日本综合色 | 欧美天天| 在线观看91精品国产下载 | 欧美特级午夜一区二区三区 | 亚洲第一网站在线观看 | 亚洲精品伊人 | 四虎影库永久在线 | 在线亚洲精品国产波多野结衣 | 亚洲免费在线视频观看 | 日本黄 色 成 年 人免费观看 | 青青草原免费在线 | 中国黄色毛片 大片 | 亚洲天堂2015| 西西gogo午夜高清大胆 | 日韩欧美综合视频 | 全黄性色大片 | 中文字幕永久在线视频 | 无遮挡激情 | 欧美性大战久久久久久 | 人人夜| 人人干人人上 | 日韩尤物| 日本大片在线播放在线 | 三级国产视频 | 色花堂国产精品首页第一页 | 日韩免费中文字幕 | 视频一区二区免费 | 天天干天天操天天射 | 性欧美大战久久久久久久野外 | 日本在线免费观看视频 |