mciSendString函数路径设置问题?

Question

为什么我用mciSendString函数采取一下方法打开一定歌曲,第一中绝对路径可以打开,第二种怎么打不开,是不是什么参数没有设置好?还是这个函数存在相对和绝对路径问题?
        Dim musicPath As String
        musicPath = App.path & "\"
        'RetValue = mciSendString("OPEN " & "C:\" & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)         '可以打开
         RetValue = mciSendString("OPEN " & musicPath & "\test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)  '无法打开

Answer 1

 Dim musicPath As String 
        musicPath = App.path & "\" 
        'RetValue = mciSendString("OPEN " & "C:\" & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)        '可以打开 
        RetValue = mciSendString("OPEN " & musicPath & "\test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0) 
=================================================
路径写错了
dim musicPath as string
musicPath=app.Path & "\"'RetValue = mciSendString("OPEN " & "C:\" & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)        '可以打开 
        RetValue = mciSendString("OPEN " & musicPath & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0) 

Answer 2

musicPath =iif(right(App.path,1)="\",App.path,App.path & "\")

Answer 3

'在其他目录下,路径不含"\",如: c:\Music

Answer 4

我刚安如下方法试过了,还是不行,好象不是这个"\"问题,又谁可以帮我调试一下啊?
        Dim my As Long
        Dim musicPath As String * 2048
        musicPath = IIf(Right(App.path, 1) = "\", App.path, App.path & "\")
        Debug.Print musicPath
        '###################################打开音乐
        IsMusicOn = True
         mciSendString "OPEN " & musicPath & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic parent %u Style %u notify", "", 0, 0 '刚刚调试的是这一句        'RetValue = mciSendString("OPEN " & "C:\" & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)
        'RetValue = mciSendString("OPEN " & "C:\Program Files\BMP ONLINE CALL SYSTEM" & "\" & "test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)
        'RetValue = mciSendString("OPEN " & musicPath & "\test.rmi TYPE SEQUENCER ALIAS BackgroundMusic", "", 0, 0)        '############################################

Answer 5

LZ的媒体文件和工程文件啊在一起啊?C:\Program Files\BMP ONLINE CALL SYSTEM" & "\"    '这是媒体文件路径
你的工程文件呢？？？也和它放一起吗

Answer 6

是的,工程文件和媒体文件同一个路径下面!
BTY,如果你现在方便,可以在线聊吗?