Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Abfrage ob Lotus Notes bereits auf dem Terminal Server unter dem Angemeldetem User ohne Admin Rechte läuft

Tipp Entwicklung

Mitglied: bigsero

bigsero (Level 1) - Jetzt verbinden

03.06.2010, aktualisiert 17:09 Uhr, 6724 Aufrufe

Hallo Zusammen

AutoIT Script:
Der Code ProcessExist wird direct ins Script hineincompiliert

01.
; ProcessExist.exe 
02.
; ---------------- 
03.
 
04.
 
05.
If $CmdLine[0] <> 2 Then 
06.
	MsgBox(16, "", "Fehler: Ungueltige Anzahl Parameter: " & $CmdLine[0], 5) 
07.
	Exit(1) 
08.
EndIf 
09.
Dim $s_ProcessOwner 
10.
Dim $o_WMIServiceCIMv2 = ObjGet("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") 
11.
If IsObj($o_WMIServiceCIMv2) Then 
12.
	$o_ColListOfProcesses = $o_WMIServiceCIMv2.ExecQuery ("SELECT * FROM Win32_Process WHERE Name=""" & $CmdLine[1] & """") 
13.
	If $o_ColListOfProcesses.Count > 0 Then 
14.
		For $o_ObjProcess in $o_ColListOfProcesses 
15.
			$i_RC = $o_ObjProcess.GetOwner($s_ProcessOwner) 
16.
			If $i_RC Then 
17.
				MsgBox(48, "", "Warnung: Fehler" & $i_RC & " beim lesen des Process Owner von Prozess """ & $CmdLine[1] & """", 5) 
18.
				Exit(0) 
19.
			ElseIf $s_ProcessOwner = $CmdLine[2] Then 
20.
				MsgBox(16, "HelpDesk", "Beim Start von Lotus Notes ist ein Fehler aufgetreten. Wenden Sie sich bitte an den Helpdesk.", 5) 
21.
								Exit(1) 
22.
			EndIF 
23.
		Next 
24.
	Else 
25.
		Exit(0) 
26.
	EndIf 
27.
Else 
28.
	MsgBox(48, "", "Warnung: Notwendige WMI-Objektvariable konnte nicht erstellt werden.", 5) 
29.
	Exit(0) 
30.
EndIf
Aufruf:
01.
$i_RC = FileInstall("ProcessExist.exe", "ProcessExist.exe", 1) 
02.
If not $i_RC Then 
03.
	MsgBox(16, "", "Fehler: Helper-Datei ""ProcessExist.exe"" konnte nicht installiert werden.", 5) 
04.
	Exit(1) 
05.
EndIf 
06.
$i_RC = RunAsWait("Admin", "AD", "xxxxx", 0, "ProcessExist.exe nlnotes.exe " & @Username, ".", @SW_HIDE, 8) 
07.
If $i_RC Then Exit(1)
Neuester Wissensbeitrag
Microsoft

Lizenzwiederverkauf und seine Tücken

(5)

Erfahrungsbericht von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (18)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Windows Netzwerk
Windows 10 RDP geht nicht (16)

Frage von Fiasko zum Thema Windows Netzwerk ...

Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...