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.

126 lines
3.6 KiB

  1. @Echo Off
  2. Rem #########################################################################
  3. Rem
  4. Rem �ˬd %RootDrive% �O�_�w�]�w�A�ñN���]�w�����O�ɡC
  5. Rem
  6. Call "%SystemRoot%\Application Compatibility Scripts\ChkRoot.Cmd"
  7. If "%_CHKROOT%" == "FAIL" Goto Done
  8. Call "%SystemRoot%\Application Compatibility Scripts\SetPaths.Cmd"
  9. If "%_SETPATHS%" == "FAIL" Goto Done
  10. Rem #########################################################################
  11. Rem
  12. Rem �N�ɮױq�ثe�ϥΪ̽d���ƻs���Ҧ��ϥΪ̽d���Ҧb���m�C
  13. Rem
  14. If Not Exist "%ALLUSERSPROFILE%\%TEMPLATES%\EXCEL8.XLS" copy "%UserProfile%\%TEMPLATES%\EXCEL8.XLS" "%ALLUSERSPROFILE%\%TEMPLATES%\" /Y >Nul: 2>&1
  15. Rem #########################################################################
  16. Rem
  17. Rem �q�n�������o Excel 97 �w�˦��m�C
  18. Rem �p�G�䤣���A�N���] Excel �å��w�ˡA�����ܿ��~�T���C
  19. Rem
  20. ..\ACRegL %Temp%\O97.Cmd O97INST "HKLM\Software\Microsoft\Office\8.0" "BinDirPath" "STRIPCHAR\1"
  21. If Not ErrorLevel 1 Goto Cont0
  22. Echo.
  23. Echo �L�k�q�n������ Excel 97 ���w�˦��m�C
  24. Echo �нT�{�O�_�w�w�� Excel 97�A�í��s�����o��
  25. Echo ���O�ɡC
  26. Echo.
  27. Pause
  28. Goto Done
  29. :Cont0
  30. Call %Temp%\O97.Cmd
  31. Del %Temp%\O97.Cmd >Nul: 2>&1
  32. Rem #########################################################################
  33. Rem
  34. Rem �q [�Ұ�] �\���������� [�ֳt�M��]�C
  35. Rem [�ֳt�M��] �|�ϥΤj�q�귽�í��C�t�ήį��C
  36. Rem
  37. If Exist "%COMMON_STARTUP%\Microsoft Find Fast.lnk" Del "%COMMON_STARTUP%\Microsoft Find Fast.lnk" >Nul: 2>&1
  38. Rem #########################################################################
  39. Rem
  40. Rem �إ� MsForms.Twd �ɮסA���O
  41. Rem Powerpoint �� Excel Add-ins ([�ɮ�] [�x�s�� HTML] ����) �������ɮסC
  42. Rem �����o�������ε{���ɡA���̱N�|�ξA�����ɮרӨ��N�t�����n���ƪ��ɮסC
  43. Rem
  44. If Exist %systemroot%\system32\MsForms.Twd Goto Cont2
  45. Copy Nul: %systemroot%\system32\MsForms.Twd >Nul: 2>&1
  46. Cacls %systemroot%\system32\MsForms.Twd /E /P "Authenticated Users":F >Nul: 2>&1
  47. :Cont2
  48. If Exist %systemroot%\system32\RefEdit.Twd Goto Cont3
  49. Copy Nul: %systemroot%\system32\RefEdit.Twd >Nul: 2>&1
  50. Cacls %systemroot%\system32\RefEdit.Twd /E /P "Authenticated Users":F >Nul: 2>&1
  51. :Cont3
  52. Rem #########################################################################
  53. Rem
  54. Rem �ܧ��n�����X�A�N���|���V�ϥΪ̩ҫ��w��
  55. Rem �ؿ��C
  56. Rem
  57. Rem �p�G�ثe���O�w�˼Ҧ��A�N�ܧ󦨦w�˼Ҧ��C
  58. Set __OrigMode=Install
  59. ChgUsr /query > Nul:
  60. if Not ErrorLevel 101 Goto Begin
  61. Set __OrigMode=Exec
  62. Change User /Install > Nul:
  63. :Begin
  64. Set __SharedTools=Shared Tools
  65. If Not "%PROCESSOR_ARCHITECTURE%"=="ALPHA" goto acsrCont1
  66. If Not Exist "%ProgramFiles(x86)%" goto acsrCont1
  67. Set __SharedTools=Shared Tools (x86)
  68. :acsrCont1
  69. ..\acsr "#ROOTDRIVE#" "%RootDrive%" Template\MsExcl97.Key MsExcl97.Tmp
  70. ..\acsr "#__SharedTools#" "%__SharedTools%" MsExcl97.Tmp MsExcl97.Tmp2
  71. ..\acsr "#INSTDIR#" "%O97INST%" MsExcl97.Tmp2 MsExcl97.Tmp3
  72. ..\acsr "#MY_DOCUMENTS#" "%MY_DOCUMENTS%" MsExcl97.Tmp3 MsExcl97.key
  73. Del MsExcl97.Tmp >Nul: 2>&1
  74. Del MsExcl97.Tmp2 >Nul: 2>&1
  75. Del MsExcl97.Tmp3 >Nul: 2>&1
  76. regini MsExcl97.key > Nul:
  77. Rem �p�G�쥻�O�����Ҧ��A�N�ܦ^�����Ҧ��C
  78. If "%__OrigMode%" == "Exec" Change User /Execute > Nul:
  79. Set __OrigMode=
  80. Rem #########################################################################
  81. Rem
  82. Rem ���s Exl97Usr.Cmd �ӤϬM���ڪ��w�˥ؿ��A
  83. Rem �ñN���[�J UsrLogn2.Cmd ���O�ɡC
  84. Rem
  85. ..\acsr "#INSTDIR#" "%O97INST%" ..\Logon\Template\Exl97Usr.Cmd ..\Logon\Exl97Usr.Cmd
  86. FindStr /I Exl97Usr %SystemRoot%\System32\UsrLogn2.Cmd >Nul: 2>&1
  87. If Not ErrorLevel 1 Goto Skip1
  88. Echo Call Exl97Usr.Cmd >> %SystemRoot%\System32\UsrLogn2.Cmd
  89. :Skip1
  90. Echo.
  91. Echo ���F���� MS Excel 97 ���T�ާ@�A�ثe�w�n�J���ϥΪ�
  92. Echo �������n�X�A�M�᭫�s�n�J�A
  93. Echo �~���������ε{���C
  94. Echo.
  95. Echo Microsoft Excel 97 �h�ϥΪ����ε{���վ��B�z����
  96. Pause
  97. :Done