Declined reproduced rights correction <% Dim MP3ID3Msg 'established class object Set MP3ID3Msg = New clsMP3ID3MsgMP3ID3Msg.File = "years .mp3" Call MP3ID3Msg.GetID3MsgResponse.write "TAG Type:" & MP3ID3Msg.ID3Type & "
" Response.write "
" if mp3id3msg.id3type = "ID3V1" Then Response.write "title:" & mp3id3msg.title & "
" Response.write "artist:" & mp3id3msg.Artist & "
"Response.write" alternative: "& mp3id3msg.album &"
"Response.write" produced by: "& mp3id3msg.issueyear &"
"response.write" Note: "& Mp3id3msg.com" < BR> "response.write" type: "& mp3id3msg.genre &"
"Elseif MP3id3msg.id3type =" ID3V2 "Ten Response.write" Title: "& MP3id3msg.title &"
"Response.write" Artist: "& mp3id3msg.Artist &"
"Response.write" collected: "& mp3id3msg.album &"
"Response.write" produced by "& mp3id3msg.issueyear &"
"response. WRITE "流派:" & mp3id3msg.tcon & "
" Response.write "Tile Number:" & MP3id3msg.track & "
" Response.write "Time:" & MP3id3msg.mptime & "
"Response.write" copyright: "& mp3id3msg.copyright &"
"Response.write" lyrics: "& report 3ID3MSG.USLT, VBCRLF, "
") & "
" response.write "Note:" & mp3id3msg.comment & "
" end ifset mp3id3msg = Nothing%>
