Скрипт для очистки кэша MS Outlook

Подходит для версий Outlook 2007, 2010, 2013, проверяет версию Office (должен быть установлен).

@echo off
setlocal
set regexe=%SystemRoot%\System32\Reg.exe
set officepath15="%PROGRAMFILES%\Microsoft Office\Office15\excel.exe"
set officepath14="%PROGRAMFILES%\Microsoft Office\Office14\excel.exe"
set officepath12="%PROGRAMFILES%\Microsoft Office\Office12\excel.exe"
if exist %officepath15% (set rkey=HKCU\Software\Microsoft\Office\15.0\Outlook\Security) else (
if exist %officepath14% (set rkey=HKCU\Software\Microsoft\Office\14.0\Outlook\Security) else (
set rkey=HKCU\Software\Microsoft\Office\12.0\Outlook\Security)
)
set rvalue="OutlookSecureTempFolder"
for /f "Tokens=3*" %%a in ('%regexe% QUERY "%rkey%" /v %rvalue% 2^>NUL') do (
set rdata=%%a
set edata=%%b
)
set full=%rdata% %edata%
echo %full%
pause
del "%full%\*.*" /f /s /q
if %ERRORLEVEL% EQU 0 (echo Outlook temp files deleted...) else (echo No temp files deleted...)
ping -n 5 localhost > nul
endlocal
exit

 

Популярность: 1%

Скрипт Powershell: получить размер папки, включая все подпапки

Скрипт создает Excel файл, куда выводит результат.

# Size of folder including subfolders
$startFolder = read-host -Prompt "enter full path" #c:\temp
if(Test-Path -Path $startFolder)
{
	$length = 0
	$a = New-Object -comobject Excel.Application
	$a.visible = $True
	$b = $a.Workbooks.Add()
	$c = $b.Worksheets.Item(1)
	$c.Cells.Item(1,1) = "Name"
	$c.Cells.Item(1,2) = "Size (MB)"
	$d = $c.UsedRange
	$d.Font.Bold = $True
	$intRow = 3
	$colItems = (Get-ChildItem $startFolder | Measure-Object -property length -sum)
	$length += $colItems.sum
	$c.Cells.Item(2,1) = $startFolder
	$c.Cells.Item(2,2) =  "{0:N2}" -f ($colItems.sum / 1MB)
	$colItems = (Get-ChildItem $startFolder  | Where-Object {$_.PSIsContainer -eq $True} | Sort-Object)
	foreach ($i in $colItems)
	{
		$objFSO = New-Object -com  Scripting.FileSystemObject
		$c.Cells.Item($intRow,1) = $i.FullName
		$c.Cells.Item($intRow,2) =  "{0:N2}" -f (($objFSO.GetFolder($i.FullName).Size) / 1MB)
		$length += $objFSO.GetFolder($i.FullName).Size
		$intRow++
	}
	$c.Cells.Item($intRow,1) = "Total Size"
	$c.Cells.Item($intRow,2) =  "{0:N2}" -f ($length / 1MB)
	$d = $c.UsedRange
	$d.EntireColumn.AutoFit()
}
else
{
	write-host "Folder $startFolder does NOT exist" -BackgroundColor Red
}

Популярность: 1%

Справочник по командам PowerShell для работы с MS Exchange

Full access to mailbox / Полный доступ к почтовому яшику

  • Получить список текуших прав
    get-Mailbox mailboxalias | fl
  • Добавить полный доступ пользователю username на ящик пользователя «Surname, Firstname»
    Add-MailboxPermission -Identity 'CN=Surname\, Firstname,OU=Disabled Accounts,OU=Users,OU=OU01,DC=CORP,DC=COMPANY,DC=com' -User 'COMPANYCORP\username' -AccessRights 'FullAccess'
  • Убрать права полный доступ пользователя username на ящик пользователя «Surname, Firstname»
    Remove-MailboxPermission -Identity 'CN=Surname\, Firstname,OU=Users,OU=OU03,DC=CORP,DC=COMPANY,DC=com' -User 'COMPANYCORP\username' -InheritanceType 'All' -AccessRights 'FullAccess'

Читать полностью »

Популярность: 1%

Как выбрать правильный хостинг?

В бизнесе хостинга, как и в любом другом, работает незыблемое правило треугольника: сумма углов всегда равна 180 градусам. В нашем случае треугольник составлен тремя, жестко связанными параметрами:

  • Стоимость услуги
  • Количество ресурсов
  • Качество обслуживания

Читать полностью »

Популярность: 2%