Vraag : De EindServer van de vraag via vbscript

De beste Deskundigen,
I am de geopende zittingen proberen te vragen over lopende Vensters van een de EindServer 2008 R2 van Vensters 2008 R2.
I moeten gebruikersbenaming terugwinnen, sessionid en status.
I geen hulpmiddelen zoals quser wil gebruiken of similars, ik rechte vbscript code.
wil gebruiken voor zover ik weet ik niet dit kan bereiken gebruikend WMI.
I googled het A LOT, schijnt het wij neer aan twee opties zijn:

- EOLWTSCOM: jammer genoeg is dit bedrijf verdwenen, vond ik hun dll op een andere website maar het werkt slechts aan Vensters XP/2003
- WTSAPI: WTSAPI32.dll: Dit schijnt de manier te zijn te gaan maar: 
1:

serverhandle = wtsopenserver („servername“)

returns: De wanverhouding van het type: „WTSopenserver“ (ik denk dit betekent het die functie vond) niet. idee

Any?

Thanks vooraf,
Roberto.

Antwoord : De EindServer van de vraag via vbscript

HTH,
exx
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:

server = „MyServer“
Vastgesteld ws = CreateObject („WScript.Shell“)
Reeks oExec = ws. Exec („quser /server: “ & server)
 
	WScript.Sleep 10
Lijn tot oExec.Status = 1
Doe tot oExec.stdOut.atEndOfStream
         'neem hier code op om output te evalueren
	'oExec.StdOut.readLine zal u toestaan om tot de output toegang te hebben
         'één lijn tegelijkertijd
Lijn
Andere oplossingen  
 
programming4us programming4us