Abrir archivo ShockwaveFlash desde cualquier computadora
publicado
Buenos dias, tardes o noches
El caso, como siempre, es que desde mi pc enruto el clip de flash desde la opcion "movie" que tiene la cinta de propiedades de la herramienta shockwaveflash y abre, es totalmente funcional.
El problema...
Quiero abrir el archivo que se encuentra alojado en una carpeta especifica de mi usb desde cualquier computadora.
ya intente con el siguiente codigo
Private Sub ShockwaveFlash1_OnReadyStateChange(ByVal newState As Long)
Dim Ruta As String
Ruta = App.Path & "CONTENIDOS\CLIPS\3.swf"
Me.ShockwaveFlash1 = LoadShockwaveFlash1(Ruta)
End Sub
[code]
pido el favor, de que si lo realice mal, me expliquen, o me ayuden a encontrar otro metodo que si funcione,
Buenos dias, tardes o noches
El caso, como siempre, es que desde mi pc enruto el clip de flash desde la opcion "movie" que tiene la cinta de propiedades de la herramienta shockwaveflash y abre, es totalmente funcional.
El problema...
Quiero abrir el archivo que se encuentra alojado en una carpeta especifica de mi usb desde cualquier computadora.
ya intente con el siguiente codigo
Private Sub ShockwaveFlash1_OnReadyStateChange(ByVal newState As Long)
Dim Ruta As String
Ruta = App.Path & "CONTENIDOS\CLIPS\3.swf"
Me.ShockwaveFlash1 = LoadShockwaveFlash1(Ruta)
End Sub
[code]
pido el favor, de que si lo realice mal, me expliquen, o me ayuden a encontrar otro metodo que si funcione,
muchas gracias.
ShockwaveFlash.rar