Bei jedem Benutzer ein Dialog öffnen

[XsilentX]

Hallo zusammen.

Ich möchte ein Tool in VB schreiben, mit dem ich auf jeden angemeldeten Benutzer in einer Domäne, ein selbst gemachter Dialog öffnen kann, ohne dass der Benutzer etwas machen muss.

Kann mir jemand helfen wie ich das machen kann oder kennt jemand ein Tool mit dem das funktionieren könnte?


mfg Simon

 

[Alex F.]

es gibt mehrere Möglichkeiten

z.B. kannst du über Kommandozeilenparameter jeweils den Benutzer mitgeben und dies auswerten Bsp:

strUser= Command$

oder Du liest über die Api den angemeldeten Benutzer aus. Bsp:

Modul

Public Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Form

   Dim Puffer              As String * 256
   Dim UserName            As String
   Dim RetVal              As Long
   
    RetVal = GetUserName(Puffer, Len(Puffer))
    If RetVal <> 0 Then
        MsgBox Left$(Puffer, InStr(1, Puffer, vbNullChar) - 1)
    End If

Gruß bb

 

[XsilentX]

Danke für die Antwort.
Kannst du mir das bitte ein bisschen genauer erklären?
Leider ist VB nicht meine Sprache, aber die Grundlagen beherrsch ich.

Wie kann ich mittels dem 2. Beispiel alle angemeldeten Benutzer auflisten?
Und wie kann ich dann das Programm bei dem jeweiligen Benutzer starten?

mfg Simon

//edit:
Eine Liste mit den eingeschalteten Rechner bekomm ich jetzt.
Nun muss ich noch ein Programm auf allen diesen Rechnern mit einem Knopfdruck starten können.