Helpdesk: Przejmowanie katalogu na własność i nadawanie sobie uprawnień

2019-10-17

Podczas migrowania plików między komputerami, zwłaszcza na dyskach zewnętrznych, może się okazać, że przekopiowany plik lub katalog nie może być otwarty na docelowym komputerze. Jeśli na docelowym komputerze jesteś administratorem możesz skorzystać z poniższych poleceń, żeby

(1) przejąć na własność katalog (tutaj katalog test)

takeown /f  test

Spodziewany wynik polecenia to:

SUCCESS: The file (or folder): "c:\temp\test" now owned by user "ws2019\admin".

(2) nadać sobie uprawnienia:

icacls test  /grant admin:F

Spodziewany wynik to:

processed file: test
Successfully processed 114 files; Failed processing 0 files

 

By Rafał Kraik in Helpdesk

Kurs: Język R dla początkujących – za darmo

2019-10-16

Jak zwykle po premierze kursu przez krótki czas udostępniam kurs za darmo. Tak jest i tym razem:

  • Kurs od podstaw
  • 10 godzin video
  • Ćwiczenia po każdej lekcji
  • Dane do ćwiczeń publicznie dostępne do pobrania
  • Rozwiązania do ćwiczeń
  • Tylko bazowe pakiety bez tysiąca modułów
  • Od instalacji przez pracę z danymi po wizualizację
  • Wszystko czego potrzeba na start!

Miłej nauki!

By Rafał Kraik in Aktualności

Helpdesk: Sprawdzenie klucza systemu Windows 10

2019-09-17

Jeśli zgubisz klucz do systemu windows 10, to można go odzyskać przy pomocy skryptu umieszczonego poniżej. Otwórz notatnik, wklej zawartość skryptu, zapisz go pod nazwą np get-win-key.vbs. Potem po prostu kliknij na nim dwa razy i w okienku zobaczysz swój klucz produktu:

 

Set WshShell = CreateObject("WScript.Shell")
MsgBox ConvertToKey(WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId")) Function ConvertToKey(Key)
Const KeyOffset = 52
i = 28
Chars = "BCDFGHJKMPQRTVWXY2346789"
Do
Cur = 0
x = 14
Do
Cur = Cur * 256
Cur = Key(x + KeyOffset) + Cur
Key(x + KeyOffset) = (Cur \ 24) And 255
Cur = Cur Mod 24
x = x -1
Loop While x >= 0
i = i -1
KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
If (((29 - i) Mod 6) = 0) And (i <> -1) Then
i = i -1
KeyOutput = "-" & KeyOutput
End If
Loop While i >= 0
ConvertToKey = KeyOutput
End Function

 

Rozwiązanie pochodzi ze strony https://www.howtogeek.com/206329/how-to-find-your-lost-windows-or-office-product-keys/ i potwierdzam że działa 🙂

By Rafał Kraik in Helpdesk

Helpdesk: Sprawdzenie klucza Office 2016

2019-09-17

Kiedy masz kilka komputerów i kilka kluczy licencyjnych do Office, to łatwo się pogubić. Przyda się komenda, która potwierdzi, który klucz gdzie został użyty:

Uruchom cmd.exe i wprowadź polecenie:

cscript "C:\Program Files (x86)\Microsoft Office\Office16\OSPP.VBS" /dstatus

Uwaga na ścieżkę. Może być tak, że instalowałeś office 64-bitowy i wtedy w ścieżce nie powinno występować (x86).

Zależnie od tego co masz na komputerze wyniki mogą być różne:

oto przykład z komputera, na którym subskrypcja wygasła:

-a tak wygląda wynik na komputerze z działającym Office:

c:\>cscript "C:\Program Files (x86)\Microsoft Office\Office16\OSPP.VBS" /dstatus
Microsoft (R) Windows Script Host Version 5.812
Copyright (C) Microsoft Corporation. All rights reserved.

---Processing--------------------------
---------------------------------------
PRODUCT ID: 00351-36292-81863-AZ939
SKU ID: 84895881-46df-4134-8abd-eb493eecf78e
LICENSE NAME: Office 16, Office16ProPlusMSDNR_Retail edition
LICENSE DESCRIPTION: Office 16, RETAIL channel
BETA EXPIRATION: 1601-01-01
LICENSE STATUS: ---LICENSED---
Last 5 characters of installed product key: 88PY7
---------------------------------------
---------------------------------------
---Exiting-----------------------------

Cały klucz nie jest wyświetlany, ale jego końcówka to 88PY7. Teraz jeśli tylko posiadasz legalny klucz licencyjny z  łatwością ustalisz o którą licencję chodzi!

By Rafał Kraik in Helpdesk

SQL: Policy Based Management z alertem

2019-09-16

Policy Base Management pozwala definiować reguły, które zadbają o to, żeby konfiguracja systemu była taka jaka chcesz.

Dajmy na to, że chcesz, aby wszystkie bazy danych (oprócz systemowych) miały recovery model full.

Zaczynamy od zdefiniowania conditions

Potrzebne będą dwa. Jeden, który sprawdza, czy RecoveryModel dla bazy jest ustawiony na Full, drugi, który sprawdza czy baza danych należy do użytkownika:

Czytaj dalej »

By Rafał Kraik in SQL

PowerShell: Wyszukiwanie w AD użytkownika lub grupy

2019-08-20

Nie ma lepszych narzędzi do wydobycia informacji o środowisku niż prosty skrypt, który można sklecić „na kolanie”

Znajdź mi użytkowników, którzy mają nazwę kończąca się na service:

Get-AdUser -filter "name -like '*service'" | select name

Znajdź mi grupy, które mają w nazwie PRD I kończą się na SYS:

Get-ADGroup -filter "name -like '*PRD*SYS'" | select name

Co oczywiście ważne przed uruchomieniem tych poleceń trzeba mieć zainstalowany feature „Active Directory Domain Services Tool”:

Get-WindowsFeature *adds* | Add-WindowsFeature

Proste!

By Rafał Kraik in Power Shell

Powershell: Upload pliku przez FTP

2019-08-19

Chociaz FTP nie jest bezpiecznym protokolem to czasami jeszcze gdzie niegdzie sie stosuje. Tym razem chodzilo o wyslanie plikow z serwera Windowsowego na serwer Linux. Idealnie jesli bedzie to zrobione przez PowerShella wlasnie.

Oto najwazniejszy kawalek kodu:

 

$localfile = 'c:/temp/filename.txt'
 $ftp = "ftp://servername/dir1/dir2/"
 $user = "username"
 $pass = "password"
 $destinationFileName = 'filename.txt'
 $webclient = New-Object System.Net.WebClient
 $webclient.Credentials = New-Object System.Net.NetworkCredential($user,$pass)
 $uri = New-Object System.Uri($ftp+$destinationFileName)
 $webclient.UploadFile($uri, $localfile)

Niestety w czasie ladownia pliku pojawial sie blad:

The remote server returned an error: (553) File name not allowed.

Czytaj dalej »

By Rafał Kraik in Power Shell