✔ In einem Dos Befehl variable einbinden

[Mr Mr Mazen]

Hallo,

ich habe folgendes Problem, ich habe einen DOS Befehl, den ich so aufrufe:

Shell "[C:\WINDOWS\system32\Shutdown.exe -s -t variable], vbnormalfocus"

Nun würde ich gerne hinter dem Dos Befehl die Variable einbinden, könnte mir jemand sagen wie das funktioniert?

danke

 

[Orakel]

Hi Mr Mazan,

Shell "[C:\WINDOWS\system32\Shutdown.exe -s -t variable], vbnormalfocus"

und wo ist jetzt das Problem?
Shell "C:\Windows\System32\Shutdown.exe -s -t " & Variable, vbNormalFocus

Gruß
Das Orakel

 

[Mr Mr Mazen]

Ja ich hab sei Jahren nciht mehr VB programmiert und alles vergessen, aber er zeigt mir trotzdem ein Systax fehler an. Hab auch schon andere möglichkeiten ausprobiert, aber der Fehler bleibt. Vielleicht noch ein paar ideen?

ansonsten schonmal danke

 

[Orakel]

Hi,

poste doch mal die Code Sequenz, und die genaue Fehlermeldung, dann können wir sicher weiter helfen.

Gruß
Das Orakel

 

[Mr Mr Mazen]

Gute Idee


also er gibt beim debugging immer aus:

Run Time Error 53

File not found

aber das verstehe ich nicht, weil die Datei da ist. Vielleicht wisst ihr ja was.

 

[Mr Mr Mazen]

Ich bin jetzt soweit, das keine Fehlermeldung mehr kommt und in der Varibalen steht auch der richtige Wert drin, aber leider wird der Befehl irgendwie nicht ausgeführt. Hier nochmal die Zeile, die nicht ausgeführt wird:

Shell "E:\WINDOWS\system32\Shutdown.exe -s -t & auswahl, vbnormalfocus"

 

[Orakel]

Jetzt noch Dein Code bitte. Wenn die Datei vorhanden ist, dann kann es nur ein Schreibfehler oder ein Syntaktischer Fehler sein.

Gruß
Das Orakel

 

[Mr Mr Mazen]

da schäm ich mich ein bißchen für, aber nun gut. Ich will ja das dieses Programm läuft:


Private Sub aktivieren_Click()
txteingabe = 0
eingabe = 0
auswahl = 0
eingabe = txteingabe
eingabe = eingabe * 60

If Option1 = True Then
auswahl = 3600
End If

If Option2 = True Then
auswahl = 7200
End If

If Option3 = True Then
auswahl = 10800
End If

If Option4 = True Then
auswahl = 14400
End If

If eingabe = 0 Then
Shell "E:\WINDOWS\system32\Shutdown.exe -s -t & eingabe, vbnormalfocus"
Else
Shell "E:\WINDOWS\system32\shutdown.exe -s -t & eingabe, vbnormalfocus"
End If

MsgBox "Der Umfang beträgt: " & auswahl & eingabe

End Sub

 

[Orakel]

Hi,

na warum nicht gleich so

Ändere mal Deinen Code in

If eingabe = 0 Then
    Shell "E:\WINDOWS\system32\Shutdown.exe -s -t" & eingabe, vbNormalFocus
Else
    Shell "E:\WINDOWS\system32\shutdown.exe -s -t" & eingabe, vbNormalFocus
End If

Siehe auch meine erste Antwort

Gruß
Das Orakel

 

[Mr Mr Mazen]

Ich bin Dir echt Dankbar, hast mir schon viel weitergeholfen, aber so leid es mir tut, funktionieren tut es trotzdem nicht. :-(