mciSendString для знающих

[-=alp=-]

в команде open или play у функции mciSendString
в пути файла не должно быть пробелов
вопрос: как это обойти?

[GSerg]

strCommand="open ""path with spaces"""

[-=alp=-]

что-то не работает
mciSendString "play ""D:\MUSIC\Panjabi MC\Eminem vs Panjabi MC - Kiss 100.mp3""", 0, 0, 0

[GSerg]

Стрянно...
Не так давно такая же тема была, там сработало...

[-=alp=-]

не никакой ошибки не выдаёт это уже хорошо
но и не работает

[-=alp=-]

если пере иминовать файл Eminem vs Panjabi MC - Kiss 100.mp3
то работает

ПОМОГИТЕ

[-=alp=-]

не знаю может такое прокатывает в 9Х виндах, но в ХР это не работает

ПОМОГИТЕ ПОМОГИТЕ ПОМОГИТЕ

[MEMBER]

ПОМОГАЮ! ПОМОГАЮ! ПОМОГАЮ!

Код: Выделить всё

Public Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" _
                                         (ByVal lpszLongPath As String, _
                                           ByVal lpszShortPath As String, _
                                           ByVal lBuffer As Long) As Long
'-----------------------------------------------------------------
Public Function GetShortPath(strFileName As String) As String
    Dim strPath As String
    strPath = Space(265)
    GetShortPath = Left(strPath, GetShortPathName(strFileName, strPath, 264))
End Function


В качестве аргумента "strFileName As String" в функцию передаётся путь до файла, с пробелами и прочим.

[-=alp=-]

Спасибо теперь работает.
Но остается один вопрос.
Ответьте на него, и я больше не буду приставать к вам с этой темой.
Как припомощи API mciSendString громкость файла менять?