当前位置：编程学习 > asp >>
答案：此万年历程序是在网站找到的………………加一点点改动！供大家参考
第一个文件保存为文件
万年历.asp
<html>
<head>
<title>soul studio中国网络论坛在线（灵魂工作室）</title>
<meta name="generator" content="soul studio">
<meta http-equiv="cache-control" content="no-cache">
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<link rel=stylesheet type="text/css" href=><script LANGUAGE="javascript">
function openWindow(theURL,winName,features) {
if (winName.window) winName.focus;
popupWin = window.open(theURL,winName,features)
popupWin.focus;
}
</script>
</head>
<body leftmargin=0 topmargin=0>
<TABLE cellpadding=0 cellspacing=0 class='topTD' width='100%'>
<tr valign=absmiddle>
<td style="{padding:0px;}" width="21%"><A href=>
<td style="{text-align:center;vertical-align:middle;}" width="78%" background="/upload/2006-3/200631316520874.gif"></td>
<td style="{text-align:right;vertical-align:middle;}" width="1%"> </td>
</tr>
</TABLE>
<TABLE cellpadding=0 cellspacing=0 width='100%'>
<tr valign=top>
<td style="{padding:0px;}"><img src=http://old.zzzyk.com/article/Article/"http://8asp.com/images/pix.gif" width=640 height=1 border=0></td>
</tr>
</TABLE>
<p><script language="javascript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
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; }
}
// -->
</script>
<table class='menuTable' >
<tr>
<td class='menuTD' onmouseover="this.className='menuTDover'" onmouseout="this.className='menuTD'" align="center" width="7%">
<a class=menuFont href=> <td class='menuTD' onmouseover="MM_showHideLayers('Layer1','','show')" onmouseout="MM_showHideLayers('Layer1','','hide')" align="center" width="10%" >
<div id="menu2" style="position:absolute; width:13px; height:15px; z-index:1; visibility: hidden">
<div id="Layer1" style=" Filter:alpha(opacity=85);position:absolute; width:82px; height:80px; z-index:5; left: -29px; top: 11px" onMouseOver="MM_showHideLayers('Layer1','','show')" onMouseOut="MM_showHideLayers('Layer1','','hide')">
<br>
<table width="80" border="0" cellspacing="0" cellpadding="0" class='DataTD'>
<tr>
<td align="center" onmouseover="this.className='top2TD'" onmouseout="this.className='DataTD'" style="{padding:2px}" ><a href=> </td>
</tr>
<tr>
<td align="center" onmouseover="this.className='top2TD'" onmouseout="this.className='DataTD'" style="{padding:2px}" > <a href=> </tr>
<tr>
<td align="center" onmouseover="this.className='top2TD'" onmouseout="this.className='DataTD'" style="{padding:2px}" ><a href=> </tr>
<tr>
<td align="center" onmouseover="this.className='top2TD'" onmouseout="this.className='DataTD'" style="{padding:2px}" ><a href=> </td>
</tr>
<tr>
<td align="center" onmouseover="this.className='top2TD'" onmouseout="this.className='DataTD'" style="{padding:2px}" ><a href=> </tr>
</table>
</div>
</div>
<a class=menuFont href=> <td class='menuTD' align="center" width="7%" > <a class=menuFont href=> </td>
<td class='menuTD' align="center" width="7%"'> <a class=menuFont href=> </td>
<td class='menuTD' align="center" width="7%" > <a class=menuFont href=> </td>
<td class='menuTD' align="center" width="6%" > <a class=menuFont href=> <td class='menuTD' align="center" width="7%" > <a class=menuFont href=> </td>
<td class='menuTD' nowrap align="center" width="17%"> <a class=menuFont href=> </td>
<form action="goto.asp" method="get" >
<td class='menuTD' width='32%' style="{text-align:right;}">
<% if isnull(gotourl) then gotourl = ""%>
<% if session("accesslevel") >= 3 then%>
<% elseif session("accesslevel") = 2 then%>
<% else%>
<% =now%>
<% end if%>
</td>
</form><
上一个：取得浏览者的离开时间
下一个：傻瓜型的分页实现
- 更多asp疑问解答：
- asp正则过滤重复字符串的代码
- 用asp过滤全部html但保留br类似的符号
- 会asp，但感觉asp要过点，想学php。但我一般做的都是小公司的站，用access数
- PHP的空间可以用ASP的源代码吗？
- 以前做asp程序，现在应该怎样发展？是学.net还是php
- 以前做asp程序，现在应该怎样发展？是学.net还是php
- 想做一个市级的人才网acess,sql数据库，语言asp,jsp,php分别用哪种好
- jsp，asp，php 区别
- 我想找一个有比较多漏洞的网站的源码，比如可以asp，php注入等都可以。供学习研究用。请提供下载地址。。
- 现在候找人做个网站，用ASP，还是PHP语言去做好
- asp,php ,jsp,.net 对于做网站前台的重要吗？
- asp和php的区别是什么？
- 我是新手SEO菜鸟 请问wp dw php asp cms myspl dede 这些软件应该如何区分呀？
- 网页制作相关的三种语言：ASP JSP PHP那个好点，简单点？
- 网页制作相关的三种语言：ASP JSP PHP那个好点，简单点？