camelidae
Goto Top

Per VBS auf laufenden Prozess zugreifen?

Hallo mal wieder,

ich bin immernoch dabei ein paar Dinge per VBScript zu realisieren.
Momentan stolpere ich immer wieder darüber, dass ich nicht zuverlässig auf einen schon laufenden Prozess (sichtbar ua im Taskmanager) zugreifen kann. Wie bewerkstelligt man sowas denn am besten?
Ich habe momentan mit GetObject gearbeitet, aber das öffnet je nach Art der Ausführung trotzdem einen neuen Prozess oder eine neue Instanz. Wichtig für mich wäre aber, den schon laufenden zu beeinflussen.
(siehe auch Thread: APC UPS mit PowerChute BE 7.05 - Problem mit Skript )
Ich hoffe, es ist halbwegs verständlich, was ich meine. Ansonsten bitte fragen!

Gruß,
Camelidae

Content-Key: 140768

Url: https://administrator.de/contentid/140768

Printed on: April 23, 2024 at 17:04 o'clock

Mitglied: 76109
76109 Apr 15, 2010 at 18:00:36 (UTC)
Goto Top
Hallo Camelidae!

Folgendes Beispiel würde, falls Exel bereits geöffnet ist, die geöffnete Excel-App verwenden, ansonsten eine neue Excel-App starten.

Set Shell = WScript.CreateObject("WScript.Shell")  
Result = Shell.AppActivate("Microsoft Excel")  

If Result = True Then
    Set xExcel = GetObject(, "Excel.Application")  'Funktioniert nur mit Komma zu Begin  
Else
    Set xExcel = CreateObject("Excel.Application")  
End If

Eventuell hilf Dir das ja weiter?

Gruß Dieter
Member: Camelidae
Camelidae Apr 15, 2010 at 18:13:28 (UTC)
Goto Top
Vielen Dank für die super schnelle Antwort!

Da geht's bei mir schon weiter mit den Problemen:

Wenn ich (Program ist Platzhalter)

Set objProgram= GetObject (, "Program")  

eingebe, krieg ich folgende Fehlermeldung: ActiveX component can't create object: 'GetObject'

Gebe ich aber (vorgestern oder so rausgefunden)

Set objProgram= GetObject ("", "Program") 'Was ist eigentlich das 1. Argument, das hier leer übergeben wird?  

ein, dann läuft es zumindest auf Doppelklick.
Sobald aber von PowerChute ausgeführt (siehe anderer Thread), dann öffnet er einen neuen Prozess.
Deshalb dachte ich, ich frag mal nach, ob es da irgendeinen Trick gibt. Oder ich etwas grundsätzlich falsch mache...

Gruß,
Camelidae
Mitglied: 76109
76109 Apr 15, 2010 at 18:35:13 (UTC)
Goto Top
Hallo Camelidae!

Eine bestimmte Datei mit Pfadangabe öffnen z.B.:
Set xExcel = Getobject("C:\Test\Test.xls")  
Eine bereits geöffnete Excel-Datei verwenden (für einen laufenden Prozess muss das Komma am Anfang stehen):
Set xExcel = GetObject(, "Excel.Application")   

Wenn Dein Programm bereits läuft und Du eine Fehlermeldung bekommst, dann liegt das daran, das die Object-Bezeichnung nicht korrekt ist. Versuchs mal mit "ProgrammName.Application"

Gruß Dieter
Member: Camelidae
Camelidae Apr 15, 2010 at 18:47:42 (UTC)
Goto Top
Hallo Dieter!

Die Objektbezeichnung, so wie ich sie verwende (TheSky6.RASCOMTheSky bzw. TheSky6.RASCOMTele), müsste eigentlich ok sein. Ich hab sie so vom Hersteller mitgeteilt gekriegt.
Und mit CreateObject funktioniert sie auch einwandfrei.

Das hinzufügen von ".Application" hilft leider auch nicht weiter - es kommt weiterhin die gleiche Fehlermeldung.

Wie gesagt, wenn ich vor dem Komma ein Leerzeichen übergebe, dann läuft es interessanterweise...

Sorry, ich bin grad etwas verwirrt, warum manches wie ist...

Gruß,
Camelidae
Mitglied: 76109
76109 Apr 15, 2010 at 19:00:23 (UTC)
Goto Top
Hallo Camelidae!

Zitat von @Camelidae:
Wie gesagt, wenn ich vor dem Komma ein Leerzeichen übergebe, dann läuft es interessanterweise...
Ja, so wie es soll mit bereits laufendem Prozess? Wenn ja, ist das interessant, denn mit Excel z.B. funktionierts nur mit dem alleinstehenden Komma.

Gruß Dieter
Member: Camelidae
Camelidae Apr 15, 2010 at 19:56:43 (UTC)
Goto Top
Hallo Dieter!

Hm, vielleicht war das grad missverständlich. Also wenn ich da zwei Gänsefüßchen reinschreib mit nichts dazwischen, dann klappt's (wie oben gepostet), sonst wie gesagt die Fehlermeldung...
Und die Objektbezeichnung müsste wie gesagt auch korrekt sein.
Irgendwie mag ich das nicht, wenn Dinge sich so unlogisch verhalten :/
Hast du noch irgendeine Idee, wieso sich das alles so seltsam verhält? Und vor allem dann im Zusammenspiel mit der PowerChute-Geschichte?

Gruß,
Camelidae
Mitglied: 76109
76109 Apr 15, 2010 at 21:38:40 (UTC)
Goto Top
Hallo Camelidae!

Also, wenn's mit dem Leerstring (2xDoppelQuote) funktioniert, dann ist das von der Syntax her sogar eher korrekt. Nur bei Excel funktioniert es so leider nicht, da wird vermutlich der Parameter NULL übergeben?

Gruß Dieter
Member: Camelidae
Camelidae Apr 15, 2010 at 23:32:07 (UTC)
Goto Top
Hallo Dieter!

Ok, dann ist wenigstens das logisch.
Nicht logisch ist allerdings immernoch, dass es bei Ausführung aus PowerChute aus trotzdem einen 2. Prozess öffnet, sogar, wenn dem Service vorgegeben wird, dass es den gleichen user verwenden soll. Ich glaube fast, dass ich mich da so langsam Windows geschlagen geben muss und das nicht hinbekomme :/

Gruß,
Camelidae
Mitglied: 76109
76109 Apr 16, 2010, updated at Oct 18, 2012 at 16:41:46 (UTC)
Goto Top
Hallo Camelidae!

Zitat von @Camelidae:
Ok, dann ist wenigstens das logisch.
Nicht logisch ist allerdings immernoch, dass es bei Ausführung aus PowerChute aus trotzdem einen 2. Prozess öffnet,
Wobei wir wieder am Anfang stehen und der Zugriff auf den aktuellen Prozess doch nur ohne "" möglich ist.

Hab das mit Excel nochmal getestet und da wird mit "" auch ein 2. Prozess im Taskmanager gestartet, allerdings wird dabei keine Windowsoberfläche sichtbar. D.h. man sieht nur im Taskmanager, dass ein 2. Prozess gestartet ist. Und nur, wenn ich das Komma ohne "" verwende, dann habe ich Zugriff auf den aktuellen Prozess, der in der Windowsoberfläche auch sichtbar ist.

Dazu möchte ich noch anmerken, dass in der Excelhilfe für die GetObject-Funktion auf den aktuellen Prozess mit der Schreibform "GetObject(, "Excel.Application")" hingewiesen wird. Das ist also keine Eigenerfindung von mirface-wink

Da das aber offensichtlich bei Dir nicht funktioniert, gibt es sicherlich noch eine Möglichkeit über WMI, aber dazu bin ich im Moment auch überfragtface-sad

Gruß Dieter

PS. Dieser Beitrag könnte hilfreich sein: Per remote ein vbscript auf entferneten pc ausführen
Member: Camelidae
Camelidae Apr 22, 2010 at 01:22:06 (UTC)
Goto Top
Kurze Rückmeldung von mir:
Es lag am DCOM-Object des Programmes, auf das ich zugreifen wollte. Das musste auf 'interactive user' gestellt werden.
Da muss man auch erstmal draufkommen...

Danke nochmal!
Gruß,
Camelidae