.NET 4.x Ошибка открытия файла в плеере - Visual Basic .NET
Формулировка задачи:
Здравствуйте! Такая проблема - имею форму (музыкальный плеер), но при открытии файла, если путь состоит из русских букв, или при наличии пробелов, возникает ошибка и файл не проигрывается (Как пример: D:\Мои документы\Музыка\Тест.mp3)! Если название директории и самой музыки состоит из английских букв, и без пробелов - всё работает (Как пример: D:\Test\test.mp3). Код ниже:
Листинг программы
- Private Declare Function mciExecute Lib "winmm.dll" (ByVal lpstrCommand As String) As Long
- Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
- Dim name As String
- Dim name2 As String
- Dim time As String
- Dim a As String
- Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
- OpenFileDialog1.InitialDirectory = "D:"
- On Error Resume Next
- OpenFileDialog1.Title = "Open a Music File"
- OpenFileDialog1.Filter = "Music file (*.mp3)|*.mp3|All files (*.*)|*.*"
- OpenFileDialog1.ShowDialog()
- On Error Resume Next
- name = OpenFileDialog1.FileName
- On Error Resume Next
- End Sub
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- On Error Resume Next
- name2 = "play " & name
- Call mciExecute(name2)
- On Error Resume Next
- Timer2.Enabled = True
- Dim w As New WMPLib.WindowsMediaPlayer
- Dim m As WMPLib.IWMPMedia = w.newMedia(name)
- End sub
Решение задачи: «.NET 4.x Ошибка открытия файла в плеере»
textual
Листинг программы
- mciSendString("OPEN " & Chr(34) & name & Chr(34) & " TYPE MpegVideo ALIAS MP3", "", 0, 0)
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д