Jak programowo zmienić nazwę komputera w sieci?

0

Jak w teamcie.

0

programowo?
a jak sie to robi sprzętowo? [diabel]

0

Sprzętowo można zmienić nazwę kompa np. ze 'sprzęt' na 'złom' - młotkiem ( im więkzy tym fajniejsza zabawa :> ). Programowo: poszukaj słońce w rejestrze nazwy swego kompa i po prostu zmieniaj wartość klucza, który tą nazwę trzyma.

0

zdaje się, że widziałem to na FAQ

0

Trzeba jeszcze dopowiedzieć jedno:
Jak już się zalogujesz na nazwie kompa np: Blaszak

  • by skutecznie zmienić nazwę kompa musisz go zrestetować bo inaczej nadal w sieci będziesz widziany jako "Blaszak"
0

Sorki :) mała poprawka:

  • ponownie nie reset a zalogowanie ;)
    a poniżej kodzik jak już coś:
//Odczyt nazwy kompa...
PROCEDURE TForm1.WczytajRejestr;
var
 reg         :TRegistry;
 nazwaPC :String;
Begin
 reg:= TRegistry.Create;
 try
   reg.RootKey:=HKEY_LOCAL_MACHINE;
   reg.OpenKey('System\CurrentControlSet\Control\ComputerName\ComputerName',false);
   nazwaPC:= reg.ReadString('ComputerName');
   reg.CloseKey;
 finally
   reg.Free;
 end;
End;
//Zmiana nazwy kompa...
PROCEDURE TForm1.ZapiszRejestr;
var
 reg         :TRegistry;
 nazwaPC :String;
Begin
 reg:= TRegistry.Create;
 try
   reg.RootKey:=HKEY_LOCAL_MACHINE;
   reg.OpenKey('System\CurrentControlSet\Control\ComputerName\ComputerName',false);
   reg.WriteString('ComputerName',nazwaPC);
   reg.CloseKey;
 finally
   reg.Free;
 end;
End;

1 użytkowników online, w tym zalogowanych: 0, gości: 1