farag
Silver Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
iNNOKENTIY21
М-да, я заметил насчет атрибута...
теперь, вроде, работает
Код:
# https://gist.github.com/aaronparker/cf124f13bb58d95342707527900d307b
# Условно
IF (!(Test-Path $env:SystemDrive\Загрузки))
{
New-Item -Path $env:SystemDrive\Загрузки -Type Directory -Force
}
IF (!(Test-Path $env:SystemDrive\Документы))
{
New-Item -Path $env:SystemDrive\Документы -Type Directory -Force
}
function Set-KnownFolderPath
{
Param (
[Parameter(Mandatory = $true)]
[ValidateSet('Documents', 'Downloads')]
[string]$KnownFolder,
[Parameter(Mandatory = $true)]
[string]$Path
)
$KnownFolders = @{
'Documents' = @('FDD39AD0-238F-46AF-ADB4-6C85480369C7','f42ee2d3-909f-4907-8871-4c22fc0bf756');
'Downloads' = @('374DE290-123F-4565-9164-39C4925E467B','7d83ee9b-2244-4e70-b1f5-5393042af1e4');
}
$Type = ([System.Management.Automation.PSTypeName]'KnownFolders').Type
$Signature = @'
[DllImport("shell32.dll")]
public extern static int SHSetKnownFolderPath(ref Guid folderId, uint flags, IntPtr token, [MarshalAs(UnmanagedType.LPWStr)] string path);
'@
$Type = Add-Type -MemberDefinition $Signature -Name 'KnownFolders' -Namespace 'SHSetKnownFolderPath' -PassThru
# return $Type::SHSetKnownFolderPath([ref]$KnownFolders[$KnownFolder], 0, 0, $Path)
ForEach ($guid in $KnownFolders[$KnownFolder])
{
$Type::SHSetKnownFolderPath([ref]$guid, 0, 0, $Path)
}
Attrib +r $Path
}
Set-KnownFolderPath -KnownFolder Downloads -Path "$env:SystemDrive\Загрузки"
New-ItemProperty -Path "HKCU:\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" -Name "{7D83EE9B-2244-4E70-B1F5-5393042AF1E4}" -Type ExpandString -Value "%SystemDrive%\Загрузки" -Force
Set-KnownFolderPath -KnownFolder Documents -Path "$env:SystemDrive\Документы"
New-ItemProperty -Path "HKCU:\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" -Name "{F42EE2D3-909F-4907-8871-4C22FC0BF756}" -Type ExpandString -Value "%SystemDrive%\Документы" -Force
Stop-Process -ProcessName explorer
|
И вот такую штуку нарыл. Может, пригодится.
https://gallery.technet.microsoft.com/scriptcenter/Set-FolderIcon-0bd56629
LevT
У меня так на русской Win.
Подробнее... |
Всего записей: 2517 | Зарегистр. 27-07-2009 | Отправлено: 09:04 20-11-2018 | Исправлено: farag, 09:05 20-11-2018 |
|
