订阅本栏目 RSS您所在的位置: 深山工作室 > asp函数库 > 正文

纯asp根据当前日期计算出相应的星座

2019/9/18 22:40:15 字体: 浏览 3938
纯asp根据当前日期计算出相应的星座
以下是asp根据当前日期计算出相应的星座,以下主要是比对日期,以上是演示效果

<%
curTime = Now()
curYear = Year(curTime)

function ren_xingzuo(s_riqi)
if s_riqi="" or not isdate(s_riqi) Then exit function
s_riqimonth = right("00" & month(s_riqi),2)
s_riqiday = right("00" & day(s_riqi),2)
s_riqi = trim(s_riqimonth & s_riqiday) '重整月日,0903型
zx_sow = "摩蝎座" '先默认跨年时会使用
if s_riqi>=0120 and s_riqi<=0219 then zx_sow = "水瓶座"
if s_riqi>=0220 and s_riqi<=0320 then zx_sow = "双鱼座"
if s_riqi>=0321 and s_riqi<=0420 then zx_sow = "白羊座"
if s_riqi>=0421 and s_riqi<=0521 then zx_sow = "金牛座"
if s_riqi>=0522 and s_riqi<=0621 then zx_sow = "双子座"
if s_riqi>=0622 and s_riqi<=0722 then zx_sow = "巨蟹座"
if s_riqi>=0723 and s_riqi<=0823 then zx_sow = "狮子座"
if s_riqi>=0824 and s_riqi<=0923 then zx_sow = "处女座"
if s_riqi>=0924 and s_riqi<=1023 then zx_sow = "天秤座"
if s_riqi>=1024 and s_riqi<=1122 then zx_sow = "天蝎座"
if s_riqi>=1123 and s_riqi<=1222 then zx_sow = "射手座"
if s_riqi>=1222 and s_riqi<=0119 then zx_sow = "摩蝎座"
ren_xingzuo = zx_sow
end function

response.write "现在时间:" & curTime & "<br>"
response.write "年份:" & curYear & "<br>"
response.write "星座:" & ren_xingzuo(curTime) & "<br>"
response.end

%>




相关阅读
uni-app基础知识事件传参(动态参数演示)
网站需要SEO 基本的SEO建站要点
深山旅行社网站管理系统 v1.6
利用javascript简短功能就可以检查form表单中的元素是否已经填写
仿淘宝首页商品分类列表效果
dreawmeaver中鲜为人知的小秘诀,让你制作网页更加随心所欲.
Javascript脚本常用代码
asp版图形验证码,可自定义点阵信息,支持字符扭曲、倾斜、倾斜
共有0条关于《纯asp根据当前日期计算出相应的星座》的评论
发表评论
正在加载评论......
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
python
更多>>同类信息
asp利用hasOwnProperty验证某个json中的某个标签是否存在
asp用BcO将二进制转八进制然后再OcB将八进制转二进制
asp用BcH将二进制转十六进制然后再HcB将十六进制转二进制
asp用cDec将二进制转十进制然后再用cBit将十进制转二进制
纯asp根据当前日期计算出相应的星座
asp采用access数据库搜索信息时因为日文片假名问题提示“Microsoft JET Database Engine 错误80040e14”的解决方法
更多>>最新添加文章
python通过代码修改pip下载源让下载库飞起
python里面requests.post返回的res.text还有其它的吗
aliyun阿里云续费域名优惠口令(注册、续费都可以使用)
windows7环境下安装配置jdk
python对微信操作要用到这两个库wxpy与itchat
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明
DW设置之后更好用 DreamweaverCS编辑GB2312与UTF-8文件在代码视图中点击鼠标错位问题的解决办法
解决国内 github.com 打不开的准确方法
更多>>随机抽取信息
旅行社手机网站模板1
uni-app的父与子页面传递参数之属性Props字段类型讲解
asp中利用split,instr组合去除二维数组中重复项
Word图片导出方法
css背景使用base64编码或者将base64编码放在img图片标签中
div中设置文字垂直居中