home *** CD-ROM | disk | FTP | other *** search
Wrap
// // Setup Installation File // Created by Setup Builder Version 3.07 // // Copyright 1993, 1994 G.Plowman // // Created: 03-12-1995 at 14:00:32 // // Application Variables SET %Caption%="Setup" SET %Application%="NetEdit 1.0" SET %InstallPath%="C:\NETEDIT" SET %InstallDrive%="C:" // Welcome Dialog :BACK SET %Message1%="Welcome to the %Application% Installation Program." SET %Message2%="This program will install the %Application% software in the directory you specify on your hard disk." DialogBox("Welcome") IF %ERROR% == IDCANCEL GOTO :EXIT // Ask the user where to install the software :RETRY SET %Message1%="The install program will copy the %Application% files into the following directory:" DialogBox("AskPath") IF %ERROR% == IDBACK GOTO :BACK IF %ERROR% == IDCANCEL GOTO :EXIT // Make sure we still have Disk #01 in the drive CheckExists("%CurrentDrive%DISK01", "Please insert the diskette labelled 'DISK01'") IF %ERROR% == IDCANCEL GOTO :EXIT // Copy files from disk & show in gauge - no usage or overwrite check CopyFile(2) "NETEDIT.EX_","%InstallPath%NETEDIT.EXE", "Copying:" "WEB.IN_","%InstallPath%WEB.INI", "Copying:" // Now setup a new program manager group and its icons MessageBox("Setup can create a Program Manager group|for the %Application% application.||Do you wish to create a Program|Manager group and icons ?", "%Caption%", MB_YESNO, MB_ICONQUESTION) IF %ERROR% == IDNO GOTO :NOPMGROUP MakeGroup("%Application%", "") MakeIcon("NetEdit 1.0", "%InstallPath%NETEDIT.EXE ") :NOPMGROUP // Done :SUCCESS SET %Message1%="|%Application% installation has been successfully completed." SET %Message2%="" DialogBox("OkBox") GOTO :END // User decided to quit :EXIT SET %Message1%="Installation has been terminated. You should rerun this installation program at a later time to install %Application%." SET %Message2%="|The %Application% software has not been installed." DialogBox("OkBox") GOTO :END // Error :ERROR SET %Message1%="An error occured during installation of the %Application% software." SET %Message2%="|The %Application% software has not been fully installed." DialogBox("OkBox") GOTO :END // Not enough disk space :NOSPACE SET %Message1% = "|There is not enough space on the selected drive to install the %Application% software." SET %Message2% = "" DialogBox("OkBox") GOTO :RETRY :END