Visual Basic para Aplicaciones - ayuda con command() y previnstance

Life is soft - evento anual de software empresarial
 
Vista:

ayuda con command() y previnstance

Publicado por White_Devil (2 intervenciones) el 19/06/2003 20:55:28
Hola, hice un programa de reproducir mp3, y le puse un codigo con el string "command" para que cuando haga click en un mp3 y eliga "abrir con.." y busque mi programa, el mp3 se toque en mi programa, entonces, tenia un problema que si elegia otro mp3 y hacia lo mismo, se abrian 2 ventanas de mi programa, asi que le puse un codigo con "app.previnstance" para que cuando se abra la nueva ventana automaticamente se cierre antes de aparecer..

pero bien, ahora tengo una pregunta, como hago que la ventana anterior cargue la cancion que la que se iba a abrir iba a sonar?? (no se si me entiendan)

lo que quiero es, que como hago para que si eligo una cancion, se cargue en una ventana, pero si eligo otro se cargue en la misma ventana??

por si acaso, aqui estan los codigos que usé:

'Esto es para que no me cargue la ventana nueva
If App.PrevInstance Then
SaveTitle$ = App.Title
App.Title = "... duplicate instance."
frmMain.Caption = "... duplicate instance."
AppActivate SaveTitle$
SendKeys "% R", True
Unload Me
End If

'Esto es para cargar el mp3
Dim MyCommand As String
MyCommand = Command()
MyCommand = strUnQuoteString(MyCommand)

If Len(MyCommand) > 0 Then
List1.Clear
List1.AddItem MyCommand
MediaPlayer1.filename = MyCommand
MediaPlayer1.Play
End If
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder