VBNet - Форум - Как проиграть mp3 файл?

Вопрос: Как проиграть mp3 файл? Добавлено: 09.04.03 19:00

Автор вопроса: Костик | Web-сайт: myprogi.narod.ru

Как проиграть mp3 файл без всяких там контролов Windows Media Player'а?
Ответить

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

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

Danger2002

Вопросов: 10
Ответов: 109

Профиль | | #1

Добавлено: 09.04.03 21:27

Попробуй через Shell("c:\filename.mp3",vbnormal) в Win2000 катит.

Ответить

Номер ответа: 2 Автор ответа: Костик Вопросов: 19 Ответов: 32	Web-сайт: myprogi.narod.ru Профиль \| \| #2	Добавлено: 09.04.03 21:48
	Мне надо проиграть файл в своей программе, не открывая этот файл с помощью WinAmp'а или ему подобных проигрывателей Ответить

Номер ответа: 3 Автор ответа: Millenium ICQ: 629966 Вопросов: 118 Ответов: 903	Web-сайт: www.aliyev.us Профиль \| \| #3	Добавлено: 10.04.03 01:41
	poprobuy lameencode.dll - Bли www.lameencode.org - иши в гугле! Ответить

Номер ответа: 4 Автор ответа: Gravity Вопросов: 6 Ответов: 120	Профиль \| \| #4	Добавлено: 10.04.03 03:13
	Можно найти OCX для проигрывания MP3 их вроде много в инете ... просто пиши в rambler: "MP3+OCX" Ответить

Номер ответа: 5 Автор ответа: Danger2002 Вопросов: 10 Ответов: 109	Профиль \| \| #5	Добавлено: 10.04.03 18:55
	Я какие осх-ы не находил-все были некорректными Ответить

Номер ответа: 6 Автор ответа: Костик Вопросов: 19 Ответов: 32	Web-сайт: myprogi.narod.ru Профиль \| \| #6	Добавлено: 10.04.03 21:27
	Попробовал MCI.OCX. Он может проигрывать wav, midi, но mp3 не берёт. Может у кого есть проверенный OCX для mp3? Если есть, то может пришлёте? Или всё-таки кто-нибудь знает как проиграть mp3, ведь эти OCX'ы как-то делаются? Ответить

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

!DEN!

ICQ: 276572424

Вопросов: 7
Ответов: 33

Профиль | | #7

Добавлено: 10.04.03 23:15

Костик - На попробуй!

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long ' В одну строку пиши

Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long ' И эту тоже в одну

А здесь пиши путь к mp3!

Private Sub Form_Load()
Call mciExecute("play d:\der\sound\rod.mp3")
End Sub

Вот и всё!! Удачи

Ответить

Страница: 1 |