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.

88 lines
2.7 KiB

  1. Rem #########################################################################
  2. Rem
  3. Rem �N "Microsoft Office �ֱ��C.lnk" �ɮױq Office �w�ˮڥؿ��ƻs��
  4. Rem �ثe�ϥΪ̪� [�Ұ�] �\�����C
  5. Rem
  6. If Exist "%RootDrive%\Office97" Goto Skip0
  7. If Exist "%USER_STARTUP%\Microsoft Office �ֱ��C.lnk" Goto Skip0
  8. If Not Exist "#INSTDIR#\Microsoft Office �ֱ��C.lnk" Goto Skip0
  9. Copy "#INSTDIR#\Microsoft Office �ֱ��C.lnk" "%USER_STARTUP%\Microsoft Office �ֱ��C.lnk" >Nul: 2>&1
  10. :Skip0
  11. Rem
  12. Rem �b�ϥΪ̥D�ؿ����إ����ε{�����w���ƪ��ؿ��C
  13. Rem
  14. call TsMkUDir "%RootDrive%\Office97"
  15. call TsMkUDir "%RootDrive%\Office97\Startup"
  16. call TsMkUDir "%RootDrive%\Office97\Templates"
  17. call TsMkuDir "%RootDrive%\Office97\XLStart"
  18. call TsMkUDir "%RootDrive%\%MY_DOCUMENTS%"
  19. Rem
  20. Rem �N�U�C�ɮױq�Ҧ��ϥΪ̽d�����ƻs���ثe�ϥΪ̽d���Ҧb���m�C
  21. Rem
  22. If Not Exist "%UserProfile%\%TEMPLATES%\WINWORD8.DOC" copy "%ALLUSERSPROFILE%\%TEMPLATES%\WINWORD8.DOC" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
  23. If Not Exist "%UserProfile%\%TEMPLATES%\EXCEL8.XLS" copy "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
  24. If Not Exist "%UserProfile%\%TEMPLATES%\BINDER.OBD" copy "%ALLUSERSPROFILE%\%TEMPLATES%\BINDER.OBD" "%UserProfile%\%TEMPLATES%\" /Y >Nul: 2>&1
  25. Rem
  26. Rem �N�t�Τu���C�ƻs���ϥΪ̪��D�ؿ� (�p�G�t�Τu���C���s�b����)�C
  27. Rem
  28. If Exist "%RootDrive%\Office97\ShortCut Bar" Goto Skip1
  29. If Not Exist "#INSTDIR#\Office\ShortCut Bar" Goto Skip1
  30. Xcopy "#INSTDIR#\Office\ShortCut Bar" "%RootDrive%\Office97\ShortCut Bar" /E /I >Nul: 2>&1
  31. :Skip1
  32. Rem
  33. Rem �ƻs�����ؿ��A�� Outlook �i�H�ϥ� Word �@���s�边�C
  34. Rem
  35. If Exist "%RootDrive%\Windows\Forms" Goto Skip2
  36. If Not Exist "%SystemRoot%\Forms" Goto Skip2
  37. Xcopy "%SystemRoot%\Forms" "%RootDrive%\Windows\Forms" /e /i >Nul: 2>&1
  38. :Skip2
  39. Rem
  40. Rem �N ARTGALRY.CAG �ƻs���ϥΪ� windows �ؿ��C
  41. Rem
  42. If Exist "%RootDrive%\Windows\ArtGalry.Cag" Goto Skip3
  43. If Not Exist "%SystemRoot%\ArtGalry.Cag" Goto Skip3
  44. Copy "%SystemRoot%\ArtGalry.Cag" "%RootDrive%\Windows\ArtGalry.Cag" >Nul: 2>&1
  45. :Skip3
  46. Rem
  47. Rem �N Custom.dic �ɮ׽ƻs���ϥΪ̥ؿ��C
  48. Rem
  49. If Exist "%RootDrive%\Office97\Custom.Dic" Goto Skip4
  50. If Not Exist "#INSTDIR#\Office\Custom.Dic" Goto Skip4
  51. Copy "#INSTDIR#\Office\Custom.Dic" "%RootDrive%\Office97\Custom.Dic" >Nul: 2>&1
  52. :Skip4
  53. Rem
  54. Rem �N Graph �ɮ׽ƻs���ϥΪ̥ؿ��C
  55. Rem
  56. If Exist "%RootDrive%\Office97\GR8GALRY.GRA" Goto Skip5
  57. If Not Exist "#INSTDIR#\Office\GR8GALRY.GRA" Goto Skip5
  58. Copy "#INSTDIR#\Office\GR8GALRY.GRA" "%RootDrive%\Office97\GR8GALRY.GRA" >Nul: 2>&1
  59. :Skip5
  60. If Exist "%RootDrive%\Office97\XL8GALRY.XLS" Goto Skip6
  61. If Not Exist "#INSTDIR#\Office\XL8GALRY.XLS" Goto Skip6
  62. Copy "#INSTDIR#\Office\XL8GALRY.XLS" "%RootDrive%\Office97\XL8GALRY.XLS" >Nul: 2>&1
  63. :Skip6