CMD Befehle für VB ?

hallo,

ist es möglich mit VB durch klicken eines Buttons ein CMD befehl auszufüren?

Was sol dieser befehl können: Der CMD befehl währe
„DEL *.Log“

und.

„CD NCDFiles\
DEL *.pre“

Währen also 2 Befehle á 2 Buttons

Also die Beiden Datei Typen sind im Selben Ordner (Auser die *.Pre Datein die sind in Ordner NCDFilles [Der Code {„CD NCDFiles\
DEL *.pre“} führt zu den ordner])

der erste button sol den Ersten Befehl aus Führen der 2. den 2ten

ich habe gelesen das es mit Shell("cmd /c " & Chr(34) & „CMD Befehl“ & Chr(34)) gehen soll nur führt er nix beim drauf klicken aus!

Warum nicht VB Kommandos?
Hallo Namenloser,

für solche Dinge benutze ich in VBA immer die Befehle ChDir, Dir und Kill. Ich vermute stark, dass es die in VB auch gibt.
In das Klick-Event des ersten Buttons könntest du z.B. schreiben:

Dim str\_d As String
str\_d = Dir("\*.log")
Do Until str\_d = ""
 Kill str\_d
 str\_d = Dir
Loop

Und das Klick-Event des 2 Buttons könnte so aussehen:

Dim str\_d
ChDir "NCDFiles"
str\_d = Dir("\*.pre")
Do Until str\_d = ""
 Kill str\_d
 str\_d = Dir
Loop

Eventuell musst du mit dem ChDir noch ein bisschen spielen, je nachdem von wo du dein Programm startest.
Ich denke aber, so ähnlcih müsste es gehen, ohne Shells und CMDs.

Gruß, Andreas

danke funktioniert aber was muss ich verändern wenn ein dritter Button beides gleichzeitig machen soll?

also die *.Log und im Ordner NCDFilles/*.Pre löschen

wenn ich beides einfüge kommt:

Fehler: Die lokale Variable „str_d“ ist bereits im aktuellen Block deklariert.

danke schon mal im Voraus ;D

Hallo immernoch-namenloser,

dann baust du eben beides zusammen und tust es in das klick-event des dritten Buttons. Das sieht dann so aus:

Dim str\_d As String
str\_d = Dir("\*.log")
Do Until str\_d = ""
 Kill str\_d
 str\_d = Dir
Loop
ChDir "NCDFiles"
str\_d = Dir("\*.pre")
Do Until str\_d = ""
 Kill str\_d
 str\_d = Dir
Loop

Eigentlich hättest du da auch selber drauf kommen können. Die Fehlermeldung hat dir doch gesagt, was zu viel ist: Das 2. „Dim str_d As String“

Gruß, Andreas

DANKE ^^

hätte wirklich selber drauf kommen, aber ich wollte nichts falsch machen darum dachte ich lieber nachfragen bevor noch was schief geht ;D

danke dir