agenda.asp er den fil hvori alle mærkedage findes i. Disse skal jeg gøre dynamiske - hente data ind fra en access database. Men jeg skal ha udskrevet alle funktionerne. Fx. den første, så den fungerer som en normal JS-fil.
fAppendEvent(2003,3,28,"..... - skal gøre dynamisk, dvs. at der skal laves en løkke omkring den....
>>> agenda.asp --------------------------------------------------------- function fAppendEvent(y, m, d, message, action, bgcolor, fgcolor, bgimg, boxit, html) { var ag=fGetEvent(y,m,d); if (ag==null) fAddEvent(y, m, d, message, action, bgcolor, fgcolor, bgimg, boxit, html); else fAddEvent(y, m, d, message?ag[0]+"\n"+message:ag[0], action?action:ag[1], bgcolor?bgcolor:ag[2], fgcolor?fgcolor:ag[3], bgimg?bgimg:ag[4], boxit?boxit:ag[5], ag[6]+html); }
fAppendEvent(2003,3,28," March 28, 2003 \n Click to detect calendar size. ","alert('Here is the current size of the calendar - \"width='+gfSelf.offsetWidth+' height='+gfSelf.offsetHeight+'\"');","#AA0034","#FFFFFF"); fAppendEvent(2002,12,14," Click the sub events for details... ","",null,null,"OS13.jpg",false,"<div align=left class='MsgBoard' onmousedown='alert(\"Dining for what I like!\")'>18:00 dinner</div>"); fAppendEvent(2002,12,14,"",null,null,null,null,null,"<div align=left class='MsgBoard' onmousedown='alert(\"Party for what we like!\")'>20:00 party</div>");
function fHoliday(y,m,d) { var r=fGetEvent(y,m,d); // get agenda event. if (r) return r; // ignore the following holiday checking if the date has already been set by the above addEvent functions. Of course you can write your own code to merge them instead of just ignoring.
// you may have sophisticated holiday calculation set here, following are only simple examples. if (m==1&&d==1) r=[" Jan 1, "+y+" \n Godt Nytår! ", "alert('Godt Nytår!')", null, null, "dots.gif", false, "<div align=left class='MsgBoard'>Godt Nytår!</div>"]; else if (m==12&&d==25) r=[" Dec 25, "+y+" \n Merry X'mas! ", null, null, null, "Holiday.jpg"]; // show a line-through effect else if (m==5&&d>20) { var date=getDateByDOW(y,5,5,1); // Memorial day is the last Monday of May if (d==date) r=["May "+d+", "+y+" Luder-dag ", gsAction, "#004955", "white"]; // use default action }
return r; // if r is null, the engine will just render it as a normal day. }
str3 = "fAppendEvent(2003,3,28,"" March 28, 2003 \n Click to detect calendar size. "",""alert('spasser');"",""#AA0034"",""#FFFFFF"");" & "<br>" str3 = str3 & "fAppendEvent(2002,12,14,"" Click the sub events for details... "","""",null,null,""OS13.jpg"",false,""<div align=left class='MsgBoard' onmousedown='alert(\""Dining what I like!\"")'>18:00 dinner</div>"");" & "<br>" str3 = str3 & "fAppendEvent(2002,12,14,"""",null,null,null,null,null,""<div align=left class='MsgBoard' onmousedown='alert(\""Party what we like!\"")'>20:00 party</div>"");" & "<br>" & "<br>"
Response.Write str3
str2 = "function fHoliday(y,m,d) {" & "<br>" str2 = str2 & "var r=fGetEvent(y,m,d); // get agenda event." & "<br>" str2 = str2 & "if (r) return r;" & "<br>" // ignore the following holiday checking if the date has already been set by the above addEvent functions. Of course you can write your own code to merge them instead of just ignoring.
// you may have sophisticated holiday calculation set here, following are only simple examples. str2 = str2 & "if (m==1&&d==1)" & "<br>" str2 = str2 & " r=["" Jan 1, ""+y+"" \n Godt Nytår! "", ""alert('Godt Nytår!')"", null, null, ""dots.gif"", false, ""<div align=left class='MsgBoard'>Godt Nytår!</div>""];" & "<br>" str2 = str2 & " else if (m==12&&d==25)" & "<br>" str2 = str2 & "r=["" Dec 25, ""+y+"" \n Merry X'mas! "", null, null, null, ""Holiday.jpg""];" & "<br>" // show a line-through effect str2 = str2 & " else if (m==5&&d>20) {" & "<br>" str2 = str2 & " var date=getDateByDOW(y,5,5,1);" & "<br>" // Memorial day is the last Monday of May str2 = str2 & " if (d==date) r=[""May ""+d+"", ""+y+"" Luder-dag "", gsAction, ""#004955"", ""white""];" & "<br>" // use default action str2 = str2 & "}" & "<br>"
str2 = str2 & "return r;" & "<br>" // if r is null, the engine will just render it as a normal day. str2 = str2 & "}" & "<br>" & "<br>"
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.