:-[Ich bin dabei mir eine Datenbank für meine Bildersammlung zu erstellen. Darunter sind auch Pics die ich nicht selbst aufgenommen habe. z.T. sind die eingescannt, aus dem Web, von Freunden, usw. Oder es sind BMP- oder GIF-Dateien. Da ist ja nichts mit EXIF und die ExifReaderClass versagt. Aber im Win-Explorer (WIN7 Ultimate) werden mir die Abmessungen angezeigt. Gibt es eine Möglichkeit mit Access 2003 Serv.-Pack 3 diese Daten irgendwie auszulesen und in einer Tabelle zu speichern?
Schon jetzt mal vielen Dank für eine Hilfe.
Bembel
Hallo,
sieh mal hier: http://www.office-loesung.de/ftopic89707_0_0_asc.php
Gruß Andreas
Danke. Aber das hilft mir wenig. Wie macht man das ohne den FileDialog? Ich lese die Dateien rekursiv in einer "ForEach...Next"- Schleife ein. Damit werden alle Bilder, auch die in den Unterordnern, in einer Tabelle erfasst. Das können bei einem Durchlauf etliche hundert sein. Mir ist nicht ganz klar wie ich das mit msoFileDialogFilePicker hinkriege. Ist der überhaupt in Access 2003 enthalten? Wenn ich den Code richtig kapiere müßte ich da bei jedem Bild auf OK klicken.
Oder habe ich was falsch verstanden.
Aber auf jeden Fall erst einmal Danke für die Antwort.
Hallo
ZitatWie macht man das ohne den FileDialog?
indem du alles zwischen und mit den Zeilen
With Application.FileDialog(msoFileDialogFilePicker) und
End With löschst.
Den Rest must du wie auch immer geartet in deine
ForEach...Next schleife einbringen und entsprechen deiner Vorstellung aufarbeiten
Ich glaube jetzt nicht das genannter Code für alle Bildformate funktioniert. Dazu müsstest du die Bilddateien z.B. mit GDIP laden. einen Passenden Code habe ich aber leider nicht zur Hand.
:)Das ging aber flott. Die Antwort meine ich. Leider habe ich in den nächsten Tagen keine Zeit das zu versuchen. Am Wochenende werde ich mir etwas basteln und mich wieder melden. Egal ob ich was erreicht habe oder nicht.
Bis dahin
Bembel
Zitat von: Hondo am Januar 28, 2014, 14:04:30
http://www.office-loesung.de/ftopic89707_0_0_asc.php
Naja. Das Bild sollte als Bild geladen werden (LoadPicture). Wozu stellt MS Bibliotheken zur Verfügung? Das zitierte Beispiel mit rumloopen in einer Binärdatei ist Gefrickel.