الكالينج ليس دقيقًا جدًا. يجب على الأصدقاء الذين يفهمون أن لا يضحكون على أنفسهم. على الرغم من أنني أرغب في القيام بذلك بدقة شديدة ، إلا أن الخوارزمية مرهقة للغاية ، لذا فأنا أستخدمها كخارفة بسيطة وسهلة الاستخدام.
الرمز كما يلي:
<script language = "javaScript">
/*
screen.availwidth = عرض مساحة عمل الشاشة
screen.availheight = ارتفاع مساحة عمل الشاشة
*/
var wwidth = screen.availwidth- (screen.availwidth-370+78) -100 ؛
var wheight = 20 ؛
var wleft = screen.availwidth-370+78 ؛
var wtop = 0 ؛
window.moveto (wleft ، wtop) ؛
Window.Resizeto (wwidth ، wheight) ؛
</script>
<script language = "vbscript">
uname = "Xiao Cai"
Ubirthday = #1981-01-25 00: 00: 00 #
usex = 1 '' '' '0 = female 1 = ذكر' '' '' '' '' '
Lage = Array (20،22)
ldate = dateadd ("yyyy" ، lage (usex) ، ubirthday)
</script>
<! doctype html public "-// w3c // dtd html 4.0 transitional // en">
<html>
<head>
<meta http-equiv = content-type content = "text/html ؛ charset = gb2312">
<title> الزواج </title>
<hta: التطبيق
id = "hta_pro_marriage"
ApplicationName = "pro_marriage"
الحدود = "لا شيء"
Caption = "لا"
Scroll = "لا"
SingleInstance = "نعم"
WindowState = "Normal"
ShowItaskBar = "لا"
>
<style>
جسم {
الهامش: 0px ؛
}
الجسم ، TD ، div {
Font-Family: "安安" ؛
حجم الخط: 14px ؛
}
IMG ، الجدول ، TD ، div {
الحدود: 0px ؛
}
</style>
<script language = "vbscript">
Dim Sdate ، Nday ، Nmonth ، Nyear ، Nsecond ، Nminute ، NHour
وظيفة Showtime ()
nday = اليوم (الآن ())
NHour = ساعة (الآن ())
nminute = دقيقة (الآن ())
nsecond = الثاني (الآن ())
dhour = ساعة (ldate) - NHour
dminute = دقيقة (ldate) - nminute
dsecond = الثاني (ldate) - nsecond
إذا كان dsecond <0 ثم
dminute = dminute - 1
dsecond = dsecond + 60
إنهاء إذا
إذا كان dminute <0 ثم
dhour = dhour -1
dminute = dminute + 60
إنهاء إذا
إذا كان dhour <0 ثم
nday = nday -1
DHOUR = DHOUR + 24
إنهاء إذا
إذا كان dsecond = 0 ثم
Call Showdate ()
إنهاء إذا
document.getElementById ("mydiv2"). innerhtml = sdate & "" & dhour & "time" & dminute & "mother" & dsecond & "seconds"
setTimeout "Showtime ()" ، 1*1000
وظيفة نهاية
وظيفة showdate ()
Nyear = السنة (الآن ())
nmonth = الشهر (الآن ())
dyear = السنة (ldate) - nyear
dmonth = شهر (ldate) - nmonth
dday = اليوم (ldate) - nday
إذا كان dday <0 ثم
dmonth = dmonth -1
dday = dday + 30
إنهاء إذا
إذا كان dmonth <0 ثم
dyear = dyear -1
dmonth = dmonth + 12
إنهاء إذا
sdate = dyear & "year" & dmonth & "month" & dday & "day"
'document.getElementById ("mydiv1"). innerhtml = "<font color = red>" & uname & "</font> وفقًا للعصر القانوني للزواج <font color = blue>" & lage (usex) & "</font> عام واحد"
وظيفة نهاية
</script>
</head>
<body onload = "showtime () ؛ showdate () ؛">
<div id = "mydiv1" style = "padding-left: 3px ؛ padding-top: 2px ؛"> </viv>
<div id = "mydiv2" style = "padding-left: 7px ؛ padding-bottom: 2px ؛"> </viv>
</body>