Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
FileSearch & *.zip Dateien anzeigen
zurück: Startparameter Extras -> Start {deaktivieren} OK weiter: SQL String aus Abfragen über Tabelle und Combobox.. Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Tutorial Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Tom2002
Der einzig Wahre Leuchtturm - Pilsum


Verfasst am:
08. Sep 2005, 13:50
Rufname:
Wohnort: Düsseldorf

FileSearch & *.zip Dateien anzeigen - FileSearch & *.zip Dateien anzeigen

Nach oben
       

Hi,

unter WindowsXP und Acc2003 bzw. 2002 werden Zip-Dateien mit folgendem Code nicht gezählt/angezeigt,
wenn die eingebaute Zip-Funktionalität in Windows XP aktiviert ist.
Code:
    Dim FS As FileSearch

    Set FS = Application.FileSearch
    With FS
        .LookIn = "D:\"
        .NewSearch
        .SearchSubFolders = False
        .Filename = "*.zip"
        .Execute
        Me!Text0 = .FoundFiles.Count
    End With
die böse dll heist: zipfldr.dll
also ggf. deaktivieren mit:
Code:
regsvr32 /u zipfldr.dll
ciao

tom

_________________
Win7, Win2008 R2, Office 2010 Prof

Wer mit Fortuna Düsseldorf groß geworden ist, der fürchtet sich auch vor Access nicht.
Die Nutzlosigkeit des Daseins anzuerkennen heisst, Fortuna-Fan zu sein.
Willi Wipp
Moderator


Verfasst am:
08. Sep 2005, 14:01
Rufname:
Wohnort: Raum Wiesbaden


Re: FileSearch & *.zip Dateien anzeigen - Re: FileSearch & *.zip Dateien anzeigen

Nach oben
       

Hi Tom2002, vielen Dank fuer die Info.

{Dieser Beitrag nimmt das Thema aus den unbeantworteten Themen heraus}
Benno61
Im Profil kannst Du frei den Rang ändern


Verfasst am:
23. Feb 2007, 21:10
Rufname:

AW: FileSearch & *.zip Dateien anzeigen - AW: FileSearch & *.zip Dateien anzeigen

Nach oben
       

Hallo,

gibt es eine Möglichkeit .zip Files zu erfassen/zählen o.ä. ohne besagte Funktionalisierung zu deaktivieren?

Auf meinem Firmen-PC darf ich soetwas nicht einfach machen. (siehe auch FileSearch Problem)

Benno
Willi Wipp
Moderator


Verfasst am:
24. Feb 2007, 01:26
Rufname:
Wohnort: Raum Wiesbaden

Re: FileSearch & *.zip Dateien anzeigen - Re: FileSearch & *.zip Dateien anzeigen

Nach oben
       

Hi Benno61,

das solltest Du z.B. mit der Funktion Dir etwa so loesen koennen
Code:
Public Function FnlngFileCount(strPath As String, strFile As String) As Long
    Dim lngCount
   
    If Dir(strPath & strFile) <> "" Then
        lngCount = 1
        Do Until Dir = ""
            lngCount = lngCount + 1
        Loop
      Else
        lngCount = 0
    End If
    FnlngFileCount = lngCount
End Function
'Test im Direktfenster
'?FnlngFileCount("C:\DeinPfad\", "*.zip")

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)


Zuletzt bearbeitet von Willi Wipp am 28. Feb 2007, 15:10, insgesamt einmal bearbeitet
Benno61
Im Profil kannst Du frei den Rang ändern


Verfasst am:
28. Feb 2007, 15:08
Rufname:


AW: FileSearch & *.zip Dateien anzeigen - AW: FileSearch & *.zip Dateien anzeigen

Nach oben
       

Vielen Dank, mit Dir funktioniert es wunderbar.
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: nur einmal anzeigen 4 bohne 675 21. Okt 2005, 16:22
bohne nur einmal anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Berechnung im Listenfeld anzeigen? 3 Schnoop 805 20. Okt 2005, 08:24
Timbo Berechnung im Listenfeld anzeigen?
Keine neuen Beiträge Access Tabellen & Abfragen: Abos die ablaufen Anzeigen lassen ? 1 reneschaub 478 04. Okt 2005, 18:56
jens05 Abos die ablaufen Anzeigen lassen ?
Keine neuen Beiträge Access Tabellen & Abfragen: Spalten mit & zusammenfügen, aber nur, wenn nicht leer 5 Keetmanshoop 1558 26. Sep 2005, 07:38
Keetmanshoop Spalten mit & zusammenfügen, aber nur, wenn nicht leer
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage in Formular anzeigen, und dann sortieren 1 christian_10 597 22. Aug 2005, 13:28
lothi Abfrage in Formular anzeigen, und dann sortieren
Keine neuen Beiträge Access Tabellen & Abfragen: gruppieren-beide texteintraege anzeigen 7 paty 1196 14. Jun 2005, 02:54
tobes gruppieren-beide texteintraege anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrageergebnis als neues Formular anzeigen 2 mila 3034 12. Apr 2005, 12:38
mila Abfrageergebnis als neues Formular anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: alle Kunden mit letzter Rechnung anzeigen 2 Dalmatinchen 1109 08. März 2005, 20:58
Dalmatinchen alle Kunden mit letzter Rechnung anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Anzeigen der Daten einer vorhandenen Tabelle in einer Abfrag 6 brauzer 830 02. Dez 2004, 13:28
brauzer Anzeigen der Daten einer vorhandenen Tabelle in einer Abfrag
Keine neuen Beiträge Access Tabellen & Abfragen: Filtern aus Kombi & Listenfeld 1 Gast 817 16. Nov 2004, 22:07
lothi Filtern aus Kombi & Listenfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage mit sum, max Wert und verhätnis summe/max anzeigen? 1 IV 2531 04. Nov 2004, 18:14
Skogafoss Abfrage mit sum, max Wert und verhätnis summe/max anzeigen?
Keine neuen Beiträge Access Tabellen & Abfragen: Anzahl der Datensätze anzeigen? 3 MichaelB 1122 19. Okt 2004, 12:45
lothi Anzahl der Datensätze anzeigen?
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel-Formeln