Einzelnen Beitrag anzeigen

Benutzerbild von kuba
kuba

Registriert seit: 26. Mai 2006
Ort: Arnsberg
588 Beiträge
 
Delphi 11 Alexandria
 
#3

Re: Benutzer aus Dienst anmelden

  Alt 12. Sep 2009, 20:45
Hy,

und wie benutzt man das ? Wie komme ich an das usertoken ?

Habe createprocessasuser schon in Benutzung:

Delphi-Quellcode:
                            CreateProcessAsUser(
                            hUserToken,
                            nil,
                            PChar(CmdLine), // pointer to command line string
                            nil, // pointer to process security attributes
                            nil, // pointer to thread security attributes
                            True, // handle inheritance
                            0, // creation flags
                            nil, // pointer to new environment block
                            nil, // pointer to current directory name
                            SI, // STARTUPINFO
                            PI); // PROCESS_INFORMATION
Momentan erhalte ich das Usertoken aus der aktiven Session des Benutzers:

Delphi-Quellcode:
        if not f_WTSQueryUserToken(ActiveSessionID, hUserToken) then
        begin
            ShowMessage('WTSQueryUserToken error ' + SysErrorMessage(GetLastError));
            Exit;
        end;
Mein Benutzer soll aber nicht am Desktop angemeldet sein...

Ich hab auch mal CreateLogonAsUser ausprobiert, unter XP erhalte ich jedoch die Meldung "Zugriff verweigert"

kuba
Stefan Kubatzki
E=mc2
  Mit Zitat antworten Zitat