Cita:
Iniciado por KingColt
Bien Avellaneda como siempre diste en el clavo, pero no entiendo el Chr(34) pero el codigo esta perfecto.
Cambie la ruta por
sPath = Chr(34) & App.Path + "\puk.wav" & Chr(34)
saludos
Hola, lo del Chr(34) antes y después del archivo es porque, tanto el comando Open como Play, requieren dos veces las comillas dobles.
También funcionaría así:
sPath = "C:\MiMusica\Archivo.wav"
lRet = mciSendString("OPEN """ & sPath & """", 0&, 0, 0)
lRet = mciSendString("PLAY """ & sPath & """ FROM 0", 0&, 0, 0)
Pero parece más complicado, ¿no?.
Saludos