Seite 1 von 1

[erledigt] Arbeitsgruppe/Workgroup ermitteln?

Verfasst: 07.12.2008 16:15
von scholly
moin, moin...

Wie kann ich die Arbeitsgruppe(Workgroup) (m)eines Rechners ermitteln?

Ich habe hier, im Archiv und im Englischen Forum gesucht, aber nix gefunden, aus dem ich ableiten kann, zu welcher Arbeitsgruppe/Workgroup (m)ein Rechner gehört.

tia...
scholly

Verfasst: 07.12.2008 16:33
von Andreas

Code: Alles auswählen

Debug GetEnvironmentVariable("USERDOMAIN")

Verfasst: 07.12.2008 16:54
von scholly
Das gibt mir die Userdomain (=Rechnernamen), aber nicht die Arbeitsgruppe wieder.

Laut Systemeigenschaften/Computername habe ich:

Vollständiger Computername: SEMPRON
Arbeitsgruppe: WARZ

"WARZ" brauch ich als Ergebnis.

Verfasst: 07.12.2008 16:59
von - chris -
http://entwickler-forum.de/archive/inde ... 27970.html

Code: Alles auswählen

pBuffer.l = 0

NetWkstaGetInfo_(0,100,@pBuffer)

Debug "Computername: " + PeekS(PeekL(pBuffer+4),-1,#PB_Unicode)
Debug "Arbeitsgruppe: " + PeekS(PeekL(pBuffer+8),-1,#PB_Unicode)

NetApiBufferFree_(pBuffer)

Verfasst: 07.12.2008 17:14
von Fluid Byte
Versuch mal das hier:

Code: Alles auswählen

Structure WKSTA_INFO_100
	wki100_platform_id.l
	wki100_computername.l
	wki100_langroup.l
	wki100_ver_major.l
	wki100_ver_minor.l
EndStructure

NetWkstaGetInfo_(0,100,@*wkgi.WKSTA_INFO_100)

Debug *wkgi\wki100_platform_id
Debug PeekS(*wkgi\wki100_computername,-1,#PB_Unicode)
Debug PeekS(*wkgi\wki100_langroup,-1,#PB_Unicode)
Debug *wkgi\wki100_ver_major
Debug *wkgi\wki100_ver_minor

Verfasst: 07.12.2008 17:21
von scholly
@chris
Yep funktionuckelt :D

Da ich auf der MSDN-Seite für NetWkstaGetInfo nirgendwo workgroup finde, frag ich mich, wo die herkommt.
Ist das die langroup?

//edit
Frage Dank Fluid Byte erledigt :lol:

:allright: an Euch beide

Verfasst: 07.12.2008 20:53
von jpd
und hier noch eine methode....

http://www.purebasic.fr/german/viewtopi ... highlight=

Ciao
jpd