1.6k Aufrufe
Gefragt in Datenbanken von
Hallo an alle,

Ich möchte aus Access 2000 in VBA den PhotoEditor mit einem zugewiesenen Bild öffnen.
Der Pfad zum PhotoEditor und der Pfad zum *.jpg-Bild werden einer "Shell-Funktion" zugewiesen.
Das Problem: Es wird NUR der PhotoEditor geöffnet aber kein Bild angezeigt.
(Wenn ich z.B. mit Shell Word + Pfad zu einem Word-Dokument öffne funktioniert alles.)
Wo kann die Ursache liegen???

BS = Win Vista + Access 2000.

Mit freundlichen Grüßen
spaceman

4 Antworten

0 Punkte
Beantwortet von rahi Experte (1.5k Punkte)
Hallo spacemann,

Wie wäre es denn mit einem bißchen Code und Beispieldaten...

Gruß Ralf
0 Punkte
Beantwortet von
Hallo Ralf,

danke für die schnelle Reaktion.
Hab den Fehler aber schon gefunden. Der Pfad zu den Bilddateien hatte ein Leerzeichen. Darum wollte Access vor und hinter den String ein zusätzliches Anführungszeichen. Hab ich mit " & Chr(34)" gelöst. Jetzt funktioniert alles.

Komischerweise sind im Pfad zum Photo Editor auch Leerzeichen, da will Access aber keine zusätzlichen Anführungszeichen?!

Trotzdem vielen Dank! Das nächste Mal melde ich mich ausführlicher zum Problem.

Gruß spaceman
0 Punkte
Beantwortet von rahi Experte (1.5k Punkte)
Hallo spaceman,

Der Paramter für den Programmpfad kann nur diesen enthalten. Der zweite Parameter kann
eine Liste von pfadangaben enthalten, die durch Leerzeichen getrennt sind enthalten. Du
kannst die Pfadangaben auch in Anführungszeichen einschließen, das ist u.U. einfacher
alschr(34). Denke daran in eiem Access-String müssen Anführungszeichen gedooppelt werden.
Ein Zipp: Im Commandprompt kann man solche Aufrufe prima ausprobieren. Wenn es dort
klappt, dann auch in Access.

Gruß Ralf
0 Punkte
Beantwortet von
Hallo Ralf,

der ursprüngliche, stark vereinfachte und gekürzte Code sah so aus:

----------

PhotoEditor = "C:\Program Files\Common Files\microsoft shared\PhotoEd\PHOTOED.EXE"
Pfad = "E:\Alle Access\Bilder\Bild1.jpg"

Call Shell(PhotoEditor & " " & Pfad, 1)

-------
Hier öffnete sich nur der Photo Editor OHNE Bild.
Erst nach Änderung der Zeile:

Pfad = Chr(34) & "E:\Alle Access\Bilder\Bild1.jpg" & Chr(34)

wurde alles korrekt angezeigt.

Gruß spaceman
...