Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

42 lines
1.3 KiB

Rem
Rem Create directories for application specific data in the
Rem user's home directory.
Rem
call TsMkUDir "%RootDrive%\Office97"
call TsMkUDir "%RootDrive%\Office97\Templates"
call TsMkUDir "%RootDrive%\%MY_DOCUMENTS%"
call TsMkUDir "%RootDrive%\Office97\XLStart"
Rem
Rem copy this file from the all users templates to the current user templates location
Rem
If Exist "%UserProfile%\%TEMPLATES%\EXCEL8.XLS" Goto Skip0
If Exist "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" copy "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
:Skip0
Rem
Rem Copy the ARTGALRY.CAG to user's windows directory
Rem
If Exist "%RootDrive%\Windows\ArtGalry.Cag" Goto Skip1
If Not Exist "%SystemRoot%\ArtGalry.Cag" Goto Skip1
copy "%SystemRoot%\ArtGalry.Cag" "%RootDrive%\Windows\ArtGalry.Cag" >Nul: 2>&1
:Skip1
Rem
Rem Copy Custom.dic file to user's directory
Rem
If Exist "%RootDrive%\Office97\Custom.Dic" Goto Skip2
If Not Exist "#INSTDIR#\Office\Custom.Dic" Goto Skip2
copy "#INSTDIR#\Office\Custom.Dic" "%RootDrive%\Office97\Custom.Dic" >Nul: 2>&1
:Skip2
If Exist "%RootDrive%\Office97\XL8GALRY.XLS" Goto Skip3
If Not Exist "#INSTDIR#\Office\XL8GALRY.XLS" Goto Skip3
Copy "#INSTDIR#\Office\XL8GALRY.XLS" "%RootDrive%\Office97\XL8GALRY.XLS" >Nul: 2>&1
:Skip3