Programación General > Visual Basic 6.0 e inferiores

 Problemas Con Windows Media Player

(1/1)

Bluebird:
Estoy haciendo un programa que reproduce archivos mp3 que trabajan desde una base de datos access...cuando cargo mas de un tema solo me reproduce el primero...y si no presiono la tecla 0 (Cero) no me reproduce el siguiente...
Creo que el problema está en este código...lo sustitui por el que está comentado...porque queria que en una ventana me mostrara las visualizaciones del wmp...
Gracias por su ayuda...saludos a todos.

Pablo
--- Código: Text --- Private Sub Pasa_Tema() If Pasa_Pago = False Then    If List3.ListCount > 0 Then        Pasa_Pago = True        Mp3.Controls.Stop        Mp3.URL = "c:\mp3\" & List3.ItemData(0) & ".mp3"        Mp3.settings.volume = 250        'Mp1.Stop        'Mp1.Open "c:\mp3\" & List3.ItemData(0) & ".mp3"        'Mp1.Volume = -50        Graba_tema List3.ItemData(0)        List3.RemoveItem (0)    Else        Pasa_Pago = False        RandTema        End IfEnd If End SubPrivate Sub pasa_siguiente()Label8(0).Caption = ""Label8(1).Caption = ""       If List3.ListCount > 0 Then        Pasa_Pago = True        Mp3.Controls.playItem        Mp3.URL = "c:\mp3\" & List3.ItemData(0) & ".mp3"        Mp3.settings.volume = 250        'Mp1.Stop        'Mp1.Open "c:\mp3\" & List3.ItemData(0) & ".mp3"        'Mp1.Volume = -10        Graba_tema List3.ItemData(0)        List3.RemoveItem (0)    Else        Pasa_Pago = False        RandTema        End If End Sub  
Espero se entienda...

Navegación

[0] Índice de Mensajes