Ver Mensaje Individual
  #6 (permalink)  
Antiguo 30/05/2005, 12:32
PHP Novatillo
 
Fecha de Ingreso: enero-2005
Mensajes: 92
Antigüedad: 20 años, 5 meses
Puntos: 0
Entonces los avis se reproducen igual que los midis con el componente multimedia? o_O

Yo tengo éste código, me pueden decir cual es el error o como se reproduce?

Código:
Option Explicit
Dim ruta As String

Private Sub Form_Activate()
     ' Set the file name.
    MMControl1.FileName = ruta

     ' Open the MCI device.
    MMControl1.Wait = True
    MMControl1.Command = "Open"

    ' Play the sound without waiting.
    MMControl1.Command = "Play"
End Sub

Private Sub Form_Load()
 Dim MidPath As String
 MidPath = App.Path
 If Right(MidPath, 1) <> "\" Then MidPath = MidPath & "\"
 ruta = MidPath & "Inicio.AVI"
 
    ' Prepare the MCI control for WaveAudio.
    MMControl1.Notify = False
    MMControl1.Wait = True
    MMControl1.Shareable = False
    MMControl1.DeviceType = "AviVideo"
End Sub
Entonces si pues seria de gran ayuda que me echaran la mano, de antemano

GRacias