女性安全期测试--亏作者想得出来-CSDN博客

本文链接：https://blog.csdn.net/AppleBBS/article/details/224688

转自：http://www.cnbruce.com/blog/showlog.asp?cat_id=5&log_id=569

编程是有用的。我今天算是真实感受到了。

我只能说：亏作者想得出来

其实，怎么说呢：没有做不到，只有想不到。

代码如下：
<HTML> <HEAD> <TITLE>女性安全期测试</TITLE> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312"> <style type="text/css">  </style> <script language="JavaScript">  </script> <script language="JavaScript">  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; } function MM_showHideLayers() { //v3.0 var i,p,v,obj,args=MM_showHideLayers.arguments; for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2]; if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v='hide')?'hidden':v; } obj.visibility=v; } } 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];} } //--> </script> </HEAD> <BODY BGCOLOR=#FFFFFF οnlοad="javascript:InitialCalendar();MM_preloadImages('img/close_o.gif')"> <script language="JavaScript">  </script> <div id="Layer1" style="position:absolute; left:205px; top:155px; width:337px; height:307px; z-index:2; visibility: hidden"> <table width="360" border="0" cellspacing="1" cellpadding="3" align="center" height="250" bgcolor="#FFCCFF"> <tr> <td bgcolor="#FFCCFF" align="center" class="titletext"> <table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="95%" class="titletext" align="center">结果显示</td> <td width="5%"><a href="#" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image1','','img/close_o.gif',1)"><img name="Image1" border="0" src="img/close_d.gif" width="11" height="11" onClick="MM_showHideLayers('Layer1','','hide')"></a></td> </tr> </table> </td> </tr> <tr> <td bgcolor="#EEF7FF" align="center"> <table width="360" border="0" cellspacing="0" cellpadding="0" align="center"> <tr valign="top"> <td height="66" class="nine-pt" width="169" valign="top"> <table border="0" cellspacing="0" cellpadding="3" id=Calendar1> </table> </td> <td height="66" class="nine-pt" width="191" valign="top"> <table border="0" cellspacing="0" cellpadding="3" align="right" id=Calendar2> </table> </td> </tr> </table><br> <table width="256" border="0" cellspacing="0" cellpadding="0" align="center"> <tr class="nine-pt"> <td width="89" height="2"> <table width="77" border="0" cellspacing="0" cellpadding="0"> <tr class="nine-pt"> <td bgcolor="#009933" width="30">　</td> <td width="47">  安全期</td> </tr> </table> </td> <td width="85" height="2"> <table width="77" border="0" cellspacing="0" cellpadding="0"> <tr class="nine-pt"> <td bgcolor="#FF3300" width="30">　</td> <td width="47">  危险期</td> </tr> </table> </td> <td width="82" height="2"> <table width="77" border="0" cellspacing="0" cellpadding="0"> <tr class="nine-pt"> <td bgcolor="#FFCC00" width="30">　</td> <td width="47">  月经期</td> </tr> </table> </td> </tr> </table> </td> </tr> </table> </div> <table border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#666699"> <tr> <td bordercolor="#FFFFFF" align="center" class="titletext" bgcolor="#EEF7FF"><font color="#0066CC">女性安全期测试</font></td> </tr> <tr> <td bordercolor="#FFFFFF" align="center"> <form method="post" action="#" name=frmInput οnsubmit="javascript:DisplayCalendar();"> <table width="360" border="0" cellspacing="1" cellpadding="2" bordercolorlight="#666666" align="center" bordercolordark="#FFFFFF" bordercolor="#000000"> <tr bgcolor="#D2E9FF"> <td rowspan="2" class="nine-pt" height="14" width="80" align="center"> 月经周期设置</td> <td class="nine-pt" height="12" colspan="3" width="266"> 最短月经周期   <input type="text" name="txtMinMensesCyc" size="2" maxlength=2 class="inputform" value="28"> 天 </td> </tr> <tr bgcolor="C6EB4C"> <td colspan="3" class="nine-pt" height="2" width="266" bgcolor="#D2E9FF">最长月经周期   <input type="text" name="txtMaxMensesCyc" size="2" maxlength=2 class="inputform" value="28"> 天 </td> </tr> </table> <table width="360" border="0" cellspacing="1" cellpadding="2" bordercolorlight="#666666" align="center" bordercolordark="#FFFFFF" bordercolor="#000000"> <tr bgcolor="#D2E9FF"> <td width="80" class="nine-pt" height="2" align="center" bgcolor="#D2E9FF">上次月经时间</td> <td colspan="3" class="nine-pt" height="2" width="266" bgcolor="#D2E9FF"> <input type="text" name="txtYear" size="4" maxlength=4 class="inputform"> 年 <input type="text" name="txtMonth" size="2" maxlength=2 class="inputform"> 月 <input type="text" name="txtDay" size="2" maxlength=2 class="inputform"> 日 </td> </tr> </table> <table width="359" border="0" cellspacing="0" cellpadding="0" align="center"> <tr> <td height="38" bgcolor="#D2E9FF"> <div align="center"> <input type="button" name="Submit3" value="设置完成" class="nine-pt" onClick="javascript:DisplayCalendar();"> <input type="button" name="btnCalculate" value="开始计算" class="nine-pt" onClick="javascript:DisplayCalendar();"> <input type="reset" name="reset" value="重新输入" class="nine-pt"> </div> </td> </tr> </table> </form> <span class="nine-pt"><font color="#999999">帮助：请先设置好周期后和时间后，按设置完成，再按开始计算</font></span><font color="#999999">。</font><br> </td> </tr> </table> <div align="center" class="nine-pt"></div> </BODY> </HTML>
[Ctrl+A 全部选择提示：你可先修改部分代码，再按运行]