Краслава Портал

Объявление

Внимание! Бонус за регистрацию 0,01 WMZ! Возможность заработать более 5,12 WMZ просто будучи участником форума! Подробнее здесь.

Всем бонус 0,1$ в этой теме!

Открыта реферральная программа! Подробнее читаем здесь.

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.

Вы здесь » Краслава Портал » Мусорка » Скрипт вычисления дня недели в *.cmd и *.bat

Скрипт вычисления дня недели в *.cmd и *.bat

Страница: 1
Тема закрыта

Сообщений 1 страница 3 из 3

1

  • Автор: Валк
  • Активный участник
  • Зарегистрирован: 2007-10-26
  • Приглашений: 0
  • Сообщений: 30
  • Уважение: +0
  • Позитив: +0
  • Провел на форуме:
    6 часов 43 минуты
  • Последний визит:
    2007-11-21 03:08:50
Код:
rem вычисление дня недели DoW (1-Пн, 2-Вт, 3-Ср, 4-Чт, 5-Пт, 6-Сб, 7-Вс)
rem для корректной работы этого кода формат даты должен быть DD.MM.YYYY
rem в противном случае надо изменить значения переменных DValue, MValue, YValue и DataValue
SET DValue=%date:~0,2%
SET MValue=%date:~3,2%
SET YValue=%date:~6,4%
SET DataValue=%date:~8,2%%date:~3,2%%date:~0,2%
IF %DValue:~0,1%==0 SET DValue=%DValue:~1,1%
IF %MValue:~0,1%==0 SET MValue=%MValue:~1,1%
IF %MValue% GTR 2 (
  SET /a MValue = %MValue% + 1
) ELSE (
  SET /a MValue = %MValue% + 13
  SET /a YValue = %YValue% - 1
)
SET /a DoW = 36525 * %YValue% / 100 + 306 * %MValue% / 10 + %DValue% - 621050
SET /a DoW = %DoW% - %DoW% / 7 * 7 + 1

0

2

  • Автор: Krait
  • Модератор
  • Krait
  • Откуда: Россия Череповец
  • Зарегистрирован: 2007-10-05
  • Приглашений: 0
  • Сообщений: 1039
  • Уважение: +32
  • Позитив: +45
  • Пол: Мужской
  • Провел на форуме:
    6 дней 18 часов
  • Последний визит:
    2008-07-01 21:59:36

старый добрый VBS !!! а теперь попробуй вставь этот код в страничку !!!! :)

0

3

  • Автор: Krait
  • Модератор
  • Krait
  • Откуда: Россия Череповец
  • Зарегистрирован: 2007-10-05
  • Приглашений: 0
  • Сообщений: 1039
  • Уважение: +32
  • Позитив: +45
  • Пол: Мужской
  • Провел на форуме:
    6 дней 18 часов
  • Последний визит:
    2008-07-01 21:59:36

календарик:

Код:
<SCRIPT LANGUAGE="JavaScript">

<!-- Begin
monthnames = new Array(
"Январь",
"Февраль",
"Март",
"Апрель",
"Май",
"Июнь",
"Июль",
"Август",
"Сентябрь",
"Октябрь",
"Ноябрь",
"Декабрь");
var linkcount=0;
function addlink(month, day, href) {
var entry = new Array(3);
entry[0] = month;
entry[1] = day;
entry[2] = href;
this[linkcount++] = entry;
}
Array.prototype.addlink = addlink;
linkdays = new Array();
monthdays = new Array(12);
monthdays[0]=31;
monthdays[1]=28;
monthdays[2]=31;
monthdays[3]=30;
monthdays[4]=31;
monthdays[5]=30;
monthdays[6]=31;
monthdays[7]=31;
monthdays[8]=30;
monthdays[9]=31;
monthdays[10]=30;
monthdays[11]=31;
todayDate=new Date();
thisday=todayDate.getDay();
thismonth=todayDate.getMonth();
thisdate=todayDate.getDate();
thisyear=todayDate.getYear();
thisyear = thisyear % 100;
thisyear = ((thisyear < 50) ? (2000 + thisyear) : (1900 + thisyear));
if (((thisyear % 4 == 0) 
&& !(thisyear % 100 == 0))
||(thisyear % 400 == 0)) monthdays[1]++;
startspaces=thisdate;
while (startspaces > 7) startspaces-=7;
startspaces = thisday - startspaces + 1;
if (startspaces < 0) startspaces+=7;
document.write("<table border=2 bgcolor=white ");
document.write("bordercolor=black><font color=black>");
document.write("<tr><td colspan=7><center><strong>" 
+ monthnames[thismonth] + " " + thisyear 
+ "</strong></center></font></td></tr>");
document.write("<tr>");
document.write("<td align=center>Вс</td>");
document.write("<td align=center>Пн</td>");
document.write("<td align=center>Вт</td>");
document.write("<td align=center>Ср</td>");
document.write("<td align=center>Чт</td>");
document.write("<td align=center>Пт</td>");
document.write("<td align=center>Сб</td>"); 
document.write("</tr>");
document.write("<tr>");
for (s=0;s<startspaces;s++) {
document.write("<td> </td>");
}
count=1;
while (count <= monthdays[thismonth]) {
for (b = startspaces;b<7;b++) {
linktrue=false;
document.write("<td>");
for (c=0;c<linkdays.length;c++) {
if (linkdays[c] != null) {
if ((linkdays[c][0]==thismonth + 1) && (linkdays[c][1]==count)) {
document.write("<a href=\"" + linkdays[c][2] + "\">");
linktrue=true;
      }
   }
}
if (count==thisdate) {
document.write("<font color='FF0000'><strong>");
}
if (count <= monthdays[thismonth]) {
document.write(count);
}
else {
document.write(" ");
}
if (count==thisdate) {
document.write("</strong></font>");
}
if (linktrue)
document.write("</a>");
document.write("</td>");
count++;
}
document.write("</tr>");
document.write("<tr>");
startspaces=0;
}
document.write("</table></p>");
// End -->
</SCRIPT>

0

Тема закрыта
Страница: 1

Вы здесь » Краслава Портал » Мусорка » Скрипт вычисления дня недели в *.cmd и *.bat