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写得更有效率和更方便重用

虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家，只是从一个例子告诉你怎么用。不会深入讨论，更不会将没有出现在例子里的方法都一一列举出来。