Function to run an executable

Bob Hansen · June 25th, 2004, 01:13 AM

I hate to ask with such a basic issue.....

...too many hours, gotta take a break.....

I would appreciate a sample function to run an executable program using VB code. I think it may look something like this, but this does not work. Just using WinZip as an example, but typical of any program that will accept switches/parameters.

Quote:

quote:Sub ZipCompress(ZipFile,FilesToZip)
'ZipFile = Path and filename for the zipped file
'FilesToZip = List of files to zip

dim strParameters as String

Parameters ="[-min] -a " + ZipFile + " " + FilesToZip

Execute "C:\Program Files\Winzip\WINZIP32.EXE" strParameters

End Sub

abdusalam · June 25th, 2004, 02:10 AM

This will not work friend...

Quote:

quote: Execute "C:\Program Files\Winzip\WINZIP32.EXE" strParameters

use simple because Simplicity is the best Beautiy :D

;)
Private Sub Command1_Click()
Shell "E:\Winnt\system32\RUNDLL32 SHELL32.DLL,Control_RunDLL NCPA.CPL,@0,2"End Sub

Hope it will help you alot...:D :)

Stay Beautiful,
Abdul Salam