In diesem Forum haben Sie die Möglichkeit Kommentare, Fragen und Verbesserungsvorschläge zu den im vb@rchiv gelisteten Tipps und Workshops zu posten. Hinweis: Ein neues Thema kann immer nur über die jeweilige Tipps & Tricks bzw. Workshop Seite eröffnet werden!

Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Tipp 2086: Anzahl Dateien und Größe im Windows Papierkorb ermitteln
Autor: thuring
Tipp anzeigenDatum: 23.06.25 11:03
Hi, ich habe versucht, die Funktion anzuwenden unter VS 2022: ' Papierkorb Größe und Anzahl Dateien ' API-Deklarationen <DllImport("shell32.dll")> Public Shared Function SHQueryRecycleBin( pszRootPath As String, ptSHQueryRBInfo As SHQUERYRBINFO) As Int32 End Function <StructLayout(LayoutKind.Sequential, Pack:=1)> Public Structure SHQUERYRBINFO Dim cbSize As Int32 Dim i64Size As Long Dim i64NumItems As Long End Structure Public Structure RBINFO Public NumItems As Long Public TotalSize As Long End Structure ' Funktion ''' <summary> ''' Ermittelt die Anzahl Dateien und deren Größe im Windows-Papierkorb ''' </summary> ''' <param name="sPath">Optional. Laufwerk, für das die Informationen ermittlet werden sollen.</param> Public Function RecycleBinInfo(Optional sPath As String = "") As RBINFO Dim RB As SHQUERYRBINFO = New SHQUERYRBINFO ' API-Funktion aufrufen RB.cbSize = Marshal.SizeOf(GetType(SHQUERYRBINFO)) Call SHQueryRecycleBin(sPath, RB) ' Rückgabewerte With RecycleBinInfo .NumItems = RB.i64NumItems .TotalSize = RB.i64Size End With End Function eter Meine Anwendung funktioniert allerdingd nicht, FEhlermeldung mit roter Linie unter rbi = RecycleBinInfo() Dim rbi As New API.RBINFO rbi = RecycleBinInfo() lblAnzD.Text = rbi.NumItems.ToString lblSizeD.Text = rbi.TotalSize.ToString Grüße - Dietrich Salzburger

Tipp 2086: Anzahl Dateien und Größe im Windows Papierkorb er...

73

thuring

23.06.25 11:03

Sie sind nicht angemeldet! Um einen neuen Beitrag schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen