На Рабочем столе
|
1 2 3 4 5 6 7 8 |
Shell = Новый COMОбъект("WScript.Shell"); РабочийСтол = Shell.SpecialFolders("Desktop"); Ярлык = Shell.CreateShortcut(РабочийСтол + "\\Regedit.lnk"); Ярлык.TargetPath = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe"); Ярлык.WorkingDirectory = Shell.ExpandEnvironmentStrings("%windir%"); Ярлык.WindowStyle = 1; Ярлык.IconLocation = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe, 0"); Ярлык.Save(); |
|
1 2 3 4 5 6 7 8 |
Shell = СоздатьОбъект("WScript.Shell"); РабочийСтол = Shell.SpecialFolders("Desktop"); Ярлык = Shell.CreateShortcut(РабочийСтол + "\\Regedit.lnk"); Ярлык.TargetPath = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe"); Ярлык.WorkingDirectory = Shell.ExpandEnvironmentStrings("%windir%"); Ярлык.WindowStyle = 1; Ярлык.IconLocation = Shell.ExpandEnvironmentStrings("%windir%\\regedit.exe, 0"); Ярлык.Save(); |
About the Author
