AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Admin Exe unter Lokalem User starten ohne Passwortabfrage
Thema durchsuchen
Ansicht
Themen-Optionen

Admin Exe unter Lokalem User starten ohne Passwortabfrage

Ein Thema von tomkupitz · begonnen am 18. Jun 2020 · letzter Beitrag vom 22. Jun 2020
Antwort Antwort
Benutzerbild von Jasocul
Jasocul

Registriert seit: 22. Sep 2004
Ort: Delmenhorst
1.371 Beiträge
 
Delphi 11 Alexandria
 
#1

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:13
Was kann ich noch tun?
Mehr Info als "Geht nicht" würde schonmal helfen.
Was für einen Rückgabewert liefert die Funktion CreateProcessAsLogon denn?
Peter
  Mit Zitat antworten Zitat
tomkupitz

Registriert seit: 26. Jan 2011
351 Beiträge
 
Delphi 12 Athens
 
#2

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:24
Zitat:
Was für einen Rückgabewert liefert die Funktion CreateProcessAsLogon denn?
False
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.684 Beiträge
 
Delphi 5 Professional
 
#3

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:37
Zitat:
Was für einen Rückgabewert liefert die Funktion CreateProcessAsLogon denn?
False
Hast du in der Vergangenheit schon mit WinAPI-Funktionen gearbeitet? Bei so ziemlich allen steht das Folgende in den Angaben zum Rückgabewert:
Zitat:
If the function succeeds, the return value is nonzero.

If the function fails, the return value is 0 (zero). To get extended error information, call GetLastError.
(Hervorhebung von mir) jedenfalls bei denen, die Rückgabetyp Bool (oder int) haben.

Insofern würde ich mal sowas machen:
Delphi-Quellcode:
if NOT CreateProcessAsLogon('Username', 'Password', 'Project2.exe', '') then
    RaiseLastOSError;
RaiseLastOsError ruft letztlich GetLastError. Dann gibt's hoffentlich genauere Infos, woran es klemmt.

Außerdem: "Läuft als Admin" heißt exakt was? Läuft das Programm elevated, also wurde eine UAC-Abfrage bestätigt? Bei aktivierter UAC gilt: Auch wenn ein Nutzer Adminrechte hat bzw. Mitglied der Gruppe der Administratoren ist, muss ein Programm noch lange nicht mit Adminrechten laufen.

Grüße
Dalai
  Mit Zitat antworten Zitat
tomkupitz

Registriert seit: 26. Jan 2011
351 Beiträge
 
Delphi 12 Athens
 
#4

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:51
Zitat:
"Läuft als Admin" heißt exakt was?
Für Project2 ist unter Optionen "Administratorrechte aktivieren" gesetzt.

Was RaiseLastOSError zeigt siehe Anhang.
Angehängte Grafiken
Dateityp: jpg Err.jpg (31,4 KB, 28x aufgerufen)
  Mit Zitat antworten Zitat
Benutzerbild von Dalai
Dalai

Registriert seit: 9. Apr 2006
1.684 Beiträge
 
Delphi 5 Professional
 
#5

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 19:56
Wird die zweite EXE gestartet? Erscheint die UAC? Ist für den verwendeten Nutzer ein Passwort gesetzt?

Grüße
Dalai
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

Registriert seit: 10. Jun 2003
Ort: Berlin
9.960 Beiträge
 
Delphi 12 Athens
 
#6

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 20. Jun 2020, 09:36
Also bei mir funktioniert der oben gezeigte Quelltext offenbar:
Korrektes Passwort --> exe startet, falsches Passwort --> nichts passiert
Sebastian Jänicke
AppCentral
  Mit Zitat antworten Zitat
tomkupitz

Registriert seit: 26. Jan 2011
351 Beiträge
 
Delphi 12 Athens
 
#7

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 21. Jun 2020, 11:58
@jaenicke:

Bei mir eben nicht. Wie genau bist du vorgegangen? Vielleicht habe ich etwas übersehen...
  Mit Zitat antworten Zitat
Benutzerbild von Jasocul
Jasocul

Registriert seit: 22. Sep 2004
Ort: Delmenhorst
1.371 Beiträge
 
Delphi 11 Alexandria
 
#8

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:41
Zitat:
Was für einen Rückgabewert liefert die Funktion CreateProcessAsLogon denn?
False
OK, da war ich jetzt ungenau.
Was liefert denn GetLastError , wenn du das danach aufrufst?
Was der entsprechende Wert bedeutet, kannst du dann hier nachlesen
Peter
  Mit Zitat antworten Zitat
Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.691 Beiträge
 
Delphi 11 Alexandria
 
#9

AW: Admin Exe unter Lokalem User starten ohne Passwortabfrage

  Alt 19. Jun 2020, 07:27
Guten morgen, ich habe hier noch ungetestete herangehensweisen:

Code:
per shellexecute über cmd.exe, mit folgendem aufruf:
cmd /min /C "set __COMPAT_LAYER=RUNASINVOKER && start "" c:\example\app.exe"
Code:
per windows RUNAS helfer:
RUNAS /trustlevel:<TrustLevel> program

/showtrustlevels displays the trust levels that can be used
                  as arguments to /trustlevel.
/trustlevel      <Level> should be one of levels enumerated
                  in /showtrustlevels.
Code:
per windows system registrierung (so soll die app einen forcierten RUNAS wert erhalten):
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers]
"C:\\example\\app.exe"="RunAsInvoker"
Es gibt bestimmt noch mehr Arten wie man das schaffen kann, WinApi wurde ja bereits beschrieben.
Ich hoffe das es hilft, wenn ja, bitte teile uns Deine Erfahrungen mit, Danke.
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:12 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz