Database Search
If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.
TechHome
Reboot and Shutdown Topics
- Close all Windows and Shutdown
- Detect Windows Reboot Needed
- Disable End Session Ok to Terminate Message
- Exit Windows Come Back Same Place
- Its Now Safe to Turn Off Your Computer Message
- Moving Files during NT Shutdown-Logoff
- NT Shutdown and Restart
- Prevent Automatic Reboot after 20 Second Shutdown
- Restart Windows 95 in MS-DOS Mode
- Restarting Win95 without Warm Boot
- Restarting windows
- Run Script at Shutdown or Logoff
- Script to Shutdown Window after Backing up INI Files
- Shutdown Discussion
- Shutdown without Users Connected Message
- Terminating Windows Quietly
- Watch for Shutdown and Perform a Series of Things - 1
- Watch for Shutdown and Perform a Series of Things - 2
- Where to Put Logoff Scripts
Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Script to Shutdown Windows and Backup INI Files First
Keywords: shutdown
; Script to shutdown windows. This script will copy all the necessary ini files to the H: drive
; and will shut down windows. It will prompt the user to close all files before shutting down.
;bug(@ON)
sounds(0)
;Define Vars
drive = "H:"
;Define the dialog format
shdnFormat="WWWDLGED,5.0"
shdnCaption="Windows 95 Shutdown"
shdnx=110
shdny=100
shdnwidth=205
shdnheight=90
shdnnumcontrols=6
shdn01='15,15,170,DEFAULT,RADIOBUTTON,state,"&Shutdown the Computer?",1'
shdn02='15,27,170,DEFAULT,RADIOBUTTON,state,"&Restart the Computer?",2'
shdn03='15,39,170,DEFAULT,RADIOBUTTON,state,"&Close all programs and logon as a different user?",3'
shdn04='30,60,40,DEFAULT,PUSHBUTTON,Default,"&Yes",1'
shdn05='80,60,40,DEFAULT,PUSHBUTTON,Default,"&No",2'
shdn06='130,60,40,DEFAULT,PUSHBUTTON,Default,"&Help",3'
retval = 1
; list of files to be copied up to network (c:\windows to h:\windows)
; session.ini,msmail.ini,trs.ini,odbc.ini,shlt*.ini,msacc20.ini,winproj4.ini
; pww.ini;"c:\Program Files\faxsrcli\faxsrwin.ini";c:\exchange\mailbox.pab
While @TRUE
retval = Dialog("shdn")
switch retval
case 1
switch state
case 1
if DiskExist(drive)
ErrorMode(@OFF)
if FileExist ("h:\exchange\mailbox.pab") != 2
if FileExist ("c:\exchange\mailbox.pab") then FileCopy ("C:\EXCHANGE\MAILBOX.PAB", "H:\EXCHANGE\MAILBOX.PAB",@FALSE)
endif
if FileExist ("h:\windows\session.ini") != 2
if FileExist ("c:\windows\session.ini") then FileCopy ("C:\WINDOWS\SESSION.INI", "H:\WINDOWS\SESSION.INI",@FALSE)
endif
if FileExist ("h:\windows\msmail.ini") != 2
if FileExist ("c:\windows\msmail.ini") then FileCopy ("C:\WINDOWS\MSMAIL.INI", "H:\WINDOWS\MSMAIL.INI",@FALSE)
endif
if FileExist ("h:\windows\trs.ini") != 2
if FileExist ("c:\windows\trs.ini") then FileCopy ("C:\WINDOWS\TRS.INI", "H:\WINDOWS\TRS.INI",@FALSE)
endif
if FileExist ("h:\faxsrcli\faxsrwin.ini") != 2
if FileExist ("c:\Program Files\faxsrcli\faxsrwin.ini") then FileCopy ("C:\PROGRAM FILES\FAXSRCLI\FAXSRWIN.INI", "H:\FAXSRCLI\FAXSRWIN.INI",@FALSE)
endif
if FileExist ("h:\windows\odbc.ini") != 2
if FileExist ("c:\windows\odbc.ini") then FileCopy ("C:\WINDOWS\ODBC.INI", "H:\WINDOWS\ODBC.INI",@FALSE)
endif
if FileExist ("h:\windows\ers.ini") != 2
if FileExist ("c:\windows\ers.ini") then FileCopy ("C:\WINDOWS\ERS.INI", "H:\WINDOWS\ERS.INI",@FALSE)
endif
if FileExist ("h:\windows\shltrans.ini") != 2
if FileExist ("c:\windows\shltrans.ini") then FileCopy ("C:\WINDOWS\SHLT*.INI", "H:\WINDOWS\SHLT*.INI",@FALSE)
endif
if FileExist ("h:\windows\msacc20.ini") != 2
if FileExist ("c:\windows\msacc20.ini") then FileCopy ("C:\WINDOWS\MSACC20.INI", "H:\WINDOWS\MSACC20.INI",@FALSE)
endif
if FileExist ("h:\windows\winproj4.ini") != 2
if FileExist ("c:\windows\winproj4.ini") then FileCopy ("C:\WINDOWS\WINPROJ4.INI", "H:\WINDOWS\WINPROJ4.INI",@FALSE)
endif
if FileExist ("h:\windows\pww.ini") != 2
if FileExist ("c:\windows\pww.ini") then FileCopy ("C:\WINDOWS\PWW.INI", "H:\WINDOWS\PWW.INI",@FALSE)
endif
ErrorMode(@CANCEL)
endif
IntControl(68,0,0,0,0)
exit
case 2
if DiskExist(drive)
ErrorMode(@OFF)
if FileExist ("h:\exchange\mailbox.pab") != 2
if FileExist ("c:\exchange\mailbox.pab") then FileCopy ("C:\EXCHANGE\MAILBOX.PAB", "H:\EXCHANGE\MAILBOX.PAB",@FALSE)
endif
if FileExist ("h:\windows\session.ini") != 2
if FileExist ("c:\windows\session.ini") then FileCopy ("C:\WINDOWS\SESSION.INI", "H:\WINDOWS\SESSION.INI",@FALSE)
endif
if FileExist ("h:\windows\msmail.ini") != 2
if FileExist ("c:\windows\msmail.ini") then FileCopy ("C:\WINDOWS\MSMAIL.INI", "H:\WINDOWS\MSMAIL.INI",@FALSE)
endif
if FileExist ("h:\windows\trs.ini") != 2
if FileExist ("c:\windows\trs.ini") then FileCopy ("C:\WINDOWS\TRS.INI", "H:\WINDOWS\TRS.INI",@FALSE)
endif
if FileExist ("h:\faxsrcli\faxsrwin.ini") != 2
if FileExist ("c:\Program Files\faxsrcli\faxsrwin.ini") then FileCopy ("C:\PROGRAM FILES\FAXSRCLI\FAXSRWIN.INI", "H:\FAXSRCLI\FAXSRWIN.INI",@FALSE)
endif
if FileExist ("h:\windows\odbc.ini") != 2
if FileExist ("c:\windows\odbc.ini") then FileCopy ("C:\WINDOWS\ODBC.INI", "H:\WINDOWS\ODBC.INI",@FALSE)
endif
if FileExist ("h:\windows\ers.ini") != 2
if FileExist ("c:\windows\ers.ini") then FileCopy ("C:\WINDOWS\ERS.INI", "H:\WINDOWS\ERS.INI",@FALSE)
endif
if FileExist ("h:\windows\shltrans.ini") != 2
if FileExist ("c:\windows\shltrans.ini") then FileCopy ("C:\WINDOWS\SHLT*.INI", "H:\WINDOWS\SHLT*.INI",@FALSE)
endif
if FileExist ("h:\windows\msacc20.ini") != 2
if FileExist ("c:\windows\msacc20.ini") then FileCopy ("C:\WINDOWS\MSACC20.INI", "H:\WINDOWS\MSACC20.INI",@FALSE)
endif
if FileExist ("h:\windows\winproj4.ini") != 2
if FileExist ("c:\windows\winproj4.ini") then FileCopy ("C:\WINDOWS\WINPROJ4.INI", "H:\WINDOWS\WINPROJ4.INI",@FALSE)
endif
if FileExist ("h:\windows\pww.ini") != 2
if FileExist ("c:\windows\pww.ini") then FileCopy ("C:\WINDOWS\PWW.INI", "H:\WINDOWS\PWW.INI",@FALSE)
endif
ErrorMode(@CANCEL)
endif
IntControl(67,0,0,0,0)
exit
case 3
if DiskExist(drive)
ErrorMode(@OFF)
if FileExist ("h:\exchange\mailbox.pab") != 2
if FileExist ("c:\exchange\mailbox.pab") then FileCopy ("C:\EXCHANGE\MAILBOX.PAB", "H:\EXCHANGE\MAILBOX.PAB",@FALSE)
endif
if FileExist ("h:\windows\session.ini") != 2
if FileExist ("c:\windows\session.ini") then FileCopy ("C:\WINDOWS\SESSION.INI", "H:\WINDOWS\SESSION.INI",@FALSE)
endif
if FileExist ("h:\windows\msmail.ini") != 2
if FileExist ("c:\windows\msmail.ini") then FileCopy ("C:\WINDOWS\MSMAIL.INI", "H:\WINDOWS\MSMAIL.INI",@FALSE)
endif
if FileExist ("h:\windows\trs.ini") != 2
if FileExist ("c:\windows\trs.ini") then FileCopy ("C:\WINDOWS\TRS.INI", "H:\WINDOWS\TRS.INI",@FALSE)
endif
if FileExist ("h:\faxsrcli\faxsrwin.ini") != 2
if FileExist ("c:\Program Files\faxsrcli\faxsrwin.ini") then FileCopy ("C:\PROGRAM FILES\FAXSRCLI\FAXSRWIN.INI", "H:\FAXSRCLI\FAXSRWIN.INI",@FALSE)
endif
if FileExist ("h:\windows\odbc.ini") != 2
if FileExist ("c:\windows\odbc.ini") then FileCopy ("C:\WINDOWS\ODBC.INI", "H:\WINDOWS\ODBC.INI",@FALSE)
endif
if FileExist ("h:\windows\ers.ini") != 2
if FileExist ("c:\windows\ers.ini") then FileCopy ("C:\WINDOWS\ERS.INI", "H:\WINDOWS\ERS.INI",@FALSE)
endif
if FileExist ("h:\windows\shltrans.ini") != 2
if FileExist ("c:\windows\shltrans.ini") then FileCopy ("C:\WINDOWS\SHLT*.INI", "H:\WINDOWS\SHLT*.INI",@FALSE)
endif
if FileExist ("h:\windows\msacc20.ini") != 2
if FileExist ("c:\windows\msacc20.ini") then FileCopy ("C:\WINDOWS\MSACC20.INI", "H:\WINDOWS\MSACC20.INI",@FALSE)
endif
if FileExist ("h:\windows\winproj4.ini") != 2
if FileExist ("c:\windows\winproj4.ini") then FileCopy ("C:\WINDOWS\WINPROJ4.INI", "H:\WINDOWS\WINPROJ4.INI",@FALSE)
endif
if FileExist ("h:\windows\pww.ini") != 2
if FileExist ("c:\windows\pww.ini") then FileCopy ("C:\WINDOWS\PWW.INI", "H:\WINDOWS\PWW.INI",@FALSE)
endif
ErrorMode(@CANCEL)
endif
IntControl(66,0,0,0,0)
exit
endswitch
break
case 2
exit
case 3
RunShell("c:\windows\help\overview.hlp", "", "C:\Windows\help", @NORMAL, @NOWAIT)
break
endswitch
endwhile
Article ID: W13321
Filename: Script to Shutdown Window after Backing up INI Files.txt
File Created: 1999:04:15:16:53:14
Last Updated: 1999:04:15:16:53:14