Supportnet / Forum / Datenbanken
access - bild über zB kombinationsfeld anzeigen
Frage
hi.
ich möchte einen in einer tabelle gespeicherten link auf eine jpg datei in einem kombinationsfeld öffnen und das bidl, welches hinter diesem link liegt soll dann im formular angezeigt werden...
danke für hilfe...
Antwort 1 von swr
Da müßte ich wissen, was bei Dir ein "Link" ist:
ein Textfeld, in dem nur der nackte String eines Dateipfades erfasst wurde (C:\bilder\test.jpg), ein Feld vom Typ Hyperlink oder vom Typ OLE-Objekt.
Für ersteres (reiner Text) ein Beispiel, welches Du analog für die anderen Felddatentypen anwenden könntest, wenn Du den darin gespeicherten String etwas in VBA zuerst zurecht manipulierst.
Positioniere auf Deinem Formular ein BILD-Steuerelement (er will dann irgendein Bild zum Fressen haben, gib´s ihm und lösche das dann wieder raus), benne das Bild irgendwie in seiner Name-Eigenschaft, meinetwegen "Pic".
Dann "Nach Aktualisierung" des Kombifeldes:
Me!Pic.Picture = Me!DeinKombifeldname.Column(1)
column(1) hieße, die ID-Spalte ( column(0) ) ist ausgeblendet, der angezeigte Text-Link ist die Spalte 2 ( also column(1) ).
Bitte anpassen.
Dann empfiehlt es sich, das Bildsteuerelement "Beim Anzeigen" des Formulares immer auf "leer" zu setzen:
Private Sub Form_Current()
Me!Pic.Picture = ""
End Sub
Gruss
Stephan
ein Textfeld, in dem nur der nackte String eines Dateipfades erfasst wurde (C:\bilder\test.jpg), ein Feld vom Typ Hyperlink oder vom Typ OLE-Objekt.
Für ersteres (reiner Text) ein Beispiel, welches Du analog für die anderen Felddatentypen anwenden könntest, wenn Du den darin gespeicherten String etwas in VBA zuerst zurecht manipulierst.
Positioniere auf Deinem Formular ein BILD-Steuerelement (er will dann irgendein Bild zum Fressen haben, gib´s ihm und lösche das dann wieder raus), benne das Bild irgendwie in seiner Name-Eigenschaft, meinetwegen "Pic".
Dann "Nach Aktualisierung" des Kombifeldes:
Me!Pic.Picture = Me!DeinKombifeldname.Column(1)
column(1) hieße, die ID-Spalte ( column(0) ) ist ausgeblendet, der angezeigte Text-Link ist die Spalte 2 ( also column(1) ).
Bitte anpassen.
Dann empfiehlt es sich, das Bildsteuerelement "Beim Anzeigen" des Formulares immer auf "leer" zu setzen:
Private Sub Form_Current()
Me!Pic.Picture = ""
End Sub
Gruss
Stephan

