here is my code
Option Explicit
'Set Dimension
DIM fso
'Set Object
Set fso = CreateObject("Scripting.FileSystemObject")
'Create Condition
If (fso.FileExists("CD,dvd:\CDcheck.exe")) Then
CreateObject("WScript.Shell").Run "program.exe"
Else
'Alert User
WScript.Echo("Please Insert program CD!")
End If
'Exit Script
WScript.Quit()
This post has been edited by BobRodes: 15 February 2013 - 02:48 PM
Reason for edit:: please use code tags in future

New Topic/Question
Reply



MultiQuote



|