[delphi]netbios informatie uitlezen

[THIJZEL]

Ik heb een programma gemaakt dat uit een hele lijst met hosts hier op het lokale netwerk kijkt of ze up zijn..

nu heb ik een hele lijst met machines en daarvan wil ik kijken welke user ingelogt is, dit kan ik handmatig doen met nbtstat -A hostname De output daarvan is een heleboel info over de host waain ook zijn username staat.
Nu wil ik dit automatiseren en dus met mijn progamma die user info uitlezen per host. NBTstat doet dit via netbios geloof ik en ik zou dus graag willen weten hoe hij dit doet en hoe ik dit uit kan lezen... heeft iemand hier ervaing mee of docjes over?

[Elissen]

Hoe je dat in Delphi doet weet ik zo niet, maar hiero staat wel wat info:
Naar M$ site

code:

strComputer = "RemoteComputer"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2") 
Set colComputer = objWMIService.ExecQuery _
    ("Select * from Win32_ComputerSystem")
For Each objComputer in colComputer
    Wscript.Echo objComputer.UserName
Next

Kan het wel verder uitzoeken, maar ik zit nu op school. Je moet de winmgmts (Windows Management?) type libary importeren.

[LordLarry]

Misschien vind je hier wat tussen:
http://www.wilsonc.demon.co.uk/d6lanmanutils.htm
NetQueryDisplayInformation
NetServerEnum
WNetOpenEnum + WNetEnumResource

zoek anders eens in www.tamaracka.com

[THIJZEL]

Elissen schreef op 23 september 2002 @ 13:53:
Hoe je dat in Delphi doet weet ik zo niet, maar hiero staat wel wat info:
Naar M$ site

code:

strComputer = "RemoteComputer"
Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" _
    & strComputer & "\root\cimv2") 
Set colComputer = objWMIService.ExecQuery _
    ("Select * from Win32_ComputerSystem")
For Each objComputer in colComputer
    Wscript.Echo objComputer.UserName
Next

Kan het wel verder uitzoeken, maar ik zit nu op school. Je moet de winmgmts (Windows Management?) type libary importeren.

hmz dit is vb he? hoe moet ik dit in delphi doen denk je?

[Elissen]

Type libary importeren. De rest zal in principe op hetzelfde neer komen. Importeer de TLB's van WMI eens en probeer eens wat. Als je er niet uit komt kan ik er vanavond nog wel naar kijken, maar nu zit ik achter een Windows NT4 bak ZONDER WMI. Dus ik kan nu niets.
ICT loopt hier bijna 10 jaar achter.