Jump to content

New to GUI


Jonniemac315
 Share

Recommended Posts

I am trying to create a window that looks like this

Blah Blah Blah

Back Finish Cancel

Like when a file is done installing with install shield. I want it to replace the MsgBox at the begining and end of this script. Any help would be greatly appreciated. Thanks in advance.

Jon

MsgBox (262208, "Active Control", "This will update Active Control to the newest version.  Press OK to continue", 10)
    _FileCopy("\\10.0.0.2\Activecontrol\current\1.txt", "C:\program files\activecontrol\")
    _FileCopy("\\10.0.0.2\Activecontrol\current\ActiveControl.mdb", "C:\program files\activecontrol\")
    _FileCopy("\\10.0.0.2\Activecontrol\current\Control.ico", "C:\program files\activecontrol\")
    _FileCopy("\\10.0.0.2\Activecontrol\current\Security.mdw", "C:\program files\activecontrol\")
MsgBox (262208, "Completed", "The Newest Version of Active Control is loaded.  Please press OK.")
    
Func _FileCopy($fromFile,$tofile, $fc_flag=272)
    $winShell = ObjCreate("shell.application")
    $winShell.namespace($tofile).CopyHere($fromFile,$fc_flag)
EndFunc
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...