O le faʻafitauli i le taimi o le karantina o le atinaʻe na avea ma mea nei: e matua manaʻomia lava le faʻaitiitia o le numera o asiasiga i ofisa e tagata tomai faapitoa e tautua ma feutagai i luga o polokalama faakomepiuta, ma le tautala saʻo, e masani ona faʻaleagaina e tagata faʻaoga le fesoasoani a tagata tomai faapitoa e aunoa ma le manaʻo e suʻesuʻe i totonu. o le mataupu lava ia, latou te fai mai "o le a latou o mai - latou te fesoasoani - latou te faia, ae o le a ou ulaula / inu kofe, ma isi." Fa'atalanoaga i le telefoni pe a fa'asoa se 'au'aunaga e sili atu ona aoga pe a e va'ai i le mata mamao.
Ina ua maeʻa le "mea fou" o la matou uila, o faʻamatalaga lelei i le autu o le tusiga na faʻaalia: poʻo poʻo . O ia mea uma e aofia ai le faʻaogaina o se faʻamafanafanaga, e oʻo lava i elemene o se talanoaga faigofie.
O faʻamatalaga uma o loʻo i lalo e faʻamoemoe mo i latou e tolerates perversions le masani ai ina ia maua le taunuuga e manaʻomia, fatuina o auala le manaʻomia.
Ina ia aua nei "toso le pusi i le siʻusiʻu", o le a ou amata i le mea mulimuli: o le uila e aoga mo le averesi tagata faʻaaoga le aoga. , e faafetai ai i lona tusitala.
I. Console ma ata lafoia RDP.
Talu mai le faʻaaogaina ma aia tatau a le pule o le Server Manager console -> QuickSessionCollection -> e ala i le kilikiina o le sauniga a le tagata e fiafia i ai, filifili Ata mai le lisi autu mo tagata faigaluega e fa'atonuina le fa'aogaina o le polokalame, e le o se filifiliga, o se isi "fafie" auala na mafaufauina, e pei o:
1. Su'e le RDP id o le sauniga:
query user | findstr Administratorpo'o:
qwinsta | findstr Administrator E le gata i lea"| findstr Pule"Sa na o le faigofie pe a e iloa le mea tonu pule e te manaʻomia, pe faʻaaoga naʻo le vaega muamua e vaʻai ai tagata uma e saini i totonu o le server.
2. Faʻafesoʻotaʻi i lenei vasega, pe a fai i totonu o le vaega faiga faavae vaega O le "Fa'atonu tulafono fa'atonutonu mamao mo fa'aoga vasega o Au'aunaga Papama'i Mamao" e filifilia ma le itiiti ifo i le "Va'ai fa'atasi ma le fa'atagaga a tagata fa'aoga" ua filifilia ():
mstsc /shadow:127Faamolemole ia matau o le lisi o le a na'o tagata e ulufale i totonu.
Ou te toe fai atu a aunoa ma aia tatau e te mauaina mea nei:
Ae mo le muamua debugging o le polokalame o le a talanoaina, sa ou faaaogaina se tala ma aia tatau pule.
II. Polokalama
O lea la o le faʻamatalaga faʻafitauli: fatuina o se faʻataʻitaʻiga faʻataʻitaʻi faigofie e faʻafesoʻotaʻi i le paolo o le tagata faʻaoga ma lana faʻatagaga, auina atu se feʻau i le tagata faʻaoga. O le siosiomaga polokalame ua filifilia o Lasalo.
1. Matou te maua le lisi atoa o tagata faʻaoga "login" - "igoa atoa" mai le pule, pe toe ala i le faʻamafanafanaga:
wmic useraccount get Name,FullName e leai se tasi na te fa'asaina lenei mea:
wmic useraccount get Name,FullName > c:testusername.txtO le a ou fai atu i le taimi lava lena o Lasalo na i ai se faʻafitauli i le gaosiga o lenei faila, talu ai e le mafai ona faʻaogaina le UCS-2, o lea e tatau ai ona ou faʻaliliu ma le lima ile UTF-8 masani. O loʻo i ai le tele o laupepa i totonu o le faila faila, poʻo le tele o avanoa, lea na filifili e faʻagasolo polokalame; i se taimi mulimuli ane, o le a foia le faʻafitauli o le encoding, ma o le faila o le a faʻafouina polokalame.
O lea la, o le manatu o le i ai o se faila e mafai ona maua e tagata faʻaoga o le polokalame, mo se faʻataʻitaʻiga c: suʻega, lea o le ai ai 2 faila: o le muamua ma le saini ma le igoa atoa, le lona lua ma le id_rdp ma le saini o tagata faʻaoga. O le isi, matou te fa'agasolo nei fa'amaumauga i le mea sili matou te mafaia :).
I le taimi nei, ina ia faʻafesoʻotaʻi ma le lisi o vasega, matou te tuʻuina atu lenei mea (faʻaoga ma igoa atoa) i totonu o se laina:
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;Ou te faatoese atu mo le "tele code", o manatu nei o le a sili atu ona manino.
2. I le faʻaaogaina o le auala lava e tasi mai le parakalafa muamua, matou te faitau i le taunuuga o le faagasologa o le lisi i le elemene StringGrid, aʻo ou tuʻuina atu se "taua" fasi code:
2.1 Matou te mauaina le lisi o loʻo iai nei RDP i se faila:
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 Fa'agasolo le faila (na'o laina iloga o fa'ailoga o lo'o fa'aalia):
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. Fa'asa'o feso'ota'iga lava ia e ala i le kilikiina o le laina ma le tagata fa'aoga ma lana numera o le vasega:
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. Ua faia nisi teuteuga e lua, e pei o le faavasegaina e ala i le kiliki i luga o le leitio, ma savali i le tagata faaaoga po o tagata uma e faaaogaina.
→ E mafai ona vaʻaia le faʻailoga atoa
III. Faʻaaogaina AdminLink - mea na ou vaʻaia:
AdminLink e faia se ala pupuu e faʻasino i le nofoaga o le aoga admilaunch.exe, ma se kopi patino o le aoga faʻalauiloa AdmiRun.Exe lea o lo'o i totonu o le faila a le tagata fa'aoga, mo se fa'ata'ita'iga vasya, ituaiga C:UsvasyaWINDOWS. I se tulaga lautele, e le o mea uma e leaga tele: e mafai ona e taʻalo faʻatasi ma aia tatau avanoa i le faila alalaupapa ma isi e faʻamama ai lou lava mafaufau pulea.
puna: www.habr.com