财经社区女性社区汽车社区军事社区文学社区社会社区娱乐社区游戏社区个人空间
上一主题:人生目标 下一主题:谈哈哈
斑竹:能不吝赐教流量统计及日历的源代码吗?
[楼主] 作者:zh1000  发表时间:2002/06/27 22:33
点击:98次

本帖地址:http://club.xilu.com/hnzqz3/msgview-135899-12514.html[复制地址]
上一主题:人生目标 下一主题:谈哈哈
 [2楼]  作者:hnzqz  发表时间: 2002/06/27 23:31 

回复:可以啊

流量统计去这里申请,但是广告太多,我去掉了。

http://www.easyhere.com/count/reg.php>

日历代码:

<STYLE>A.menuitem {
 COLOR: menutext; TEXT-DECORATION: none
}
A.menuitem:hover {
 COLOR: highlighttext; BACKGROUND-COLOR: highlight
}
DIV.contextmenu {
 BORDER-RIGHT: 2px outset; BORDER-TOP: 2px outset; Z-INDEX: 999; VISIBILITY: hidden; BORDER-LEFT: 2px outset; BORDER-BOTTOM: 2px outset; POSITION: absolute; BACKGROUND-COLOR: buttonface
}

</STYLE>
<SCRIPT language=JavaScript>
function Year_Month(){
    var now = new Date();
    var yy = now.getYear();
    var mm = now.getMonth()+1;
    var cl = '<font color="#0000df">';
    if (now.getDay() == 0) cl = '<font color="#c00000">';
    if (now.getDay() == 6) cl = '<font color="#00c000">';
    return(cl +  yy + '年' + mm + '月</font>'); }
 function Date_of_Today(){
    var now = new Date();
    var cl = '<font color="#ff0000">';
    if (now.getDay() == 0) cl = '<font color="#c00000">';
    if (now.getDay() == 6) cl = '<font color="#00c000">';
    return(cl +  now.getDate() + '</font>'); }
 function Day_of_Today(){
    var day = new Array();
    day[0] = "星期日";
    day[1] = "星期一";
    day[2] = "星期二";
    day[3] = "星期三";
    day[4] = "星期四";
    day[5] = "星期五";
    day[6] = "星期六";
    var now = new Date();
    var cl = '<font color="#0000df">';
    if (now.getDay() == 0) cl = '<font color="#c00000">';
    if (now.getDay() == 6) cl = '<font color="#00c000">';
    return(cl +  day[now.getDay()] + '</font>'); }
 function CurentTime(){
    var now = new Date();
    var hh = now.getHours();
    var mm = now.getMinutes();
    var ss = now.getTime() % 60000;
    ss = (ss - (ss % 1000)) / 1000;
    var clock = hh+':';
    if (mm < 10) clock += '0';
    clock += mm+':';
    if (ss < 10) clock += '0';
    clock += ss;
    return(clock); }
function refreshCalendarClock(){
document.all.calendarClock1.innerHTML = Year_Month();
document.all.calendarClock2.innerHTML = Date_of_Today();
document.all.calendarClock3.innerHTML = Day_of_Today();
document.all.calendarClock4.innerHTML = CurentTime(); }
 var webUrl = webUrl;
document.write('<table border="0" cellpadding="0" cellspacing="0"><tr><td>');
document.write('<table id="CalendarClockFreeCode" border="0" cellpadding="0" cellspacing="0" width="60" height="70" ');
document.write('style="position:absolute;visibility:hidden" bgcolor="#eeeeee">');
document.write('<tr><td align="center"><font ');
document.write('style="cursor:hand;color:#ff0000;font-family:宋体;font-size:14pt;line-height:120%" ');
if (webUrl != 'netflower'){
   document.write('</td></tr><tr><td align="center"><font ');
   document.write('style="cursor:hand;color:#2000ff;font-family:宋体;font-size:9pt;line-height:110%" ');
}
document.write('</td></tr></table>');
document.write('<table border="0" cellpadding="0" cellspacing="0" width="61" bgcolor="#C0C0C0" height="70">');
document.write('<tr><td valign="top" width="100%" height="100%">');
document.write('<table border="1" cellpadding="0" cellspacing="0" width="58" bgcolor="#FEFEEF" height="67">');
document.write('<tr><td align="center" width="100%" height="100%" >');
document.write('<font id="calendarClock1" style="font-family:宋体;font-size:7pt;line-height:120%"> </font><br>');
document.write('<font id="calendarClock2" style="color:#ff0000;font-family:Arial;font-size:14pt;line-height:120%"> </font><br>');
document.write('<font id="calendarClock3" style="font-family:宋体;font-size:9pt;line-height:120%"> </font><br>');
document.write('<font id="calendarClock4" style="color:#100080;font-family:宋体;font-size:8pt;line-height:120%"><b> </b></font>');
document.write('</td></tr></table>');
document.write('</td></tr></table>');
document.write('</td></tr></table>');
setInterval('refreshCalendarClock()',1000);
</SCRIPT>



※※※※※※
★☆★☆★☆ 长空放飞 凌云万里 超越梦想 真心面对☆★☆★☆★
 [3楼]  作者:梦溪键谈  发表时间: 2002/06/28 04:48 

回复:只有上帝才能看得明白

私房货吧?

鸟,老梦休假两周,暂别。

精彩推荐>>

  简捷回复 [点此进入编辑器回帖页]  文明上网 理性发言
 推荐到西陆名言:
签  名:
作  者:
密  码:
游客来访 
注册用户 提 交
西陆网(www.xilu.com )版权所有 点击拥有西陆免费论坛  联系西陆小精灵

0.1356029510498