Leerzeichen im VB Script Einstellungen

[Conny]

Hallo,
ich schon wieder
Nächstes Problem:

Wie kann man einem VB Script klar machen Leerzeichen 'mitzulesen' ?

Beispiel 1:

set)
WSHShell.Run "C:ProgrammeInternet ExplorerIEXPLORE.EXE", vbTrue

Wird nicht richtig gelesen, weil zwischen Internet und Explorer ein leerzeichen steht, die folge ist eine Fehlermeldung.

Beispiel 2:

set)
WSHShell.Run "C:ProgrammeInternet_ExplorerIEXPLORE.EXE", vbTrue

Jetzt -mit Unterstrich- ginge es, aber dann muß ich auf'm Rechner ALLE Pfade zum IE abändern! :cry:

Kann man also dem Pfad etwas voran stellen, damit vorhandene Leerzeichen im Pfad nicht zum abbruch führen?

Danke schon mal,
Conny

[Conny]

Hallo Guido,
um 'Anwendung schließen' aufzurufen nimmt man 'strg' + 'Alt' + 'Entf'

Wäre in VBS:

QUELLTEXT

WshShell.Sendkeys "^(%{DEL})"

oder

QUELLTEXT

WshShell.Sendkeys "(^%{DEL})"

Klappt aber nicht! :cry:
Fehlt da noch was?
Bei der richtige Abgabe von 'Sendkeys' müßte dann doch das Fenster 'Anwendung schließen' aufgehen oder?

Mein Ziel ist es, über diesen (Um)weg erst 'Anwendung schließen' aufzurufen, dann durch Buchstabe das betreffende Programm auszuwählen, dann durch 'Alt' + Buchstabe das Programm zu schließen...

Code bis jetzt:

QUELLTEXT

'Diverse Programme schließen



Option Explicit



' Variablen deklarieren

Dim intDoIt

Dim L_Ending_MsgBox_Message_Text

Dim L_Ending_MsgBox_Title_Text

Dim Sleep

Dim WshShell



'Substring: für Boxentext, Boxentitel und Abbruch

Sub Ending()



   intDoIt =  MsgBox(L_Ending_MsgBox_Message_Text,    _

                    vbOKCancel + vbQuestion,       _

                     L_Ending_MsgBox_Title_Text )

 If intDoIt = vbCancel Then

           WScript.Quit

       End If



End Sub





' Programm ablauf, Box, Zuweisen der Variablen

L_Ending_MsgBox_Message_Text   = "Sollen die Laufenden Programme," & chr(13) & "" & chr(13) & "beendet werden?"

L_Ending_MsgBox_Title_Text     = "Programme Schließen"

Call Ending()



'Object erstellen

Set WshShell = WScript.CreateObject("WScript.Shell")



'Tastenanschlägen und Pausen

WshShell.Sendkeys "^(%{DEL})"

WScript.Sleep 500

WshShell.Sendkeys "D"

WScript.Sleep 500

WshShell.Sendkeys "%T"



'Dieser Vorgang durch Schleife(??) für weitere Programme wiederholen...





' ***************Ende******

cu
Conny