Ir al contenido


Foto

Como saber el Grupo de Trabajo (WorkGroup) ???


  • Por favor identifícate para responder
5 respuestas en este tema

#1 JandoK

JandoK

    Advanced Member

  • Moderadores
  • PipPipPip
  • 838 mensajes
  • LocationMexico

Escrito 20 enero 2009 - 10:08

Buenos dias !!!!

Solo para preguntar como se puede obtener el Nombre del Grupo de Trabajo al
que esta conectada/configurada una PC ......

salu2!!!!!!!
  • 0

#2 cHackAll

cHackAll

    Advanced Member

  • Administrador
  • 599 mensajes

Escrito 20 enero 2009 - 03:06



delphi
  1. type
  2. PWkstaInfo100 = ^TWkstaInfo100;
  3. TWkstaInfo100 = record
  4.   wki100_platform_id: Cardinal;
  5.   wki100_computername,
  6.   wki100_langroup: PWideChar;
  7.   wki100_ver_major,
  8.   wki100_ver_minor: Cardinal;
  9. end;
  10.  
  11. function NetWkstaGetInfo(server: PWideChar; level: Cardinal; bufptr: Pointer): Cardinal; stdcall; external 'netapi32.dll';
  12.  
  13. procedure TForm1.Button1Click(Sender: TObject);
  14. var Info: PWkstaInfo100;
  15. begin
  16. if NetWkstaGetInfo(nil, 100, @Info) = 0 then
  17.   ShowMessage(string(Info.wki100_langroup));
  18. end;


  • 0

#3 JandoK

JandoK

    Advanced Member

  • Moderadores
  • PipPipPip
  • 838 mensajes
  • LocationMexico

Escrito 20 enero 2009 - 05:18

chido  (y) (y) (y)

gracias....

si sirve....  :p :p

salu2!!!!!!!
  • 0

#4 egostar

egostar

    missing my father, I love my mother.

  • Administrador
  • 14.448 mensajes
  • LocationMéxico

Escrito 20 enero 2009 - 05:22

chido   (y) (y) (y)

gracias....

si sirve....  :p :p

salu2!!!!!!!


Claro que sirve, cHackAll es claro conciso y preciso :p :D

Salud OS
  • 0

#5 JandoK

JandoK

    Advanced Member

  • Moderadores
  • PipPipPip
  • 838 mensajes
  • LocationMexico

Escrito 20 enero 2009 - 06:35


chido   (y) (y) (y)

gracias....

si sirve....  :p :p

salu2!!!!!!!


Claro que sirve, cHackAll es claro conciso y precioso :p :D

Salud OS


^o| ^o| ^o|  :D :D :D

salu2!!!!!!!
  • 0

#6 eduarcol

eduarcol

    Advanced Member

  • Administrador
  • 4.483 mensajes
  • LocationVenezuela

Escrito 20 enero 2009 - 06:44

ahiiii papa, como salen al descubierto  ^o|
  • 0




IP.Board spam blocked by CleanTalk.