ysz0377
小勝靠智，大勝靠德，厚積薄發(fā)，氣勢如虹�。�
級別: 家園�？�

精華主題: 0
發(fā)帖數(shù)量: 535 個
工控威望: 772 點(diǎn)
下載積分: 5155 分
在線時間: 361(小時)
注冊時間: 2009-08-09
最后登錄: 2025-01-02
查看ysz0377的 主題 / 回貼
樓主  發(fā)表于: 7天前
Ctrl0.Year=\\本站點(diǎn)\$年;
Ctrl0.Month=1;
Ctrl0.Day=1;
Ctrl1.Year=\\本站點(diǎn)\$年;
Ctrl1.Month=\\本站點(diǎn)\$月;
Ctrl1.Day=\\本站點(diǎn)\$日;
\\本站點(diǎn)\星期=Ctrl1.DayOfWeek;
if (\\本站點(diǎn)\星期==1)
\\本站點(diǎn)\星期幾="星期日";
if (\\本站點(diǎn)\星期==2)
\\本站點(diǎn)\星期幾="星期一";
if (\\本站點(diǎn)\星期==3)
\\本站點(diǎn)\星期幾="星期二";
if (\\本站點(diǎn)\星期==4)
\\本站點(diǎn)\星期幾="星期三";
if (\\本站點(diǎn)\星期==5)
\\本站點(diǎn)\星期幾="星期四";
if (\\本站點(diǎn)\星期==6)
\\本站點(diǎn)\星期幾="星期五";
if (\\本站點(diǎn)\星期==7)
\\本站點(diǎn)\星期幾="星期六";

long ASSAD1;
long ASSAD2;
long ST;
long ET;
long DT;
long WT;
ASSAD1=Ctrl0.DayOfWeek;
if(ASSAD1==1)
{
ASSAD2=8;
\\本站點(diǎn)\周=1;
}
else
ASSAD2=9-ASSAD1;
ST=HTConvertTime(\\本站點(diǎn)\$年,1,1,0,0,0);
ET=HTConvertTime(\\本站點(diǎn)\$年,\\本站點(diǎn)\$月,\\本站點(diǎn)\$日,1,0,0);
DT=ET-ST-ASSAD2*86400;
if(DT<0)
\\本站點(diǎn)\周=1;
else
{
WT=int(DT/604800)+2;
if(WT==53)
\\本站點(diǎn)\周=52;
else
\\本站點(diǎn)\周=WT;
}
小勝靠智，大勝靠德，厚積薄發(fā)，氣勢如虹！！
ysz0377
小勝靠智，大勝靠德，厚積薄發(fā)，氣勢如虹�。�
級別: 家園�？�

精華主題: 0
發(fā)帖數(shù)量: 535 個
工控威望: 772 點(diǎn)
下載積分: 5155 分
在線時間: 361(小時)
注冊時間: 2009-08-09
最后登錄: 2025-01-02
查看ysz0377的 主題 / 回貼
1樓  發(fā)表于: 7天前
事件命令語言里
小勝靠智，大勝靠德，厚積薄發(fā)，氣勢如虹��！