<SCRIPT LANGUAGE="JavaScript"> <!-- para ocultar el contenido del guión a los exploradores antiguos // // Funciones Cookie // Escrito por: Bill Dortch, hIdaho Design // Las funciones siguientes se ceden al dominio público. function encode (str) { var dest = ""; var len = str.length; var index = 0; var code = null; for (var i = 0; i < len; i++) { var ch = str.charAt(i); if (ch == " ") code = "%20"; else if (ch == "%") code = "%25"; else if (ch == ",") code = "%2C"; else if (ch == ";") code = "%3B"; else if (ch == "b") code = "%08"; else if (ch == "t") code = "%09"; else if (ch == "n") code = "%0A"; else if (ch == "f") code = "%0C"; else if (ch == "r") code = "%0D"; if (code != null) { dest += str.substring(index,i) + code; index = i + 1; code = null; } } if (index < len) dest += str.substring(index, len); return dest; } function decode (str) { var dest = ""; var len = str.length; var index = 0; var code = null; var i = 0; while (i < len) { i = str.indexOf ("%", i); if (i == -1) break; if (index < i) dest += str.substring(index, i); code = str.substring (i+1,i+3); i += 3; index = i; if (code == "20") dest += " "; else if (code == "25") dest += "%"; else if (code == "2C") dest += ","; else if (code == "3B") dest += ";"; else if (code == "08") dest += "b"; else if (code == "09") dest += "t"; else if (code == "0A") dest += "n"; else if (code == "0C") dest += "f"; else if (code == "0D") dest += "r"; else { i -= 2; index -= 3; } } if (index < len) dest += str.substring(index, len); return dest; } function getCookieVal (offset) { var endstr = document.cookie.indexOf (";", offset); if (endstr == -1) endstr = document.cookie.length; return decode(document.cookie.substring(offset, endstr)); } function GetCookie (name) { var arg = name + "="; var alen = arg.length; var clen = document.cookie.length; var i = 0; while (i < clen) { var j = i + alen; if (document.cookie.substring(i, j) == arg) return getCookieVal (j); i = document.cookie.indexOf(" ", i) + 1; if (i == 0) break; } return null; } function SetCookie (name, value, expires) { document.cookie = name + "=" + encode(value) + ((expires == null) ? "" : ("; expires=" + expires.toGMTString())); } // //http://www.yomaster.com function arrayOfDaysInMonths(isLeapYear) { this[0] = 31; this[1] = 28; if (isLeapYear) this[1] = 29; this[2] = 31; this[3] = 30; this[4] = 31; this[5] = 30; this[6] = 31; this[7] = 31; this[8] = 30; this[9] = 31; this[10] = 30; this[11] = 31; } function daysInMonth(month, year) { var isLeapYear = (((year % 4 == 0) && (year % 100 != 0)) || (year % 400 == 0)); var monthDays = new arrayOfDaysInMonths(isLeapYear); return monthDays[month]; } function calendar() { var monthNames = "EneFebMarAbrMarJunJulAgoSepOctNovDic"; var today = new Date(); var day = today.getDate(); var month = today.getMonth(); var year = today.getYear() + 0; var numDays = daysInMonth(month, year); var firstDay = today; firstDay.setDate(1); var startDay = firstDay.getDay(); var column = 0; document.write("<CENTER>"); document.write("<TABLE BORDER>"); document.write("<TR><TH COLSPAN=7>"); document.write(monthNames.substring(3*month, 3*(month + 1)) + " " + year); document.write("<TR><TH>Dom<TH>Lun<TH>Mar<TH>Mié<TH>Jue<TH>Vie<TH>Sab"); document.write("<TR>"); for (i = 0; i < startDay; i++) { document.write("<TD>"); column++; } for (i=1; i <= numDays; i++) { var s = "" + i; if ((GetCookie("d"+i) != null)) s = s.fontcolor("#FF0000"); s = s.link("javascript:dayClick(" + i + ")") document.write("<TD>" + s); if (++column == 7) { document.write("<TR>"); column = 0; } } document.write("</TABLE>"); document.writeln("</CENTER>"); } function dayClick(day) { var expdate = new Date (); expdate.setTime (expdate.getTime() + (24 * 60 * 60 * 1000)); var prefix = "d"; var theCookieName = prefix + day; var theDayclickedReminder = GetCookie(theCookieName); if (theDayclickedReminder != null) { alert("La cita del día " + day + " es:" + theDayclickedReminder); } if (confirm("&iquest;Desea escribir una cita para el día " + day + " de este mes?")) { x = prompt("Escriba una cita para el día "+ day + " de este mes", theDayclickedReminder); SetCookie (theCookieName, x, expdate); } // end if } // --> <!-- deja de ocultar el contenido para los exploradores antiguos --> </SCRIPT>