Страница: 1 |
Я использую в проге ниже приведёный код Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long звуковой файл у меня находится в папке /sound/music.rmi Как это можно записать в строке res = mciExecute("Play C:\Путь_до_файла")
Тебе нужно просканировать все твои диски на предмет наличия файла. Как это сделать ? Посмотри топик http://www.vbnet.ru/forum/show.asp?id=4230 Там только нужн поменять атрибуты с папки на файлы. А другого пути нет? А если нет ты не мог бы мне написать код как я должен это записать полностью. Заранее спасибо. Страница: 1 |
Вопрос: Новое сообщение без темы
Добавлено: 05.10.02 17:43
Автор вопроса: Synax | Web-сайт:
Private Sub Form_Click()
Dim res
res = mciExecute("Play C:\Путь_до_файла")
End Sub
если полный путь до файла я не знаю.
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #1
Добавлено: 05.10.02 20:34
Номер ответа: 2
Автор ответа:
Synax
Вопросов: 20
Ответов: 61
Web-сайт:
Профиль | | #2
Добавлено: 08.10.02 22:27