神剑山庄资源网 Design By www.hcban.com
做了个用来通知论坛有新贴子的hta

把下面的代码copy到本地另存为hta双击就可以执行了,出现新帖子会在右下角冒个窗口出来通知,10s后自动关闭通知窗口
复制代码 代码如下:
<html>
<head>
<title>Blue Idea Board Watcher - By Hutia</title>
<!-- 程序设置,如果希望程序在任务栏显示,请将showintaskbar改为yes -->
<hta:application id="app1" singleinstance="yes" contextmenu="yes"
 sysmenu="yes" windowstate="normal" maximizeButton="no" minimizeButton="yes"
 applicationName="BlueIdeaBoardWatcher" version="1.0" innerBorder="no"
 caption="yes" showintaskbar="no" border="thin" />
<!-- 语种 gb2312 -->
<meta http-equiv="content-type" content="text/html; charset="gb2312"> 
<!-- 样式表 -->
<style>
body, td {
    margin:0px;
    padding:5px;
    overflow:auto;
    font-size:12px;
}

h3 {
    font-size:14px;
}

iframe {
    display:none;
}
</style>
<script>
//******全局变量区*****
// 经典论坛 > Dreamweaver & Javascript专栏
url="http://bbs.blueidea.com/forumdisplay.php?fid=1";

// 刷新间隔 10s
intervals=10000;

//初始化组件
try{
    var xmlHttp=new ActiveXObject("Microsoft.XMLHTTP");
    var adodbStream=new ActiveXObject("ADOD"+"B.St"+"ream");
}catch(e){
    document.write("<h3>加载失败,组件被禁止</h3>");
}

thisDomain=location.href.substring(0,location.href.lastIndexOf("\/"));
//将上次访问的结果保存在ree中用来与下次作对比
ree=new Array();
//用于判断是否初始化完毕的变量
inited=false;
//保存打开的窗口的数组
theWin=new Array();

//初始化函数
function init(){
    startCheck();
}

//发送get请求
function startCheck(){
    xmlHttp.open("get",url,true);
    xmlHttp.send();
    xmlHttp.onreadystatechange=checkState;
}

//确认xmlHttp返回的结果
function checkState(){
    if (xmlHttp.readyState==4){
        if (xmlHttp.status==200){
            //解码获得返回值
            var strHTML=b2s(xmlHttp.responseBody);
            var iStart=strHTML.search(/<table cellspacing=0 cellpadding=0 width="99%" border=0>/i);
            var iEnd=strHTML.indexOf("\r\n<\/table>\r\n",iStart);
            strHTML=strHTML.substring(iStart,iEnd);
            try{
                f1.document.open();
                f1.document.clear();
                f1.document.write(strHTML);
                f1.document.close();
            }catch(e){}
            //将返回值中的链接改成绝对地址
            for(var i=0;i<f1.document.links.length;i++){
                f1.document.links[i].href=f1.document.links[i].href.replace(thisDomain,"http://www.blueidea.com/bbs");
            }
            var result=new Array();
            try{
                var theTable=f1.document.all.tags("TABLE")[1];
                for(var i=1;i<theTable.rows.length;i++){
                    strU=theTable.rows[i].cells[3].firstChild.href;
                    strT=theTable.rows[i].cells[3].firstChild.innerHTML;
                    strC=theTable.rows[i].cells[6].innerText;
                    if(inited){
                        if(ree[strU]!=strC){
                            ree[strU]=strC;
                            result[strU]=strT;
                        }
                    }else{
                        ree[strU]=strC;
                    }
                }
                inited=true;
                for(var i in result){
                    popupWin(i,result[i]);
                }
            }catch(e){}
        }
        setTimeout(startCheck,intervals);
        return(false);
    }
}

//弹出窗口
function popupWin(strURL,strText){
    var mx=screen.availWidth;
    var my=screen.availHeight;
    var w=200;
    var h=150;

    theRow=d1.insertRow(0);
    theCell=theRow.insertCell();
    theCell.innerHTML="<li><a target=\"_blank\" href=\""+strURL+"\">"+strText+"</a>";

    strHTML="<html><head><title>"+strText+"</title>";
    strHTML+="<style>body{margin:0px;padding:6px;background-Color:#D0FFD0;overflow:auto;}\r\n";
    strHTML+="div{width:100%;height:100%;overflow:hidden;text-overflow:ellipsis;";
    strHTML+="text-indent:12px;border:#999 1px solid;cursor:hand;color:#005500;}</style>";
    strHTML+="<body onload=\"setTimeout('window.close();',10000);\">";
    strHTML+="<div onclick=\"window.open('"+strURL+"');window.close();\">";
    strHTML+=strText;
    strHTML+="</div></body></html>";
    for(var i=0;i<theWin.length;i++){
        if(theWin[i].closed){
            var n=parseInt(my/120);
            var l=parseInt(i/n)+1;
            var strModal="dialogWidth="+w+"px;dialogHeight="+h+"px;dialogLeft="+(mx-w*l)+"px;dialogTop="+(my-h*(i%n+1));
            theWin[i]=showModelessDialog("about:blank",strText,strModal);
            theWin[i].document.open();
            theWin[i].document.clear();
            theWin[i].document.write(strHTML);
            theWin[i].document.close();
            theWin[i].focus();
            return(false);
        }
    }
    var n=parseInt(my/120);
    var l=parseInt(i/n)+1;
    var strModal="dialogWidth="+w+"px;dialogHeight="+h+"px;dialogLeft="+(mx-w*l)+"px;dialogTop="+(my-h*(i%n+1));
    theWin[i]=showModelessDialog("about:blank",strText,strModal);
    theWin[i].document.open();
    theWin[i].document.clear();
    theWin[i].document.write(strHTML);
    theWin[i].document.close();
    theWin[i].focus();
    return(false);
}

function b2s(b){
    adodbStream.Type=1;//1=adTypeBinary
    adodbStream.Open();
    adodbStream.write(b);
    adodbStream.position=0;
    adodbStream.Type=2;
    adodbStream.charset="gb2312";
    //adodbStream.charset="_autodetect_all";
    var re=adodbStream.readText();
    adodbStream.close();
    return(re);
}

window.attachEvent("onload",init);

</script>
</head>

<body>
<h3>Latest:</h3>
<table id=d1></table>
<iframe id="f1"></iframe>
</body>
</html>
标签:
用来通知论坛有新贴子的hta代码

神剑山庄资源网 Design By www.hcban.com
神剑山庄资源网 免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
神剑山庄资源网 Design By www.hcban.com

评论“用来通知论坛有新贴子的hta代码”

暂无用来通知论坛有新贴子的hta代码的评论...

《魔兽世界》大逃杀!60人新游玩模式《强袭风暴》3月21日上线

暴雪近日发布了《魔兽世界》10.2.6 更新内容,新游玩模式《强袭风暴》即将于3月21 日在亚服上线,届时玩家将前往阿拉希高地展开一场 60 人大逃杀对战。

艾泽拉斯的冒险者已经征服了艾泽拉斯的大地及遥远的彼岸。他们在对抗世界上最致命的敌人时展现出过人的手腕,并且成功阻止终结宇宙等级的威胁。当他们在为即将于《魔兽世界》资料片《地心之战》中来袭的萨拉塔斯势力做战斗准备时,他们还需要在熟悉的阿拉希高地面对一个全新的敌人──那就是彼此。在《巨龙崛起》10.2.6 更新的《强袭风暴》中,玩家将会进入一个全新的海盗主题大逃杀式限时活动,其中包含极高的风险和史诗级的奖励。

《强袭风暴》不是普通的战场,作为一个独立于主游戏之外的活动,玩家可以用大逃杀的风格来体验《魔兽世界》,不分职业、不分装备(除了你在赛局中捡到的),光是技巧和战略的强弱之分就能决定出谁才是能坚持到最后的赢家。本次活动将会开放单人和双人模式,玩家在加入海盗主题的预赛大厅区域前,可以从强袭风暴角色画面新增好友。游玩游戏将可以累计名望轨迹,《巨龙崛起》和《魔兽世界:巫妖王之怒 经典版》的玩家都可以获得奖励。