asp的日期转换星座函数
时间:2010-06-09 21:05:00
asp日期转换星座函数,参数是日期型
function astro(birth)
astro=""
if birth="" or not isdate(birth) Then exit function
birthmonth=month(birth) : if birthmonth<10 then birthmonth="0" & birthmonth
birthday=day(birth) : if birthday<10 then birthday="0" & birthday
birth=trim(birthmonth & birthday) '重整月日,0903型
rAstro=split("水瓶座*0120*0219#双鱼座*0220*0320#白羊座*0321*0420#金牛座*0421*0521#双子座*0522*0621#巨蟹座*0622*0722#狮子座*0723*0823#处女座*0824*0923#天秤座*0924*1023#天蝎座*1024*1122#射手座*1123*1222#摩蝎座*1222*0119#","#")
astro="摩蝎座" '这个是跨年的,不好对比,先默认
for i_ls=0 to ubound(rAstro)-2
rls2=split(rAstro(i_ls) & "*","*")
if birth>=rls2(1) and birth<=rls2(2) then
astro=rls2(0)
exit for
end if
next
end function
标签:asp,星座,函数,日期
0
投稿
猜你喜欢
Python 捕获代码中所有异常的方法
2022-08-31 06:44:00
Python遍历pandas数据方法总结
2022-04-23 05:47:58
用60行代码实现Python自动抢微信红包
2022-06-14 04:25:04
CSS中写expression可能会在Chrome中有问题
2010-01-29 13:10:00
python中列表添加的四种方法小结
2023-12-10 21:59:47
一文搞懂Python中Pandas数据合并
2023-03-21 13:28:56
Python3读写Excel文件(使用xlrd,xlsxwriter,openpyxl3种方式读写实例与优劣)
2022-10-10 18:17:38
xhtml有哪些块级元素
2009-12-06 11:58:00
Python语言描述KNN算法与Kd树
2021-07-24 05:10:35
pycharm实现设置自动的参数注释标识
2023-11-25 10:26:23
PHP实现抓取HTTPS内容
2023-11-14 12:45:14
Win10系统下Pytorch环境的搭建过程
2023-09-29 06:57:54
javaweb中mysql数据库连接步骤方法及其实例
2024-01-29 08:06:45
解决pytorch中的kl divergence计算问题
2023-11-12 11:02:00
来自腾讯的一个不固定高度得消息的滚动特效
2024-04-17 10:19:34
Golang在Mac、Linux、Windows下如何交叉编译的实现
2024-02-23 06:00:02
Python实现验证码识别
2022-01-04 09:51:04
python使用pyshp读写shp文件的实现
2023-10-02 04:07:13
解析SQL Server 2008中的新语句:MERGE
2009-01-13 13:57:00
golang读取各种配置文件(ini、json、yaml)
2024-05-09 14:51:49