| Вопрос: MP3 | Добавлено: 09.02.07 19:00 |
Автор вопроса:  Black Berill
|
|
Доброго вам времени суток, уважаемые.
Кто-нибудь знает, как программно редактировать теги MP3? Любым советам буду благодарен...Спасибо |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа:  Alexandr.R Вопросов: 9 Ответов: 115 |
Web-сайт: Профиль | | #1 | Добавлено: 09.02.07 19:14 |
| google.com > vb.net mp3 tag editor | ||
|
Номер ответа: 2 Автор ответа: BarsikРазработчик Offline Client ICQ: 343368641 Вопросов: 17 Ответов: 686 |
Web-сайт: Профиль | | #2 | Добавлено: 10.02.07 01:19 |
| юзаем поиск. исходников оч много. да и на сайте тоже наверно такой найдется! | ||
|
Номер ответа: 3 Автор ответа: dNWВопросов: 30 Ответов: 683 |
Профиль | | #3 | Добавлено: 10.02.07 08:37 |
|
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 'Замените ярлык 'c:\MySong.mp3' любым вашим файлом. 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 Соответственно если поменять Get на Put - то будет то, что надо!!! |
||
|
Номер ответа: 4 Автор ответа: FeverВопросов: 60 Ответов: 808 |
Профиль | | #4 | Добавлено: 10.02.07 21:06 |
| Сожалею. Не будет. (запоганил Muse - Map Of The Problematique - придется опять с диска копировать) | ||
|
Номер ответа: 5 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #5 | Добавлено: 11.02.07 14:37 |
| это для IdTag v1, для более новее один я хрен знает сколько постил, примеров в инете море - в поиск. | ||
|
Номер ответа: 6 Автор ответа: Black BerillВопросов: 17 Ответов: 151 |
Профиль | | #6 | Добавлено: 11.02.07 19:00 |
|
dNW, спасибо.
Остальным тоже. ЗЫ: Просто ленив я не в меру... |
||
|
Номер ответа: 7 Автор ответа: dNWВопросов: 30 Ответов: 683 |
Профиль | | #7 | Добавлено: 11.02.07 19:04 |
| Да незачто | ||
Страница: 1 |