VBNet - Форум - Как прочитать mp3 ?

Вопрос: Как прочитать mp3 ? Добавлено: 22.07.03 13:00

Автор вопроса: Morpheus | Web-сайт: xury.zx6.ru

Как прочитать mp3? У меня тут "возникли подазрения", что mp3 это файл далеко не бинарный. Чё то у меня не хватило ума чтобы считать его с ReadFile и lRead. Может я его Handle неправильно определил? С этими хендлами у файлов вообще повешаться можно. Может кто поможет?

Ответить

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

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

Morpheus

Вопросов: 224
Ответов: 3777

Web-сайт: xury.zx6.ru
Профиль | | #1

Добавлено: 24.07.03 06:42

Блин! Ну вы хоть скажите, это вообще возможно, а ?

Ответить

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

USA

Вопросов: 1
Ответов: 184

Профиль | | #2

Добавлено: 24.07.03 08:45

Если не ошибаюсь, это RIFF файл. RIFF это всего лищь контейнер для различных двоичных данных. Так устроены WAV, AVI, какие-то еще. Ну а текст после слова "Чё" я не понял.

Ответить

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

Nio

Вопросов: 15
Ответов: 115

Web-сайт: www.fea.nxt.ru
Профиль | | #3

Добавлено: 24.07.03 10:00

Если тебе нужны ID Теги, то вот так:

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

Ответить

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

Morpheus

Вопросов: 224
Ответов: 3777

Web-сайт: xury.zx6.ru
Профиль | | #4

Добавлено: 25.07.03 05:46

А не знаешь как эти теги изменить?

Ответить

Страница: 1 |