VBNet - Форум - Как читать теги из *.mp3, *.wma?

Вопрос: Как читать теги из *.mp3, *.wma? Добавлено: 21.05.04 04:35

Автор вопроса: Pendalf | ICQ: 281656216

Плир подскажите пожалуйста как мона прочитать инфу "Исполнитель", "Альбом" и т.д. из файлов *.mp3 и *.wma?

Заранее спасибо!

Goga...

Ответить

Ответы Всего ответов: 4

Номер ответа: 1
Автор ответа:

Novichek

Вопросов: 19
Ответов: 60

Профиль | | #1

Добавлено: 21.05.04 07:53

из mp3 - так:

Private Sub Form_Load()

Dim fNum As Integer

Dim sTagIdent As String * 3

Dim sTitle As String * 30

Dim sArtist As String * 30

Dim sAlbum As String * 30

Dim sYear As String * 4

Dim sComment As String * 30

fNum = FreeFile

Open "c:\MySong.mp3" For Binary As fNum

Seek #fNum, LOF(fNum) - 127

Get #fNum, , sTagIdent

If sTagIdent = "TAG" Then

Get #fNum, , sTitle

Get #fNum, , sArtist

Get #fNum, , sAlbum

Get #fNum, , sYear

Get #fNum, , sComment

End If

Close #fNum

MsgBox sTitle & "," & sArtist & "," & sAlbum & "," & sYear & "," & sComment

End Sub

'---------------------------------

а из как из *.wma я не знаю

Ответить

Номер ответа: 2
Автор ответа:

LamerOnLine

ICQ: 334781088

Вопросов: 108
Ответов: 2822

Профиль | | #2

Добавлено: 21.05.04 09:17

Прокатит только для Tag1. Новые mp3 имеют и второй.

Ответить

Номер ответа: 3
Автор ответа:

sne

Разработчик Offline Client

ICQ: 233286456

Вопросов: 34
Ответов: 5445

Web-сайт: hw.t-k.ru
Профиль | | #3

Добавлено: 21.05.04 09:34

Есть и для вторых тегов на www.vbacselerator.com (не помню как пишется)

Ответить

Номер ответа: 4 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #4	Добавлено: 22.05.04 11:05
	http://www.vbaccelerator.com/home/VB/Code/vbMedia/Audio/Reading_and_Writing_MP3_ID3v1_and_v2_Tags/article.asp Ответить

Страница: 1 |