Пробелы в пути до файла

@Dim1One · Регистрация: 30.04.2011

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

Всем здарова! Вообщем, есть одна проблема в VB. NET:
Я воспроизвожу звук так:

VB.NET
1
2
3
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
...
Call mciExecute("play " & Application.StartupPath & "\Sounds\TrueAnswer.wav")

Все воспроизводится, НО(!), если в пути до звука будет пробел, то звук не воспроизводится. Как решить проблему?
Вообще, хотелось бы звук добавить в ресурсы проекта, но это вроде невозможно. Я добавлял музыку в ресурсы, потом пытался к этой музыке обратиться:

VB.NET
1
My.Resources.MyMuson.wav

но получаю ошибку о не существовании звука в ресурсах, хотя он там есть. Может кто знает, как добавить музыку в ресурсы проекта и обратиться к ней?

Памирыч · 30.04.2011, 15:25

Сообщение от Dim1One

Private Declare Function

О Боже!
Не, здесь все проще:

VB.NET
1
My.Computer.Audio.Play("C:\1.wav", AudioPlayMode.Background)

Из ресурсов:

VB.NET
1
2
3
Dim mp As New Media.SoundPlayer
        mp.Stream = My.Resources.ResourceManager.GetStream("_1")
        mp.Play()

@Dim1One · 30.04.2011, 16:03 **[ТС]**

Сообщение от Памирыч

О Боже!
Не, здесь все проще:
...

Я воспроизводил с помощью Айпи функции, потому что надо было проигрывать звук на звуке.
Попробовал по вашему совету воспроизвести музыку из ресурсов и не получается. Добавил .wav объект в ресурсы и пробовал так воспроизвести:

VB.NET
1
2
3
        Dim mp As New Media.SoundPlayer
        mp.Stream = My.Resources.ResourceManager.GetStream("TrueAnswer")
        mp.Play()

но звук не воспроизводится, при нажатии на кнопку просто пикает, а музыки нет. В чем может быть дело?
может можно как-нибудь по другому обратиться в звуку, лежащему в ресурсах?
Буду благодарен за помощь.

Памирыч · 30.04.2011, 16:56

Перепроверил. Работает.
Системный звук может прозвучать в случае, если такого ресурса нет, или ты не соблюдаешь регистр букв.
Внимательнее.
Или сделай немного по-другому, чтоб студия сама предложила имя ресурса:

VB.NET
1
2
3
        Dim mp As New Media.SoundPlayer
        mp.Stream = My.Resources.tada
        mp.Play()

@Dim1One · 30.04.2011, 18:31 **[ТС]**

Что-то ни как не получается. Если попробовать mp.Stream = My.Resources.звук, то в предложенных ресурсах звука нет, а картинки есть.
Может я звук неправильно в ресурсы добавляю. Я это делаю простым перетаскиванием звука в список ресурсов. Может надо по-другому?
Раз не получается звук из ресурсов воспроизвести, то может можно как-нибудь решить проблему с пробелами в пути до звука?

Памирыч · 30.04.2011, 18:41

VB.NET
1
My.Computer.Audio.Play("C:\1.wav", AudioPlayMode.Background)

Я уже писал.

Сообщение от Dim1One

Я это делаю простым перетаскиванием звука в список ресурсов

Правильно делаешь. Звук должен быть формата wav.
Может быть с именем то-то не то...
Залей проект, посмотрим.

@Dim1One · 30.04.2011, 19:28 **[ТС]**

Воспроизводить через My.Computer.Audio.Play мне не подойдет, т.к если вызвать этим же способом проигрывание другого звука, то проигрываемый останавливается.

Все, теперь звуки стали появлятся. НО только вариант воспроизведения:

VB.NET
1
2
3
 Dim mp As New Media.SoundPlayer
        mp.Stream = My.Resources.tada
        mp.Play()

мне не подойдет. Хотелось бы так:

VB.NET
1
2
3
Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
...
Call mciExecute("play " & Application.StartupPath & "\Sounds\TrueAnswer.wav")

Я попробовал вот так сделать:

VB.NET
1
Call mciExecute("play " & My.Resources.TrueAnswer)

Получаю ошибку: Operator '&' is not defined for types 'String'. Как можно исправить?

Памирыч · 30.04.2011, 19:32

Сообщение от Dim1One

то проигрываемый останавливается

А АПИ можнт асинхронно воспроизводить их?

@Dim1One · 30.04.2011, 19:36 **[ТС]**

Да, с помощью айпи функции я могу воспроизводить музыку на музыке.

Памирыч · 30.04.2011, 19:43

Тогда способ не подойдет.
Проблему с пробелами в путях попробуй решить, заключив имена файлов в кавычки.

Добавлено через 4 минуты

VB.NET
1
Call mciExecute("play " & """" & "f:\Documents and Settings\Юздверюга\Рабочий стол\tada.wav" & """")

@Dim1One · 01.05.2011, 11:48 **[ТС]**

Спасибо за помощь, но проблема с пробелами все равно не решилась.

Добавлено через 15 часов 54 минуты
Хотя заключение имени файла в кавычки что-то меняет. Если сделать так:

VB.NET
1
Call mciExecute("play  C:\Новая папка\TrueAnswer.wav")

То ошибка такая выскакивает:

если так написать:

VB.NET
1
Call mciExecute("play " & """" & "C:\Новая папка\TrueAnswer.wav" & """")

то ошибка такая:

Если пробела в пути нет, то этот звук проигрывается. Как решить проблему с этими пробелами?

Памирыч · 01.05.2011, 16:45

У меня такие же ошибки лезли, я думал, в коде чего то не хватало и удалил проект.

@Ciberst · 01.05.2011, 19:55

Пробуй изменить пробел на chr(32), например

До "Рабочий стол"
После "Рабочий" & chr(32) & "стол"

Ps студии пока поблизости нет, не могу проверить, в работоспособности не уверен, но вдруг)))

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@Dim1One 44 / 44 / 4 Регистрация: 30.04.2011 Сообщений: 283
	30.04.2011, 18:31 [ТС]
	Что-то ни как не получается. Если попробовать mp.Stream = My.Resources.звук, то в предложенных ресурсах звука нет, а картинки есть. Может я звук неправильно в ресурсы добавляю. Я это делаю простым перетаскиванием звука в список ресурсов. Может надо по-другому? Раз не получается звук из ресурсов воспроизвести, то может можно как-нибудь решить проблему с пробелами в пути до звука? 0

@Dim1One 44 / 44 / 4 Регистрация: 30.04.2011 Сообщений: 283
	30.04.2011, 19:36 [ТС]
	Да, с помощью айпи функции я могу воспроизводить музыку на музыке. 0

Памирыч Почетный модератор 23251 / 9163 / 1084 Регистрация: 11.04.2010 Сообщений: 11,014
	01.05.2011, 16:45
	У меня такие же ошибки лезли, я думал, в коде чего то не хватало и удалил проект. 0

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	01.05.2011, 19:55
	Пробуй изменить пробел на chr(32), например До "Рабочий стол" После "Рабочий" & chr(32) & "стол" Ps студии пока поблизости нет, не могу проверить, в работоспособности не уверен, но вдруг))) 0