打印

[原创]MyHTML Player release v1.1

把下面的代码copy到本地,另存为hta文件使用

特点:自动获取baidu歌曲top500并link

使用ajax技术,自动分页

注意:代码中使用了ADODB.Stream对象,可能被杀毒软件判断为恶意。

 提示:您可以先修改部分代码再运行
本帖最近评分记录
顶!好东东。
珍视拥有的、遗忘失去的。
强~

而且。。。。嘿嘿,用于个人的学习目的在本地机器上使用,所以不算盗版


子叶:子乌的叶子
帅哥们,美女们,新的一年终于来了,祝贺你们...终于又老了一岁~
上次记得看了一个的,也是楼主?是楼主的升级版?

p.s.年底发彪的人真多-_-!
2008 · 布鲁斯狼的BLOG
-------------------------------------------------------------
艾生活·i0514·小艾生活网

TOP

还在为头像烦恼?还在为不能关注好友动态烦忧?快来蓝色理想家园吧!
嗯,前两天那个也是他发的

hutia,你可以考虑对ADODB.Stream字符串进行自定义方法的加密,在使用的时候还原,这样子杀毒软件就不认识了,可以去参考爱虫之类的代码是如何加密的

:D:D:D:D:D:D:D
子叶:子乌的叶子
帅哥们,美女们,新的一年终于来了,祝贺你们...终于又老了一岁~

TOP

楼主 ,你的代码如果参考wmp的sdk进行播放器的控制的话会更好。

举几个例子:

你的音乐选择是由用户手动选择,可是实际上你可以做一个链接测试的功能,底下是我以前自己用的一小段代码,比较粗糙,但大概意思表示出来了:
复制内容到剪贴板
代码:
<script>
function test(url){
    window.status="测试链接中,请稍候……";
    intErrCnt=0;
    wmp.URL = url;
    wmp.controls.play();
}
var intErrCnt=0;
function evtWmpError(){
intErrCnt++;
wmp.Error.clearErrorQueue();
if (intErrCnt<=3){
    window.status="测试链接中,失败"+(intErrCnt+1)+"次……";
    tidErr=setTimeout('wmp.controls.play()',1000);
}
else{
    intErrCnt=0;
    window.status="测试连接4次均失败,链接可能失效。";
}
}
function evtPSChg(ns){
if (ns==3){//正在播放
    window.status=("测试连接"+(intErrCnt+1)+"次后成功,链接可用");
    intErrCnt=0;
}
}
</script>
<script language="JScript" for="wmp" event="error()">evtWmpError();</script>
<script language="JScript" for="wmp" event="playStateChange(ns)">evtPSChg(ns);</script>
...
...
<object id="wmp"....>..
子叶:子乌的叶子
帅哥们,美女们,新的一年终于来了,祝贺你们...终于又老了一岁~

TOP

谢谢Sheneyan,我正在考虑给下个版本加入失效链接过滤呵呵,过两天升级成1.3版

adodb.stream字串加密很有道理,应该可以实现呵呵

TOP

界面下边有一大快空白区
人有多大胆  地有多大产
没有做不到  只有想不到

TOP

很不错啊

TOP

我一直以为黑的地方是播放列表,拖过去就出错..原来是右边
有事儿您说话

TOP

adodb.stream  不用 字串加密 啊,

直接只有写就行了:

"ado"+"db"+"."+"st"+"rea"+"m"

哈哈。
一样的。应该可以的。
杀毒软件就绝对查不出来。

哦,还有,好像列表不能自动播放,每次换一首歌了就要手动点一下播放。

TOP

我想显示歌曲名称的后面加上歌手名称,怎么处理?

分析了半天也不知道怎么改。

TOP

在function analyBaiduList()里,我有写注释的呵呵

TOP

强,学习学习
高雅清香的春兰秋桂,不慕求虚荣,不阿谀权贵;芳香出于自然,不是为了博取别人欣赏。

TOP

不错,支持技术原创。

TOP

好东西,看了原理和代码,想问一下,怎么运行不了?





-------
Sheneyan注:楼主已经说的很清楚了,另存为hta格式

TOP

好东西,给楼主赞一个!!

TOP

...厉害的人真多...
我的未來不是夢,我的心跟著希望在動……

TOP

請教問題

hta是什麼文件,和htm有什麼區別呢,它能在服務器上通過IE播放嗎

TOP

出错了  打开也没用啊。。播放不了。。
禁止“Senfe”回复“99999999999”的帖子!!

TOP

找不到歌曲地址,

TOP

版主,偶用的是 2000的操作系统.
不能运行呀.
点了歌曲以后.出现

行:372
字符:2
错误:对像不支持此属性或方法
代码:0

是怎么回事?

TOP

怎么现在又用不了了呢? 好像歌曲的路径出了问题!希望楼主解决呢!!

TOP

呵呵  看看好用不~~!

TOP

脚本产生2个错误

TOP

提示automation不能创建服务器对象
www.5study.net www.websdeveloper.cn

TOP

能改好吗???

TOP