分手快乐 发表于 2015-1-16 22:46:19

ASP编程:asp编程实例:用ASP完成对MP3曲目信息的...

缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。编程先复杂说一下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

不能只是将它停留在纸上谈兵的程度上。

山那边是海 发表于 2015-2-6 13:09:46

在平时的学习过程中要注意现学现用,注重运用,在掌握了一定的基础知识后,我们可以尝试做一些网页,也许在开始的时候我们可能会遇到很多问题,比如说如何很好的构建基本框架。

冷月葬花魂 发表于 2015-2-16 05:40:11

封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。

简单生活 发表于 2015-3-5 00:07:32

以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

乐观 发表于 2015-3-11 21:44:53

那么,ASP.Net有哪些改进呢?

深爱那片海 发表于 2015-3-19 14:35:32

封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。

透明 发表于 2015-3-28 12:41:35

交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
页: [1]
查看完整版本: ASP编程:asp编程实例:用ASP完成对MP3曲目信息的...