marethyu
Goto Top

VBS Problem mit Objekten

Hallo liebes Forum,

Diese Frage stelle ich auf die Gefahr hin ausgelacht zu werden, aber ich bin Neuling in Sachen VBS.
Mein Problem ist das ich mit folgendem Code eine Fehlermeldung bekomme, die mir sagt, dass in Zeile 3, erstes Zeichen der Fehler Object required: "WshShell"

Code:
WshShell = WshShell
While WshShell.AppActivate("C:\WINDOWS\system32\cmd.exe") = FALSE  
Wscript.Sleep 1000
Wend


WshShell.SendKeys "echo hallo"  
WshShell.sendkeys "{enter}"   

Ich wünsche allen eine schöne Woche.

mfg Marethyu

Content-Key: 237176

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

Printed on: April 27, 2024 at 04:04 o'clock

Member: rubberman
Solution rubberman May 05, 2014, updated at May 06, 2014 at 09:17:38 (UTC)
Goto Top
Hallo Marethyu, willkommen im Forum.

Du musst das Objekt mithilfe der CreateObject Funktion erst erstellen.
Set WshShell = CreateObject("WScript.Shell")  
Da die AppActivate Methode aber keine unterschiedlichen Rückgabewerte bei Erfolg oder Misserfolg ausgibt (zumindest nicht auf meinem Win7 und entgegen der Dokumentation im MSDN), wird dein Vorhaben nicht funktionieren.

Grüße
rubberman
Member: Marethyu
Marethyu May 06, 2014 at 09:17:13 (UTC)
Goto Top
Danke für die schnelle Antwort rubberman!

mit diesem Code funktioniert es prima auf meinem Windows XP
set WshShell = CreateObject("WScript.Shell")  
While WshShell.AppActivate("Fenstertitel") = FALSE  
Wscript.Sleep 1000
Wend


WshShell.SendKeys "echo hallo"  
WshShell.sendkeys "{enter}"   
aber Frag mich nur nicht wieso.

Ich denke ich kann diese Frage als gelöst markieren.

mfg Marethyu