MyHTML Player release v1.1

脚本专栏 2024/11/1 佚名

3 2 1

圆月山庄资源网 Design By www.vgjia.com

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

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

使用ajax技术，自动分页

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

<html> <head> <title>My HTML Player - By Hutia</title> <hta:application id="app1" singleinstance="yes" contextmenu="yes"  sysmenu="yes" windowstate="normal" maximizeButton="no" minimizeButton="yes"  applicationName="MyHTMLPlayer" version="1.1" innerBorder="no"  caption="yes" showintaskbar="yes" border="thin" /> <meta http-equiv="content-type" content="text/html; charset="gb2312"> <style> body {     overflow:auto;     font-size:12px;     cursor:default;     padding:3px;     margin:0px;     border-width:0px; } #f1 {     display:none; } #table01 {     font-size:12px;     background-Color:black;     color:white;     text-align:center;     float:left;     height:300px; } #table01 td{     vertical-align:top; } #MediaPlayer1 {     width:300px;     height:300px; } #playListTitle {     background-Color:#001122;     color:white;     font-size:12px;     font-weight:bold;     width:100%;     height:16px;     padding:2px; } #playList {     width:150px;     height:280;     margin:0px;     font-size:12px;     background-Color:black;     color:white; } #musicList {     width:260px;     border:buttonface 4px groove;     height:200px;     float:right; } #musicListTitle {     font-size:13px;     width:100%;     height:20px;     background-Color:#C5FFC5;     padding:3px;     font-weight:bold; } #musicListContent {     height:200px; } #musicList .item {     width:100%;     height:20px;     line-height:12px;     padding:0px;     margin:0px;     overflow-y:hidden; } #musicList .item a {     color:#773;     text-decoration:none;     width:180px;     height:20px;     line-height:12px;     padding-top:5px;     padding-left:10px;     margin:0px;     position:relative;     overflow:hidden;     text-overflow:ellipsis; } #musicListNav {     height:18px; } #processBar {     position:absolute;     width:99%;     height:30px;     border:buttonface 2px inset;     z-Index:99;     background-Color:#FFF;     bottom:5px;     left:5px;     padding:5px; } .add2ListBtn {     width:18px;     line-height:14px;     text-align:center;     cursor:hand;     font-size:14px;     font-family:Webdings; } .add2ListBtn2 {     width:18px;     line-height:14px;     text-align:center;     cursor:hand;     font-size:14px; } </style>  <body onload="init();">   All Music  <hr> 分页：  <hr> <marquee scrolldelay=50 scrollamount=1> Tips: 把歌曲拖入播放列表 &nbsp;&nbsp;&nbsp;&nbsp; Tips: 无法播放时点击左右箭头更换音乐地址 </marquee>   Processing...                             <object classid="clsid:22D6F312-B0F6-11D0-94AB-0080C74C7E95" id="MediaPlayer1" STANDBY="Loading Windows Media Player components..." TYPE="application/x-oleobject">                 <param name="AudioStream" value="-1">                 <param name="AutoSize" value="-1">                                  <param name="AutoStart" value="0">                                  <param name="AnimationAtStart" value="-1">                 <param name="AllowScan" value="-1">                 <param name="AllowChangeDisplaySize" value="-1">                 <param name="AutoRewind" value="0">                 <param name="Balance" value="0">                                  <param name="BaseURL" value>                 <param name="BufferingTime" value="15">                                  <param name="CaptioningID" value>                 <param name="ClickToPlay" value="-1">                 <param name="CursorType" value="0">                 <param name="CurrentPosition" value="0">                                  <param name="CurrentMarker" value="0">                 <param name="DefaultFrame" value>                 <param name="DisplayBackColor" value="0">                 <param name="DisplayForeColor" value="16777215">                 <param name="DisplayMode" value="0">                 <param name="DisplaySize" value="0">                                  <param name="Enabled" value="-1">                 <param name="EnableContextMenu" value="-1">                 <!-是否用右键弹出菜单控制-->                 <param name="EnablePositionControls" value="-1">                 <param name="EnableFullScreenControls" value="-1">                 <param name="EnableTracker" value="-1">                                  <param name="Filename" value="" valuetype="ref">                 <param name="InvokeURLs" value="-1">                 <param name="Language" value="-1">                 <param name="Mute" value="0">                                  <param name="PlayCount" value="10">                                  <param name="PreviewMode" value="-1">                 <param name="Rate" value="1">                                  <param name="SAMILang" value>                 <param name="SAMIStyle" value>                 <param name="SAMIFileName" value>                                  <param name="SelectionStart" value="-1">                 <param name="SelectionEnd" value="-1">                 <param name="SendOpenStateChangeEvents" value="-1">                 <param name="SendWarningEvents" value="-1">                 <param name="SendErrorEvents" value="-1">                 <param name="SendKeyboardEvents" value="0">                 <param name="SendMouseClickEvents" value="0">                 <param name="SendMouseMoveEvents" value="0">                 <param name="SendPlayStateChangeEvents" value="-1">                 <param name="ShowCaptioning" value="0">                                  <param name="ShowControls" value="-1">                                  <param name="ShowAudioControls" value="-1">                                  <param name="ShowDisplay" value="0">                                  <param name="ShowGotoBar" value="0">                                  <param name="ShowPositionControls" value="-1">                                  <param name="ShowStatusBar" value="-1">                                  <param name="ShowTracker" value="-1">                                  <param name="TransparentAtStart" value="-1">                 <param name="VideoBorderWidth" value="0">                                  <param name="VideoBorderColor" value="0">                                  <param name="VideoBorder3D" value="0">                 <param name="Volume" value="0">                                  <param name="WindowlessVideo" value="0">                              </object>                               Play List:             <select id=playList size=2 ondragover="playList_dragOver();" ondragenter="playList_dragEnter();"              ondrop="playList_drop();" onkeydown="playList_keyDown();" ondblclick="playList_dblClick();">             </select>                <body> </html>

[Ctrl+A 全选注:引入外部Js需再刷新一下页面才能执行]

MyHTML,Player,release,v1.1

标签：

MyHTML,Player,release,v1.1

圆月山庄资源网 Design By www.vgjia.com

广告合作：本站广告合作请联系QQ：858582 申请时备注：广告合作（否则不回）
免责声明：本站文章均来自网站采集或用户投稿，网站不提供任何软件下载或自行开发的软件！如有用户或公司发现本站内容信息存在侵权行为，请邮件告知！ 858582#qq.com

圆月山庄资源网 Design By www.vgjia.com

评论“MyHTML Player release v1.1”

暂无评论...

www.vgjia.com 圆月山庄资源网

139,976互联网资源

144,792高清电影

21,817无损音乐

631,128技术资源

MyHTML Player release v1.1

MyHTML,Player,release,v1.1

鼠标放上去超链接的文字逐个加色效果

HTML Component(HTC) 小应用

评论“MyHTML Player release v1.1”

更新日志

友情链接