仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 976|回复: 9
打印 上一主题 下一主题

[学习教程] ASP编程:asp编程实例:用ASP完成对MP3曲目信息的...

[复制链接]
分手快乐 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:46:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。编程先复杂说一下MP3的ID3标志,由于次要是操纵这个玩意
MP3最入手下手的时分没有我们明天看到的那样,有歌手、年月,专集等等信息
只要一些复杂的参数如yes/no来暗示是否是privated大概copyrighted等信息,如许对MP3的相干事情带来了良多方便,1996年的时分有个老外提出来在每一个MP3前面追加一段数据,用以寄存上述的那些信息,厥后就开展成为id3v1据我所知的如今已到1.1了,详细的仍是本人往查一下吧
仍是老习气,用metadata来引进DLL,我之前有文章贴过的,不晓得的请本人往查
看代码
<!--METADATATYPE="typelib"
UUID="00000205-0000-0010-8000-00AA006D2EA4"
NAME="ADODBTypeLibrary"
-->
<%
FunctionConvertBin(Binary)
ThisfunctionconvertsabinarybyteintoanASCIIbyte.
fori=1toLenB(Binary)
strChar=chr(AscB(MidB(Binary,i,1)))
ConvertBin=ConvertBin&strChar
Next
EndFunction
dimobjStream
dimstrTag,strSongName,strArtist,strAlbum,strYear,_
strComment,strGenre,strFile
Specifythefoldertoiteratethrough,displayingalltheMP3s
Constfolder="C:mp3s"
Grabthefolderinformation
DimobjFSO,objFolder,objFile
SetobjFSO=Server.CreateObject("Scripting.FileSYstemObject")
SetobjFolder=objFSO.GetFolder(folder)
CreatetheStreamobject
setobjStream=Server.CreateObject("ADODB.Stream")
objStream.Type=adTypeBinary
Loopthroughthefilesinthefolder
ForEachobjFileinobjFolder.Files
Openthestream
objStream.Open
objStream.LoadFromFileobjFile.Path
Readthelast128bytes
objStream.Position=objStream.size-128
ReadtheID3v1taginfo
strTag=ConvertBin(objStream.Read(3))
ifucase(strTag)="TAG"then
strSongName=ConvertBin(objStream.Read(30))
strArtist=ConvertBin(objStream.Read(30))
strAlbum=ConvertBin(objStream.Read(30))
strYear=ConvertBin(objStream.Read(4))
strComment=ConvertBin(objStream.Read(30))
endif
Displaytheresults
response.write"<table><tr><tdcolspan=2><h3>"&_
"ID3Taginfofor:</td></tr><tr>"&_
"<tdcolspan=2>"&objFile.Name&"</td></tr>"
response.write"<tr><td><b>Artist:</b></td>"&_
"<td>"&strArtist&"</td></tr>"
response.write"<tr><td><b>Track:</b></td>"&_
"<td>"&strSongName&"</td></tr>"
response.write"<tr><td><b>Album:</b></td>"&_
<td>"&strAlbum&"</td></tr>"
response.write"<tr><td><b>Year:</b></td>"&_
"<td>"&strYear&"</td></tr>"
response.write"<tr><td><b>Comment:</b>"&_
"</td><td>"&strComment&"</td></tr>"
response.write"</table>"
objStream.Close
Response.Write"<p><hr><p>"
Next
SetobjStream=NothingCleanup...
%>
本人尝尝吧
但愿能对你有所匡助
ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用
因胸联盟 该用户已被删除
沙发
发表于 2015-1-17 22:52:07 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
分手快乐 该用户已被删除
板凳
 楼主| 发表于 2015-1-21 09:49:11 | 只看该作者
虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。
金色的骷髅 该用户已被删除
地板
发表于 2015-1-30 14:08:30 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
山那边是海 该用户已被删除
5#
发表于 2015-2-6 13:09:46 | 只看该作者
在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。
冷月葬花魂 该用户已被删除
6#
发表于 2015-2-16 05:40:11 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
简单生活 该用户已被删除
7#
发表于 2015-3-5 00:07:32 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
乐观 该用户已被删除
8#
发表于 2015-3-11 21:44:53 | 只看该作者
那么,ASP.Net有哪些改进呢?
深爱那片海 该用户已被删除
9#
发表于 2015-3-19 14:35:32 | 只看该作者
封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
透明 该用户已被删除
10#
发表于 2015-3-28 12:41:35 | 只看该作者
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-22 19:24

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表