Flasher
|
 Posted: Thu Sep 22, 2011 21:27 Post subject: |
 |
|
Понял, там он названия переменных поменял.
Нужно было вместо этого
| Code: | Set AUSM = FSO.GetFolder(WSH.ExpandEnvironmentStrings("%ALLUSERSPROFILE%") & "\Start Menu")
Set CUSM = FSO.GetFolder(WSH.ExpandEnvironmentStrings("%USERPROFILE%") & "\Start Menu")
Set AUSP = FSO.GetFolder(WSH.ExpandEnvironmentStrings("%ALLUSERSPROFILE%") & "\Start Menu\Programs")
Set CUSP = FSO.GetFolder(WSH.ExpandEnvironmentStrings("%USERPROFILE%") & "\Start Menu\Programs") |
вставить
| Code: | Set AUSM = FSO.GetFolder(ProgramData & "\Microsoft\Windows\Start Menu")
Set CUSM = FSO.GetFolder(AppData & "\Microsoft\Windows\Start Menu")
Set AUSP = FSO.GetFolder(ProgramData & "\Microsoft\Windows\Start Menu\Programs")
Set CUSP = FSO.GetFolder(AppData & "\Microsoft\Windows\Start Menu\Programs") |
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
