Hallo,

Ich versuche grad ein Programm zuschreiben mit den man bestimmte dateinen löschen kann.
Allerdings weiss ich nicht wie der Befehl zum löschen ist. KAnn mir jemand weiter helfen?

Code :

1	Kill "X:\Dateiname"

Steht übrigens auch in der MSDN drin.

hej,

ich hab hier noch eine weitere lösung...

Es ist ein wenig komplizierter, aber das macht hoffentlich nichts!

Verschieben, Kopieren und Löschen von Dateien
Das Dateisystemobjektmodell verfügt über je zwei Methoden zum Verschieben, Kopieren und Löschen von Dateien:

Methode:
Eine Datei verschieben ===>>> File.Move oder FileSystemObject.MoveFile
Eine Datei kopieren ===>>> File.Copy oder FileSystemObject.CopyFile
Eine Datei löschen ===>>> File.Delete oder FileSystemObject.DeleteFile


Beispiel
In diesem Beispiel erstellest Du eine Textdatei im Stammverzeichnis von Laufwerk C, schreibe Informationen hinein, verschiebe die Datei zu einem Verzeichnis namens \tmp, lege eine Kopie im Verzeichnis \temp an und lösche die Kopien dann aus beiden Verzeichnissen.

Um dieses Beispiel auszuführen, stelle sicher, daß es die Verzeichnisse \tmp und \temp im Stammverzeichnis von Laufwerk C gibt.

Sub Manip_Files()
Dim fso as New FileSystemObject, txtfile, fil1, fil2
Set txtfile = fso.CreateTextFile("c:\testfile.txt", True)
MsgBox "Datei wird geschrieben"
' Eine Zeile schreiben.
txtfile.Write ("Dies ist ein Test.")
' Die Datei zum Schreiben schließen.
txtfile.Close
MsgBox "Datei verschieben nach c:\tmp"
' Eine Zugriffsnummer für die Datei im Stammverzeichnis von C:\ beziehen.
Set fil1 = fso.GetFile("c:\testfile.txt")
' Die Datei in das Verzeichnis \tmp verschieben.
fil1.Move ("c:\tmp\testfile.txt")
MsgBox "Datei kopieren nach c:\temp"
' Die Datei in das Verzeichnis \temp kopieren.
fil1.Copy ("c:\temp\testfile.txt")
MsgBox "Dateien werden gelöscht"
' Zugriffsnummern für den aktuellen Speicherort der Dateien beziehen.
Set fil1 = fso.GetFile("c:\tmp\testfile.txt")
Set fil2 = fso.GetFile("c:\temp\testfile.txt")
' Die Dateien löschen.
fil1.Delete
fil2.Delete
MsgBox "Alles erledigt!"
End Sub



Ich hoffe es hilft weiter!

Gruß tYrEaL

Iiiiiiiiiiiiiiiiiiiiiiiiii
FSO, igitt.

Lass die Finger von dem Scriptscheis.
ist zu unzuverlässig, und muss immer mitgegeben werden, und langsam ists auch.

Geh lieber auf Apifunktionen, sind schneller und überall in den grundformen vorhanden.

Ähm das mit dem Kill irgendwie nicht

Original geschrieben von baminc
Ähm das mit dem Kill irgendwie nicht

Natürlich geht das, musst nur den Pfad und Dateinamen als String übergeben.
Du meinst schon "richtiges" VB oder ?

ich meine Vb 6.0

klar geht Kill.

ist ne eingebaute funktion, und wenn du VB6 hast geht das auch.

Wenn nicht, hast du eine andere vb version.

So gehts bestimmt:

My.Computer.FileSystem.DeleteFile

Gruß Luca

Zitat von lk_09

So gehts bestimmt:

My.Computer.FileSystem.DeleteFile

Gruß Luca

Soi gehts in VB6 garantiert nicht, weil das VB .Net ist, was Du hier angeführt hast.

mit
Shell ("cmd.exe /c del " & """deine Datei""")
sollte es funktionieren.
"deine Datei" erstetzt du mit dem Pfad und dem und dem Dateinamen.
alles andere auch die anführungszeichen bleiben wie sie sind.
habs auch schon in VB6.0 und in VB-Net getestet.
funktioniert einwandfrei

gruß
wasg92

Hi

In .NET gibts keinen klassenlosen "Shell"-Befehl, kann also nicht stimmen.
Und das Thema hier ist übrigens 20 Monate alt.

Gruß

Zitat von sheel

Hi

In .NET gibts keinen klassenlosen "Shell"-Befehl, kann also nicht stimmen.
Und das Thema hier ist übrigens 20 Monate alt.

Gruß

Dies hier ist ja auch das VB6-Forum, nicht das .Net-Forum, da gibt es den Shell-Befehl. Um eine Datei zu löschen, sollte man ihn jedoch nicht verwenden, denn die in VB6 eingebaute "Kill"-Funktion ist da wesentlich schneller.

Ich meinte nur die Behauptung, er hätte in VB6 und VB.NET getestet.
Das glaub ich nicht.

Alles klar, da hast Du ja sowas von recht...