asp日期函数运用--生成简单的日历
作者：亮亮 来源：亮亮blog 发布时间：2008-08-15 13:47:00
标签：日历,函数,日期,asp
下面的代码是日期函数的一些简单运用，应该不用解释，生成当月的日历，当然你可以根据实际情况进行扩充！
效果图：
<％@LANGUAGE="VBSCRIPT" CODEPAGE="65001"％>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>asp日历代码</title>
<style type="text/css">
body{
font-size:12px;
}
table{
text-align:center;
}
#curr{
background-color:#CC99CC;
}
</style>
</head>
<body>
<％
dim lines,currY,currD,firDate,firWeek,maxDay,days
sub cal(dateStr)
if dateStr="" then
dateStr=date()
end if
currY=year(dateStr)
currM=month(dateStr)
currD=day(dateStr)
firDate=currY&"-"&currM&"-1"
firWeek=weekDay(firDate)
maxDay=day(dateSerial(y,m+1,0))
days=maxDay+firWeek-1
if days mod 7 = 0 then
lines=int(days/7)-1
else
lines=fix(days/7)
end if
end sub
'这样就生成2008年8月的日历
'ds="2008-8-8"
'call cal(ds)
call cal("")
％>
<table border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="25" height="25">日</td>
<td width="25" height="25">一</td>
<td width="25" height="25">二</td>
<td width="25" height="25">三</td>
<td width="25" height="25">四</td>
<td width="25" height="25">五</td>
<td width="25" height="25">六</td>
</tr>
<％for i=0 to lines％>
<tr>
<％
for j=1 to 7
square=7*i+j-firWeek+1
if square<1 or square>maxDay then
response.Write("<td width='25' height='25'> </td>")
elseif square=currD then
response.Write("<td width='25' height='25' id='curr'>"&square&"</td>")
else
response.Write("<td width='25' height='25'>"&square&"</td>")
end if
next
％>
</tr>
<％next％>
</table>
</body>
</html>
0
投稿猜你喜欢
前言利用SVD是可以对图像进行压缩的，其核心原因在于，图像的像素之间具有高度的相关性。代码# -*- coding: utf-8 -*-&#- 摘要：在本篇博客中，我们将介绍如何优化YOLOv5车牌识别系统的性能，以及如何将模型部署到实际应用中。我们将重点讨论模型压缩、加速技术和部署
- 前言我们这里主要是利用requests模块和bs4模块进行简单的爬虫的讲解，让大家可以对爬虫有了初步的认识，我们通过爬几个简单网站，让大家循
- 这篇文章主要介绍了django有外键关系的两张表如何相互查找,文中通过示例代码介绍的非常详细，对大家的学习或者工作具有一定的参考学习价值,需
- 一次又一次的,我发现,那些有bug的Javascript代码是由于没有真正理解Javascript函数是如何工作而导致的(顺便说一下,许多那
- 前言日常使用python经常要对文本进行处理，无论是爬虫的数据解析，还是大数据的文本清洗，还是普通文件的处理，都是要用到字符串. Pytho
- 事务日志记录着在相关数据库上的操作，同时还存储数据库恢复(recovery)的相关信息。收缩日志的原因有很多种，有些是考虑空间不足，有些则是
- 滤波算子简介ndimage中提供了卷积算法，并且建立在卷积之上，提供了三种边缘检测的滤波方案：prewitt, sobel以及laplace
- 本文介绍了随机提取N条记录的例子，通过Sql server与access数据库的代码比较让你更快的掌握。随机提取10条记录的例子：Sql s
- 指令和程序计算机的硬件系统通常由五大部件构成，包括：运算器、控制器、存储器、输入设备和输出设备。其中，运算器和控制器放在一起就是我们通常所说
- 最近在做文章页盖楼显示的项目，数据来源是跟贴系统生成的UTF8格式的JSON数据。文章页的HTML编码格式是GB2312，在javascri
- 前言ThinkPHP,是为了简化企业级应用开发和敏捷WEB应用开发而诞生的开源轻量级PHP框架。随着框架代码量的增加，一些潜在的威胁也逐渐暴
- 前言每一个孩子都像星空中的一颗星星，散发着自己所特有的光芒照亮着整个夜空。今天就带大家用27行Python代码绘制一幅满天星吧。全局设置在绘
- 我们经常会遇到一些对于多媒体文件修改的操作，像是对视频文件的操作：视频剪辑、字幕编辑、分离音频、视频音频混流等。又比如对音频文件的操作：音频
- 如下所示：interval=stats.t.interval(a,b,mean,std)t分布的置信区 间a：置信水平b:检验量的自由度me
- 对所有数据进行整合与管理当你使用SQL Server 2008企业级的数据仓库平台时，你可以高效的操纵所有数据，并对其进行统一管理存储。◆合
- 第一步：使用记事本打开mysql安装目录下的"my.ini”文件。# MySQL client library initializ
- 一，元祖（tuple）1.元祖是不能修改的，通常写成圆括号中的一系列项，位置有序，固定长度2.实际上元祖支持字符串和列表的一般序列操作，“+
- uuid str int 之间的转换import uudi#str 转 uuiduuid.UUID('123456781234567
- https://discuss.pytorch.org/t/how-to-modify-the-final-fc-layer-based-o
