Utility yemumvuri wevanhu kubatana kweasiri-mutungamiriri kune RDP mushandisi masesheni muWinServer 2012R2

Dambudziko panguva yekuvharirwa kwebhizinesi rakave rinotevera: zvakakosha kudzikisa huwandu hwekushanya kumahofisi nenyanzvi dzinoshanda uye kubvunzana nezve application software, uye kutaura chokwadi, vashandisi vanowanzo shandisa zvisina kunaka rubatsiro rwenyanzvi vasingade kuferefeta. nyaya yacho pachayo, vanoti "vachauya - vachabatsira - vachazviita, asi ini ndichaputa / kunwa kofi, nezvimwe." Kubvunza parunhare kana uchigovera sevha kunoshanda zvakanyanya kana iwe ukatarisa kure kure skrini.

Mushure me "kugadzirwa" kwebhasikoro redu, ruzivo rwakajeka pamusoro pechinyorwa chakabuda: RDS Mvuri - mumvuri wekubatanidza kune RDP mushandisi masesheni muWindows Server 2012 R2 kana Vasina kurongeka mushandisi mumvuri modhi mune windows server kana Kugovera mabasa ehurongwa hweRDP. Zvese zvinosanganisira kushandiswa kwekoni, kunyangwe nezvinhu zvenhaurirano yakapusa.

Ruzivo rwese pazasi rwakaitirwa avo vano inoshivirira kutsveyamisa kusiri kwakajairika kuwana mhedzisiro inodiwa, kugadzira nzira dzisina kufanira.
Kuti ndirege "kudhonza katsi nemuswe", ini ndichatanga neyekupedzisira: bhasikoro rinoshanda kune avhareji mushandisi achishandisa utility. AdmiLink, nokuda kwekutenda kumunyori wayo.

I. Console uye mumvuri RDP.

Kubva kushandiswa ne kodzero dzemutungamiri weServer Manager console -> QuickSessionCollection -> nekudzvanya pane chikamu chemushandisi wekufarira, kusarudza Shadow kubva pane yemukati menyu. kune vashandi vanoraira mashandisirwo esoftware, haisi sarudzo, imwe nzira ye "huni" yaifungidzirwa, iyo:

1. Tsvaga ID yeRDP yechirongwa:

query user | findstr Administrator

kana:

qwinsta | findstr Administrator 

Uyezve "| findstr Administrator"Zvaingove nyore kana waiziva kuti chii chaizvo mutariri iwe unoda, kana kushandisa chete chikamu chekutanga kuona munhu wese apinda muserver.

2. Batanidza kuchikamu chino, chero chiri mudura mitemo yeboka Iyo "Seta kure kure kudzora mitemo yevashandisi masevhisi eRemote Desktop Services" sarudzo inosarudzwa neinenge iyo "Monitor chikamu nemvumo yemushandisi" sarudzo yakasarudzwa (mamwe mashoko):

mstsc /shadow:127

Ndokumbira utarise kuti rondedzero inongove nemashandisi ekushandisa.

Ndinodzokorora kuti pasina kodzero dze admin iwe uchawana zvinotevera:

Asi kwekutanga kugadzirisa kwechirongwa chichakurukurwa, ndakashandisa account ine kodzero dzemaneja.

II. Chirongwa

Saka chirevo chedambudziko: kugadzira imwe yakapfava graphical interface yekubatanidza kune mumvuri wemushandisi nemvumo yake, kutumira meseji kumushandisi. Nzvimbo yepurogiramu yakasarudzwa ndiRazaro.

1. Isu tinowana iyo yakazara domain runyorwa rwevashandisi "login" - "zita rakazara" kubva kune maneja, kana zvakare kuburikidza nekoni:

wmic useraccount get Name,FullName 

hapana anorambidza kunyange izvi.

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

Ini ndichataura ipapo ipapo kuti aive Razaro aive nedambudziko nekugadzirisa faira iri, sezvo nekusarudzika encoding yaro iri UCS-2, saka ndaifanira kungoishandura nemaoko kuita UTF-8. Kune akawanda ma tabo muchimiro chefaira, kana kuti nzvimbo dzakawanda, iyo yakasarudzwa kuti igadziriswe zvine hurongwa; munguva pfupi kana gare gare dambudziko reencoding rinogadziriswa, uye faira rinozogadziridzwa zvakarongeka.

Saka, pfungwa ndeyokuva nefolda inowanikwa kune vashandisi vepurogiramu, semuenzaniso c: test, umo muchava ne 2 mafaira: yekutanga ine login uye fullname, yechipiri id_rdp uye kupinda kwevashandisi. Tevere, isu tinogadzira iyi data nepese patinogona :).

Zvichakadaro, kushamwaridzana nerondedzero yezvikamu, tinoendesa izvi (login uye zita rakazara) zviri mukati kune array:

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;

Ndinokumbira ruregerero nokuda kwe "code yakawanda", pfungwa dzinotevera dzichava dzakapfupika.

2. Tichishandisa nzira imwechete kubva mundima yapfuura, tinoverenga mhedzisiro yekugadzira rondedzero muStringGrid element, ini ndichipa "yakakosha" chidimbu chekodhi:

2.1 Isu tinogashira runyorwa rwazvino rwemasesheni eRDP mufaira:

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 Gadzirisa faira (chete mitsetse yakakosha yekodhi inoratidzwa):

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. Yakananga kubatanidza pachayo nekudzvanya pamutsetse nemushandisi uye nhamba yechikamu chake:

  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. Mamwe mashongedzero akati wandei akaitwa, sekurongedza nekudzvanya paradiobutton, uye meseji kumushandisi kana vese vashandisi.

→ Yakazara sosi kodhi inogona kuoneka pano

III. Kushandisa AdminLink - zvandakaona:

AdminLink inogadzira nzira pfupi inoreva nzvimbo yekushandisa admilaunch.exe, uye kopi yega yega yekushandisa yekutanga AdmiRun.Exe iyo iri muforodha yemushandisi, semuenzaniso Vasya, mhando C:UsersvasyaWINDOWS. Kazhinji, hazvisi zvese zvakanyanya kushata: unogona kutamba uchitenderedza nekodzero dzekuwana kupfupika faira uye vamwe kujekesa yako admin hana.

Source: www.habr.com