Versteckte Dateien löschen

Alle Fragen zur Programmierung, die nicht in die speziellen Themen passen
Antworten
roemi
Site Admin
Beiträge: 423
Registriert: So 11. Dez 2005, 20:05
Wohnort: Hanau / Germany
Kontaktdaten:

Versteckte Dateien löschen

Beitrag von roemi » Mo 11. Feb 2019, 20:00

Mal wieder fehlen Grundlagen (bei mir).
Ich finde keinen Weg versteckte Dateien zu löschen.
For Each v_file In RDir(folder, "*.*") und For Each v_file In RDir(folder, "*") löschen alles nur keine ".xyz" :(

Vermutlich wieder nur ein Punkt ... irgendwo ... aber ".*" bringt es nicht :wink:

Danke für Eure Hilfe.
Römi (seit 1989 bekennender Bergradfahrer und professioneller Biertrinker)
http://www.roemi.de

Benutzeravatar
cogier
Foriker
Beiträge: 27
Registriert: Do 19. Jul 2018, 16:18
Wohnort: Guernsey, Channel Islands
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von cogier » Di 12. Feb 2019, 17:32

Schauen Sie sich das Video unten an.

http://www.cogier.com/video/FileDelete.webm

Code: Alles auswählen

Public Sub Form_Open()
Dim sFolder As String = User.Home &/ "test"

For Each sFile As String In Dir(sFolder)
  If sFile Begins "." Then Kill sFolder &/ sFile
Next

End

roemi
Site Admin
Beiträge: 423
Registriert: So 11. Dez 2005, 20:05
Wohnort: Hanau / Germany
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von roemi » Di 12. Feb 2019, 18:56

Hallo und Danke,

"Try Kill folder &/ v_file" ist doch eigentlich nur die Kurzform von
"v_file2 = folder & "/" & v_file
Try Kill v_file2" ?
Das letztere funktionierte bei mir NICHT. Deine Schreibweise funktioniert.
Wo ist aber der Unterschied?
Römi (seit 1989 bekennender Bergradfahrer und professioneller Biertrinker)
http://www.roemi.de

Benutzeravatar
cogier
Foriker
Beiträge: 27
Registriert: Do 19. Jul 2018, 16:18
Wohnort: Guernsey, Channel Islands
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von cogier » Mi 13. Feb 2019, 12:04

For Each v_file In RDir(folder, "*.*")
Versuchen Sie diesen Code

Code: Alles auswählen

For Each v_file In RDir(folder, ".*")
For Each v_file In RDir(folder, "*")
Versuchen Sie diesen Code

Code: Alles auswählen

For Each v_file In RDir(folder)
v_file2 = folder & "/" & v_file
Versuchen Sie diesen Code

Code: Alles auswählen

v_file2 = folder &/ v_file

roemi
Site Admin
Beiträge: 423
Registriert: So 11. Dez 2005, 20:05
Wohnort: Hanau / Germany
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von roemi » Mi 13. Feb 2019, 12:29

Öhhh ... Du hattest mir doch bereits dankenswerterweise geholfen.
Dein Vorschlag klappt doch auch.
Ich hatte nur die Hoffnung du kannst was zum Unterschied der beiden, für mich augenscheinlich gleichen, Anweisungen sagen.
Römi (seit 1989 bekennender Bergradfahrer und professioneller Biertrinker)
http://www.roemi.de

Benutzeravatar
cogier
Foriker
Beiträge: 27
Registriert: Do 19. Jul 2018, 16:18
Wohnort: Guernsey, Channel Islands
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von cogier » Mi 13. Feb 2019, 18:21

Die Unterschiede sind: -
1/. Nicht *. * aber . *
2/. nicht (folder, "*"), aber (folder)
3/. nicht & "/" & aber &/

Hilft das?

roemi
Site Admin
Beiträge: 423
Registriert: So 11. Dez 2005, 20:05
Wohnort: Hanau / Germany
Kontaktdaten:

Re: Versteckte Dateien löschen

Beitrag von roemi » Mi 13. Feb 2019, 18:28

Jepp!!

Danke Dir.
Römi (seit 1989 bekennender Bergradfahrer und professioneller Biertrinker)
http://www.roemi.de

Antworten

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 6 Gäste