Zomwe zimagwiritsidwa ntchito polumikizira mithunzi ya anthu osayang'anira magawo a ogwiritsa ntchito a RDP mu WinServer 2012R2

Vuto panthawi yokhala kwaokhalokha lidakhala motere: ndikofunikira kuchepetsa kuchuluka kwa maulendo oyendera maofesi ndi akatswiri omwe amathandizira ndikufunsira mapulogalamu a pulogalamuyo, ndipo kunena zoona, ogwiritsa ntchito nthawi zambiri amagwiritsa ntchito molakwika thandizo la akatswiri osafuna kufufuza. nkhani yokha, amati "abwera - athandiza - azichita, koma ndidzasuta / kumwa khofi, ndi zina zotero." Kufunsira pa foni mukagawana seva ndikothandiza kwambiri ngati mukuwona chophimba chakutali.

Pambuyo pa "kupangidwa" kwa njinga yathu, chidziwitso chanzeru pamutu wa nkhaniyi chinatulukira: RDS Shadow - kulumikizana kwamthunzi ku magawo a ogwiritsa ntchito a RDP mu Windows Server 2012 R2 kapena Wopanda mwayi wogwiritsa ntchito mthunzi mu Windows seva kapena Kupatsa ena udindo woyang'anira magawo a RDP. Zonsezi zimaphatikizapo kugwiritsa ntchito console, ngakhale ndi zinthu za zokambirana zosavuta.

Zonse zomwe zili pansipa ndizomwe zimapangidwira iwo omwe amalekerera kupotoza kwachilendo bwino kupeza zotsatira zomwe mukufuna, kupanga njira zosafunikira.
Kuti "musakoke mphaka ndi mchira", ndiyamba ndi yomaliza: njinga imagwira ntchito kwa ogwiritsa ntchito wamba. AdmiLink, zomwe zikomo kwa wolemba wake.

I. Console ndi mthunzi RDP.

Popeza ntchito ndi ufulu woyang'anira wa Server Manager console -> QuickSessionCollection -> podina gawo la wogwiritsa ntchito chidwi, ndikusankha Shadow kuchokera pazosankha kwa ogwira ntchito kulangiza kugwiritsa ntchito pulogalamuyo, sichosankha, njira ina "yamatabwa" inkaganiziridwa, ndiyo:

1. Pezani ID ya RDP ya gawoli:

query user | findstr Administrator

kapena:

qwinsta | findstr Administrator 

Komanso "| | findstr Administrator"Zinali zophweka mutadziwa zomwe kwenikweni woyang'anira muyenera, kapena gwiritsani ntchito gawo loyamba kuti muwone aliyense atalowa mu seva.

2. Lumikizani ku gawoli, malinga ngati zili mu domain ndondomeko zamagulu Njira ya "Khazikitsani malamulo akutali pamagawo a ogwiritsa ntchito a Remote Desktop Services" njira yasankhidwa ndi "Monitor session with user permit" njira yosankhidwa (zambiri):

mstsc /shadow:127

Chonde dziwani kuti mndandandawo ungokhala ndi zolembera za ogwiritsa ntchito.

Ndikubwerezanso kuti popanda ufulu wa admin mupeza zotsatirazi:

Koma pakuwongolera koyambirira kwa pulogalamu yomwe idzakambidwe, ndidagwiritsa ntchito akaunti yokhala ndi ufulu woyang'anira.

II. Pulogalamu

Chifukwa chake mawu avuto: kupanga mawonekedwe osavuta ojambulira kuti alumikizane ndi chithunzi cha wogwiritsa ntchito ndi chilolezo chake, kutumiza uthenga kwa wogwiritsa ntchito. Malo opangira mapulogalamu omwe amasankhidwa ndi Lazaro.

1. Timapeza mndandanda wazinthu zonse za ogwiritsa ntchito "login" - "dzina lonse" kuchokera kwa woyang'anira, kapena kachiwiri kudzera pa console:

wmic useraccount get Name,FullName 

palibe amene aletsa ngakhale izi:

wmic useraccount get Name,FullName > c:testusername.txt

Ndidzanena nthawi yomweyo kuti anali Lazaro yemwe anali ndi vuto pakukonza fayiloyi, popeza mwachisawawa kabisidwe kake ndi UCS-2, kotero ndidangosintha pamanja kukhala UTF-8 wamba. Pali ma tabo ambiri pamafayilo, kapena malo ambiri, omwe adasankhidwa kuti asinthe mwadongosolo; posachedwa vuto la encoding lidzathetsedwa, ndipo fayiloyo idzasinthidwa mwadongosolo.

Chifukwa chake, lingaliro ndikukhala ndi chikwatu chopezeka kwa ogwiritsa ntchito pulogalamuyi, mwachitsanzo c: test, momwe mudzakhala mafayilo a 2: woyamba ndi dzina lolowera ndi dzina lathunthu, lachiwiri ndi id_rdp ndi kulowa kwa ogwiritsa ntchito. Kenako, timakonza izi momwe tingathere :).

Pakadali pano, kuti tigwirizane ndi mndandanda wa magawo, timasamutsa izi (lolowera ndi dzina lonse) zomwe zili mugulu:

procedure Tf_rdp.UserF2Array;
var 
  F:TextFile;   i:integer;   f1, line1:String;   fL: TStringList;
begin //f_d глобальный путь к размещению файлов 
f1:=f_d+'user_name.txt';     //задача считать в массив содержимое файла
fL := TStringList.Create; // строку подвергнем метамарфозам с разделителями
fL.Delimiter := '|'; fL.StrictDelimiter := True;
AssignFile(F,f1); 
try // Открыть файл для чтения
  reset(F); ReadLn(F,line1);
  i:=0;
while not eof(F) do // Считываем строки, пока не закончится файл
begin
ReadLn(F,line1);
line1:= StringReplace(line1, '  ', '|',[]); //заменяем первый попавш.2пробела разделителем |
// удаляем все двойные пробелы
while pos('  ',line1)>0 do line1:= StringReplace(line1, '  ', ' ', [rfReplaceAll]);
begin
if (pos('|',line1)>0) then
begin //если разделитель существует заносим его в массив
fL.DelimitedText :=line1; // разбиваем на столбцы
if (fL[0]<>'') then //если учетка имеет имя
begin //вносим ее в массив
 inc(i); // избавляемся от возможных одиночных пробелов в логине
 fam[0,i]:=StringReplace(fL[1],' ','',[rfReplaceall, rfIgnoreCase]);
 fam[1,i]:=fL[0];
 end;end;end;end; // Готово. Закрываем файл.
 CloseFile(F);
 Fl.Free;
 except
 on E: EInOutError do  ShowMessage('Ошибка обработки файла. Детали: '+E.Message);
 end;end;

Ndikupepesa chifukwa cha "code code", mfundo zotsatirazi zidzakhala zachidule.

2. Pogwiritsa ntchito njira yomweyi kuchokera m'ndime yapitayi, tinawerenga zotsatira za ndondomeko ya mndandanda mu chinthu cha StringGrid, pamene ine ndipereka chidutswa cha code "chofunika":

2.1 Timalandila mndandanda wapano wa magawo a RDP mufayilo:

f1:=f_d+'user.txt';
cmdline:='/c query user >'+ f1;
if ShellExecute(0,nil, PChar('cmd'),PChar(cmdline),nil,1)=0 then;
Sleep(500); // можно и подольше ждать пока файл для чтения создается

2.2 Sinthani fayilo (mizere yofunikira yokha ndiyomwe ikuwonetsedwa):

StringGrid1.Cells[0,i]:=fL[1]; StringGrid1.Cells[2,i]:=fL[3]; //кидаем в цикле в StringGrid1
login1:=StringReplace(fL[1],' ','',[rfReplaceall, rfIgnoreCase]); //убираем из логина пробелы
if (SearchArr(login1)>=0) then //ищем в массиве из п1. логин и записываем в таблицу ФИО
StringGrid1.Cells[1,i]:=fam[1,SearchArr(login1)]
else StringGrid1.Cells[1,i]:='+'; // либо записываем плюсик:)
.... //в зависимости от выбора пользователя сортируем и форматируем по данным
if (b_id.Checked=true) then SortGrid(0) else SortGrid(1);
StringGrid1.AutoSizeColumn(0);StringGrid1.AutoSizeColumn(1); StringGrid1.AutoSizeColumn(2);  

3. Lumikizani mwachindunji podina pamzere wokhala ndi wogwiritsa ntchito ndi nambala yake ya gawo:

  id:=(StringGrid1.Row);// узнаем номер строки  IntToStr(StringGrid1.Row)
  ids:=StringGrid1.Cells[2,id]; //получаем идентификатор rdp
  cmdline:='/c mstsc /shadow:'+ ids; //и подключаемся....
 if (b_rdp.Checked=True) then  if ShellExecute(0,nil, PChar('cmd'),PChar(cmdline),nil,1) =0 then;       

4. Zokongoletsa zina zingapo zapangidwa, monga kusanja podina batani la wailesi, ndi mauthenga kwa wogwiritsa ntchito kapena ogwiritsa ntchito onse.

→ Khodi yathunthu imatha kuwoneka apa

III. Kugwiritsa ntchito AdminLink - zomwe ndidawona:

AdminLink imapanga njira yachidule yomwe imatchula malo omwe amagwiritsidwa ntchito admilaunch.exe, ndi kope laumwini lazomwe mungagwiritse ntchito poyambitsa AdmiRun.Exe yomwe ili mufoda ya wogwiritsa ntchito, mwachitsanzo Vasya, mtundu C: UsersvasyaWINDOWS. Nthawi zambiri, sikuti zonse ndizoyipa kwambiri: mutha kusewera ndi mwayi wopeza fayilo yachidule ndi ena kuti muchotse chikumbumtima chanu cha admin.

Source: www.habr.com