Считывание тегов ID3V2 в mp3 файлах

@&reyka · Регистрация: 14.07.2010

Студворк — интернет-сервис помощи студентам

откуда начинать считывать теги id3v2 в мр3 файлах.
если можно пример кода
сижу уже неделю не могу понять где их байты находятся,
как их от туда достать

@Alexey · 15.07.2010, 11:47

'открываешь файл MP3

Open MP3FileName For Binary As Mp3FileNumber
Mp3FileContent = String$(LOF(Mp3FileNumber), '!')
Get Mp3FileNumber, , Mp3FileContent
Close Mp3FileNumber

'И ищешь этот ID3V2
ID3Position = InStr(Mp3FileContent, 'ID3')
If ID3Position = 0 Then
' не нашел!
End If

куча примеров на этот счет, вот, например, быстренько нашел код http://www.activevb.de/tipps/vb6tipps/tipp0408.html - скопируй себе - все будет работать

@&reyka · 15.07.2010, 11:52 **[ТС]**

Спасибо ограмное!!!!!! Das ist fantastich.
Самое гланое код есть!

15.07.2010, 18:20

http://www.vbnet.ru/sample/sampledownload.asp?id=105

Новые блоги и статьи Все статьи Все блоги /
Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .

@&reyka -10 / 0 / 0 Регистрация: 14.07.2010 Сообщений: 82

	Считывание тегов ID3V2 в mp3 файлах 15.07.2010, 11:37. Показов 2770. Ответов 3 Метки нет (Все метки) откуда начинать считывать теги id3v2 в мр3 файлах. если можно пример кода сижу уже неделю не могу понять где их байты находятся, как их от туда достать 0

@Alexey 0 / 1 / 3 Регистрация: 27.03.2012
	15.07.2010, 11:47
	'открываешь файл MP3 Open MP3FileName For Binary As Mp3FileNumber Mp3FileContent = String$(LOF(Mp3FileNumber), '!') Get Mp3FileNumber, , Mp3FileContent Close Mp3FileNumber 'И ищешь этот ID3V2 ID3Position = InStr(Mp3FileContent, 'ID3') If ID3Position = 0 Then ' не нашел! End If куча примеров на этот счет, вот, например, быстренько нашел код http://www.activevb.de/tipps/vb6tipps/tipp0408.html - скопируй себе - все будет работать 0

@&reyka -10 / 0 / 0 Регистрация: 14.07.2010 Сообщений: 82
	15.07.2010, 11:52 [ТС]
	Спасибо ограмное!!!!!! Das ist fantastich. Самое гланое код есть! 0

Comanche
	15.07.2010, 18:20
	http://www.vbnet.ru/sample/sampledownload.asp?id=105