玖玖玖视频-亚洲精品1卡2卡3卡-操欧美美女-真实国产乱子伦对白视频不卡-国产乱在线-大胸美女被吃奶爽死视频-久久亚洲美女精品国产精品-天堂在线www天堂在线-久久在精品线影院精品国产-国产又粗又长又大-欧美三级一区二区-超碰在线亚洲-天天cao在线-国产偷倩视频-亚洲啪

Ctrl0.Year=\\本站點\$年;
Ctrl0.Month=1;
Ctrl0.Day=1;
Ctrl1.Year=\\本站點\$年;
Ctrl1.Month=\\本站點\$月;
Ctrl1.Day=\\本站點\$日;
\\本站點\星期=Ctrl1.DayOfWeek;
if (\\本站點\星期==1)
\\本站點\星期幾="星期日";
if (\\本站點\星期==2)
\\本站點\星期幾="星期一";
if (\\本站點\星期==3)
\\本站點\星期幾="星期二";
if (\\本站點\星期==4)
\\本站點\星期幾="星期三";
if (\\本站點\星期==5)
\\本站點\星期幾="星期四";
if (\\本站點\星期==6)
\\本站點\星期幾="星期五";
if (\\本站點\星期==7)
\\本站點\星期幾="星期六";

long ASSAD1;
long ASSAD2;
long ST;
long ET;
long DT;
long WT;
ASSAD1=Ctrl0.DayOfWeek;
if(ASSAD1==1)
{
ASSAD2=8;
\\本站點\周=1;
}
else
ASSAD2=9-ASSAD1;
ST=HTConvertTime(\\本站點\$年,1,1,0,0,0);
ET=HTConvertTime(\\本站點\$年,\\本站點\$月,\\本站點\$日,1,0,0);
DT=ET-ST-ASSAD2*86400;
if(DT<0)
\\本站點\周=1;
else
{
WT=int(DT/604800)+2;
if(WT==53)
\\本站點\周=52;
else
\\本站點\周=WT;
}

感謝分享 謝謝好人