alexishf

Tengo este codigo Imports System.IO 'Imports System.Collections 'Imports System.Collections.Generic Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Dim arrFiles As ArrayList = New ArrayList() Dim dirpath As String = "C:\Users\Alexis\Documents\Visual Studio 2010\Projects\Prueba_Alexis\Prueba_Alexis\SWF\" 'Recuperar todos los archivos en el directorio Dim strFiles() As String = Directory.GetFiles(dirpath) 'Añadir todos los archivos al ArrayList For Each name As String In strFiles 'arrFiles.Add(name) AxShockwaveFlash1.Movie = (name) 'MsgBox(name) Next End Sub End Class mientras recorro "strFiles" debería reproducir cada animación .swf que se encuentra en la ruta. pero solo reproduce la ultima hice una prueba poniendo un MsgBox(name) y me manda un mensaje para cada archivo encontrado como lo puedo hacer para que se reproduzcan todas las animaciones ???

Gracias por responder! lo necesito en Visual Basic Saludos!!

En un directorio tengo lo siguiente movie1.swf movie2.swf movie3.swf ... ... movieN.swf lo que necesito es que estos archivos de flash se reproduzcan a pantalla completa uno despues de otro sin que tenga que presionar ningun boton. En este directorio pueden haber N archivos (y pueden tener distintos nombres, pero siempre con la extensión .swf). Espero que alguien me ayude. Gracias.