Programme als Administrator starten

Versuch mal #RequireAdmin in der ersten Programmzeile.

Edit:

Nein, du solltest natürlich, wie es in der Hilfe steht, den vollen Pfad angeben. Vielleicht liegts daran. Und vielleicht den Admin als Username setzen, nicht zwingend den aktiven!

Ja, das mit der Speicherung geht.

1. Ich baue dir dein Skript mal mit Abfrage um:

#include <AutoItConstants.au3>


$process = "" ; Prozessnamen festlegen ( voller Pfad )


$username = InputBox("Benutzername", "Bitte geben Sie den Benutzernamen für den Administratoraccount ein.", @UserName)
If $username = "" Then
	MsgBox(16, "Fehler", "Leerer Benutzername")
	Exit
EndIf


$password = InputBox("Passwort", "Bitte geben Sie das Passwort für den Administratoraccount " & $username & " ein.", "", "*")
If $password = "" Then
	MsgBox(16, "Fehler", "Leeres Passwort")
	Exit
EndIf


RunAs($username, @ComputerName, $password, 0, $process)

Sollte hoffentlich funktionieren. Den @ScriptDir flag kannst du dir eigentlich klemmen.

2. Ich bastle dir vielleicht mal - wenn du willst - ein Skript zusammen, dass du in einer INI-Datei die Passwortdaten mit Benutzeroberfläche speichern (lassen) kannst. Grund: wenn du die Zugangsdaten im Klartext in der INI hast, ist das sehr gefährlich.

LG Olfibits

Hallo mumpel

das habe ich gerade in der englischen Hilfe gefunden:

#include <AutoItConstants.au3>


Example()


Func Example()
    ; Change the username and password to the appropriate values for your system.
    Local $sUserName = "Username"
    Local $sPassword = "Password"


    ; Run Notepad with the window maximized. Notepad is run under the user previously specified.
    Local $iPID = RunAs($sUserName, @ComputerName, $sPassword, $RUN_LOGON_NOPROFILE, "notepad.exe", "", @SW_SHOWMAXIMIZED)


    ; Wait 10 seconds for the Notepad window to appear.
    WinWait("[CLASS:Notepad]", "", 10)


    ; Wait for 2 seconds.
    Sleep(2000)


    ; Close the Notepad process using the PID returned by RunAs.
    ProcessClose($iPID)
EndFunc   ;==>Example

Aktuell startest du ja das notepad mit dem aktuellen User + dem hinterlegten Password. -> möglicherweise stimmen die nicht überein

Grüsse Ru642

Hallo erst einmal,

mit

RunAs(@UserName, @ComputerName, $sPass, 1, $sProc, @ScriptDir)

Startest du ja als aktuell angemeldeter Benutzer das Programm. Entweder ist der schon Admin oder nicht.
Seit Windows 7 wird das Programm dank mit UAC-Kontolle in der Regel doch ohne Admin-Rechte gestartet.

Einfach Lösung:
Als erste Zeile

#include <AutoItConstants.au3>

Dann kannst du auch den "normalen" Run-Befehl nehmen ohne Benutzerangabe
Bei Run() solltest du immer den ganzen Pfad zum zu startenden Programm angeben.

Statt Run kannst du auch ShellExecute() nehmen. Der Befehl prüft was er bekommt und startet das zugehörige Programm.
Klingt verwirrend ...

Dem Befehl kannst du gleich die Excel-Datei mitgeben. Das ist dann als ob du einen Doppelklick auf die Excel-Datei gemacht hast
Zusammen mit #RequireAdmin hättest du als 2-zeiler alles was du willst:

#RequireAdmin
ShellExecute("C:\Ordner\Excel.xls")

Hat der ausführende Benutzer keine Adminrechte so poppt die UAC-Kontrolle auf und fragt.
Ist es nur ein normaler Benutzer geht sogar die Benutzerauswahl / Benutzername und Kennwort-Dialog auf.

Hmm, komisch. Irgendwie funktioniert das bei mir auch nur ohne den WorkingDir Parameter und anstatt 1 bei dem Profil die 0. Hab das mal abgeändert. An sich funktioniert meine Abspeicherungsform schon, aber die Verschlüsselungsfunktion macht noch Zicken. Sollte sich gleich haben...

Moin,
hier mal meine Lösung mit der Speicherung als AU3-Skripte.

Falls du auf keine Adminrechte überprüfen willst: IsAdmin()

LG
olfibits

Anhänge:
Interface.au3
Script.au3

Oh nein, zu Testzwecken war das noch falsch drin, so wärs richtig (die Funktionen _Encrypt() und _Decrypt() in beiden Skripten überschreiben):

Func _Encrypt($string)
	If $string <> "" Then
		Return _Crypt_EncryptData($string, $key, $CALG_RC4)
	Else
		Return ""
	EndIf
EndFunc


Func _Decrypt($string)
	If $string <> "" Then
		Return BinaryToString(_Crypt_DecryptData($string, $key, $CALG_RC4))
	Else
		Return ""
	EndIf
EndFunc

Und das $key = "Passwort" bitte irgendwie abändern.

Hä nein, wieso?
Ich hatte bloß einen kleinen Fehler in den Hilfsfunktionen, die für das Verschlüsseln für die INI-Datei verantwortlich sind. In dem Anhang von vorher wäre auch ein Skript mit Interface, mit dem man die Admin-Zugangsdaten speichern kann. Aufgerufen wird das mit dem anderen Skript.

neenee, das ist nur, weil es sehr riskant wäre, Benutzernamen und Passwort im Klartext abzuspeichern. Schon OK. Kannst übrigens Sonst den grünen Haken setzen.

Zitat von mumpel

Das ist übrigens unerwünscht. Hat der angemeldete Benutzer keine Adminrechte soll die Anwendung/Datei nicht aufgerufen werden. Der Benutzer soll dann auch nicht gefragt werden. Stattdessen soll eine Meldung erscheinen dass Adminrechte nicht vorhanden sind.

Wäre es nicht einfach die Excel-Datei dort abzulegen wo dann auch nur berechtigte Personen rankommen? Microsoft hat sich ganz viel Mühe mit Dateisystemberechtigungen gemacht.
Einfach in einen Ordner oder Freigabe wo nur die rankommen die auch die Datei nutzen sollen.

Klar kannst du das so machen, klingt nur umständlich um den Zugriff nur auf bestimmte Benutzer einzugrenzen.
Und wenn es mindestens Excel 2010 und das Passwort ausreichend lang ist gilt die Excel-Verschlüsselung prinzipiell als (ausreichend) sicher