---

Hallo Progammierer,
ich möchte eine Anwendung schreiben, mit der ausgewählte Dateien in den Papierkorb verschoben werden. Vermutlich brauche ich dazu den Pfad zum Papierkorb. Wie kann man den auslesen bzw. wie kann ich mein Problem anders lösen?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Fan-ME10

schau mal auf http://www.visualbasic-online.de/beispiel.htm da ist im Bereich System (oben rechts) direkt als erstes das Beispiel "Dateien in den Papierkorb löschen".

Hoff damit kommst du weiter,
Stefan

------------------
Inoffizielle Solidworks Hilfeseite
http://solidworks.cad.de
EMail: Stefan.Berlitz@solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Stefan,
vielen Dank für Deinen Hinweis. Ich hab nur noch Schwierigkeiten damit, das die Datei ohne Rückfrage in den Papierkorb verschoben wird. Mir scheint, die anliegende Datei Pkorb.txt beschreibt das nicht korrekt.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo nochmal,

am besten sagts du der Funktion dann, dass du keine Rückfragen wünscht 

Ne, im Ernst, du mußt dann den .fFlags erweitern:

Code:

---

Private Type SHFILEOPSTRUCT
  hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As Long
End Type
 
Private Declare Function SHFileOperation Lib "Shell32.dll" Alias _
"SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long

Const FO_DELETE = &H3
Const FOF_NOCONFIRMATION = &H10
Const FOF_ALLOWUNDO = &H40

Private Sub Command1_Click()
    Dim SH As SHFILEOPSTRUCT
    Dim FName As String
    'zu löschende Datei
    FName = Trim$(Text1.Text)
    With SH
      .wFunc = FO_DELETE
    .pFrom = FName
    .fFlags = FOF_ALLOWUNDO Or FOF_NOCONFIRMATION
    End With
    SHFileOperation SH

End Sub

---

Schau noch auf die Seite http://www.vbapi.com/ref/s/shfileopstruct.html , da steht sehr genau die API mit allen Parametern beschrieben (leider englisch).

Ciao,
Stefan

------------------
Inoffizielle Solidworks Hilfeseite
http://solidworks.cad.de
EMail: Stefan.Berlitz@solidworks.cad.de

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Stefan,
nach anfänglichen Schwierigkeiten (ME10 gibt Pfadnamen mit / statt mit \ aus) habe ich die Lösung. Vielen Dank für Deine Hilfe.

Übrigens wird bei FOF_NOCONFIRMATION die entsprechende Datei nicht in den Papierkorb verschoben sondern wirklich ohne Rückfrage (wie NOCONFIRMATION ja auch bedeutet) gelöscht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP