從MP3中提取歌曲信息
讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：申請域名、網(wǎng)站空間、營銷軟件、網(wǎng)站建設(shè)、峰峰礦網(wǎng)站維護、網(wǎng)站推廣。
一首MP3歌曲除了音樂信息外，還包含了如歌名、演唱者等信息，當我們用winamp軟件聽音樂時，播放清單就自動將這些信息讀出來。大部分人都喜歡從網(wǎng)上下載音樂，但下載下來的MP3文件名都是文件上傳系統(tǒng)自動取名的，和歌曲本身根本不相符，所以，給用戶帶來了很大的麻煩。但是，懶人有懶人的做法，我們何不自己寫一個程序，將歌曲信息自動讀出來并為MP3文件自動更名呢？
下面以C#為工具，把開發(fā)過程寫出來。
一首MP3的額外信息存放在文件的最后面，共占128個字節(jié)，其中包括以下的內(nèi)容（我們定義一個結(jié)構(gòu)說明）：
public struct Mp3Info
{
public string identify;//TAG，三個字節(jié)
public string Title;//歌曲名,30個字節(jié)
public string Artist;//歌手名,30個字節(jié)
public string Album;//所屬唱片,30個字節(jié)
public string Year;//年,4個字符
public string Comment;//注釋,28個字節(jié)
public char reserved1;//保留位，一個字節(jié)
public char reserved2;//保留位，一個字節(jié)
public char reserved3;//保留位，一個字節(jié)
}
所以，我們只要把MP3文件的最后128個字節(jié)分段讀出來并保存到該結(jié)構(gòu)里就可以了。函數(shù)定義如下：
///
/// 獲取MP3文件最后128個字節(jié)
///
/// 文件名
/// 返回字節(jié)數(shù)組
private byte[] getLast128(string FileName)
{
FileStream fs = new FileStream(FileName,FileMode.Open,FileAccess.Read);
Stream stream = fs;
stream.Seek(-128,SeekOrigin.End);
const int seekPos = 128;
int rl = 0;
byte[] Info = new byte[seekPos];
rl = stream.Read(Info,0,seekPos);
fs.Close();
stream.Close();
return Info;
}
再對上面返回的字節(jié)數(shù)組分段取出，并保存到Mp3Info結(jié)構(gòu)中返回。
///
/// 獲取MP3歌曲的相關(guān)信息
///
/// 從MP3文件中截取的二進制信息
/// 返回一個Mp3Info結(jié)構(gòu)
private Mp3Info getMp3Info(byte[] Info)
{
Mp3Info mp3Info = new Mp3Info();
string str = null;
int i;
int position = 0;//循環(huán)的起始值
int currentIndex = 0;//Info的當前索引值
//獲取TAG標識
for(i = currentIndex;i
{
str = str+(char)Info[i];
position++;
}
currentIndex = position;
mp3Info.identify = str;
//獲取歌名
str = null;
byte[] bytTitle = new byte[30];//將歌名部分讀到一個單獨的數(shù)組中
int j = 0;
for(i = currentIndex;i
{
bytTitle[j] = Info[i];
position++;
j++;
}
currentIndex = position;
mp3Info.Title = this.byteToString(bytTitle);
//獲取歌手名
str = null;
j = 0;
byte[] bytArtist = new byte[30];//將歌手名部分讀到一個單獨的數(shù)組中
for(i = currentIndex;i
{
bytArtist[j] = Info[i];
position++;
j++;
}
currentIndex = position;
mp3Info.Artist = this.byteToString(bytArtist);
//獲取唱片名
str = null;
j = 0;
byte[] bytAlbum = new byte[30];//將唱片名部分讀到一個單獨的數(shù)組中
for(i = currentIndex;i
{
bytAlbum[j] = Info[i];
position++;
j++;
}
currentIndex = position;
mp3Info.Album = this.byteToString(bytAlbum);
//獲取年
str = null;
j = 0;
byte[] bytYear = new byte[4];//將年部分讀到一個單獨的數(shù)組中
for(i = currentIndex;i
{
bytYear[j] = Info[i];
position++;
j++;
}
currentIndex = position;
mp3Info.Year = this.byteToString(bytYear);
//獲取注釋
str = null;
j = 0;
byte[] bytComment = new byte[28];//將注釋部分讀到一個單獨的數(shù)組中
for(i = currentIndex;i
{
bytComment[j] = Info[i];
position++;
j++;
}
currentIndex = position;
mp3Info.Comment = this.byteToString(bytComment);
//以下獲取保留位
mp3Info.reserved1 = (char)Info[++position];
mp3Info.reserved2 = (char)Info[++position];
mp3Info.reserved3 = (char)Info[++position];
return mp3Info;
}
上面程序用到下面的方法：
///
/// 將字節(jié)數(shù)組轉(zhuǎn)換成字符串
///
/// 字節(jié)數(shù)組
/// 返回轉(zhuǎn)換后的字符串
private string byteToString(byte[] b)
{
Encoding enc = Encoding.GetEncoding("GB2312");
string str = enc.GetString(b);
str = str.Substring(0,str.IndexOf('\0') = 0 ? str.IndexOf('\0') : str.Length);//去掉無用字符
return str;
}
改名怎么辦呢？我們按（演唱者）歌名 的格式對歌曲進行改名，程序如下：
///
/// 更改文件名
///
/// 文件名
///
private bool ReName(string filePath)
{
if(File.Exists(filePath))
{
Mp3Info mp3Info = new Mp3Info();
mp3Info = this.getMp3Info(this.getLast128(filePath));//讀出文件信息
mp3Info.Artist = this.DeleteNotValue(mp3Info.Artist);
mp3Info.Title = this.DeleteNotValue(mp3Info.Title);
if(mp3Info.Artist.Trim().Length==0)
{
mp3Info.Artist="未命名";
}
if(mp3Info.Title.Trim().Length==0)
{
mp3Info.Title="未知名歌曲";
}
try
{
//更名
File.Move(filePath,filePath.Substring(0,filePath.ToLower().LastIndexOf("\\")).Trim() + "\\" + "(" + mp3Info.Artist.Trim() + ")" +mp3Info.Title.Trim() + ".mp3");
return true;
}
catch(Exception)
{
return false;
}
}
else
{
return false;
}
}
在.NET里，沒有托管的音樂播放器，用API只能播放WAV格式，對于MP3等形式的音頻文件，就要依賴于其他控件了，常用的就是
MediaPlayer。使用方法：
在工具箱上點右鍵，選擇“選擇項目(Choose Items)”，切到COM選項卡，找到 Windows Media Player， 勾選，確定
在t工具箱上，把剛才加入的MediaPlayer控件，拖放到窗體上
代碼：
WindowsMediaPlayer1.URL = "mp3文件路徑，支持網(wǎng)絡(luò)路徑"
WindowsMediaPlayer1.Ctlcontrols.play
基本就OK了，至于其他的操作諸如下一曲上一曲暫停停止，直接看 WindowsMediaPlayer1.Ctlcontrols. 里面的方法吧。
Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?Handles?Button1.Click
For?Each?FileName?As?String?In?IO.Directory.GetFiles("E:\音樂",?"*.mp3")
TextBox1.Text?=?vbNewLine??IO.Path.GetFileName(FileName)
Next
End?Sub
工具欄里選擇"添加,刪除組件"
選擇com組件
選擇"Windows Media Player "
然后在界面上加入這個組件
代碼
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles Button1.Click
Const DATA_FILE_EXTENSION As String = ".mp3"
Dim dlgFileDialog As New OpenFileDialog
With dlgFileDialog
.Filter = DATA_FILE_EXTENSION _
" files (*" DATA_FILE_EXTENSION "|*" DATA_FILE_EXTENSION
.FilterIndex = 1
.RestoreDirectory = True
If .ShowDialog() = DialogResult.OK Then
'Play the sound file
Me.AxWindowsMediaPlayer1.URL = dlgFileDialog.FileName
End If
End With
End Sub
參考資料中可以看到很詳細的步驟
重慶分公司
重慶分公司
