高手啊，求救！！ASP分级系统问题！

来源：百度知道 编辑：UC知道 时间：2024/05/23 01:21:35
就是我用了这个分级会员系统
http://www.alixixi.com/Down/softdown.asp?softid=9792

比如帐号NAME 注册后是个普通会员 后来开通了一天的VIP功能
请问怎么让NAME在1天后 自动变成普通会员 ？？
这个很重要 希望你能帮忙！！
我需要的是代码 不是过程 我也知道这样过程但是我是新手 不会写啊。。。

在数据表中添加一个注册VIP的时间,在添加一个VIP的使用时间天数.
在登陆的时候加入判断.
数据表的注册VIP时间和当天时间进行比较.将差直赋给一个变量,在调用字段VIP的使用天数.(如果注册VIP时间和当天时间进行比较的差直是小时,就将VIP的使用天数*24,VIP的使用天数就成为小时),

在利用"注册VIP时间和当天时间进行比较的差直"与"VIP的使用天数"进行比较.如果大于VIP的使用天数.那么VIP到期.立刻写入数据表.

就完成楼主所说的 VIP 过期判断.
<%
DqYear=Year(now) '当前年份
DqMonth=Month(Now) '当前月份
DqDay=Day(Now) '当前日期
vipts=57 '接受使用天数 按天计算
vipsqri="2008-1-1" '接收注册时间
vipy=Year(vipsqri)'接收注册年份
vipm=month(vipsqri)'接收注册月份
vipd=day(vipsqri)'接收注册日期
a=DqYear-vipy
if a<>0 then '判断是否为一年内'如果不是.1年等于12个月,1个月等于31天.
b=a
b=b*12
b=b*31
end if
aa=DqMonth-vipm
if aa<>0 then
bb=aa
bb=bb*31
end if
aaa=DqDay-vipd
bbb=b+bb+aaa
response.write bbb&","&vipts
if bbb > vipts then
response.write "VIP已经过期"
else
response.write "VIP没有过期"