i used this code but the same problem
Option Explicit
Private x As String ' the exe name
Private y As String ' The file you want to open
Private Sub Form_Load()
x = App.Path & "\SAFlashPlayer.exe"
y = App.Path & "\a1.swf"
Shell x & " " & y, vbNormalFocus
Back to work again
Hi zor first sank you but I am beginner so I do not understand your replay
Hi JeffTullin
I used
[autorun]
Open=SAFlashPlayer.exe a1.swf
But the player opened only
I observed that when I burn all files in folder
By double click on start.exe it work perfect but when burn...
Hi all
I used a vb 6 code to open swf (flash file) by its player (SAFlashPlayer.exe)
So I saved vb project to exe file
I executed the exe file (start.exe) and work perfect on HD
This is the code
----------------------------------
Option Explicit
Private Declare Function ShellExecute Lib...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.