Events Calendar
<% var monthL, monthR; var yearL = yearR = Year; /********** LEFT ARROW **********/ Response.write('');
if (Month <= 0) {
monthL = 12;
yearL = Year - 1;
}
else monthL = Month;
Response.write('');
Response.write('
');
Response.write('');
/********** END OF LEFT ARROW **********/
Response.write(' ');
Response.write(monthName[Month] + " " + Year);
Response.write(' ');
/********** RIGHT ARROW **********/
if (Month >= 11) {
monthR = 1;
yearR = Year + 1;
}
else monthR = Month + 2;
Response.write('');
Response.write('
');
Response.write('');
Response.write('
');
/********** END OF RIGHT ARROW **********/
%>
| ' + dayName[i] + ' | '); } Response.write("||
|---|---|---|
| '); // beginning blank cells } /********** SET UP CONNECTION & RECORDSET OBJECTS **********/ var adOpenStatic = 3; var adLockOptimistic = 3; var adCmdText = 0x0001; var strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" + Server.MapPath("calendar.mdb") + ";" var nMonth = Month + 1; var strSQL = "SELECT * FROM calendar WHERE Month = " + nMonth + " AND Year = " + Year + ""; var conn = Server.CreateObject("ADODB.Connection"); conn.Open(strDSN); rsCal = Server.CreateObject("ADODB.RecordSet"); rsCal.Open(strSQL, conn, adOpenStatic, adLockOptimistic, adCmdText); /********** END OF SET UP CONNECTION & RECORDSET OBJECTS **********/ for (i = 0; i < daysInMonth;) { if (column++ != 7) { if (now.getMonth() == Month && now.getDate() == Day && now.getYear() == Year) { Response.write(' | ' + Day++ + '');
if (!rsCal.BOF) rsCal.MoveFirst();
while (!rsCal.EOF) {
if (rsCal.Fields("Day") == Day - 1) {
Response.Write(' ' + rsCal.Fields("Subject") + ' '); } rsCal.MoveNext(); } Response.write(' | ');
}
else {
Response.write('' + Day++ + '');
if (!rsCal.BOF) rsCal.MoveFirst();
while (!rsCal.EOF) {
if (rsCal.Fields("Day") == Day - 1) {
Response.Write(' ' + rsCal.Fields("Subject") + ' '); } rsCal.MoveNext(); } Response.write(' | ');
}
i++;
}
else {
Response.write("
| '); // ending blank cells } } /********** END OF BODY OF THE TABLE **********/ %> |