Elsverheyen
Gebruiker
- Lid geworden
- 28 jan 2016
- Berichten
- 53
Hey, ik weet dat deze vraag al vaker gesteld is maar mijn programmeerkennis is 0. Dus deze vraag is om meer duidelijkheid hoe ik het juist moet doen.
Ik heb de link gevolg naar https://support.microsoft.com/nl-nl/help/285820 daar staat een ganse code die moet opgeslagen worden als een module maar zo ver ben ik niet mee. Ik had op you-tube iets gevonden dat simpeler leek maar als er geen foto's in de tabel staan geeft het een error. Nog wat verder gezocht en een voorbeeld gevonden op https://www.pc-helpforum.be/topic/50470-fotos-linken-aan-access-2010/ (een zip bestandje)
Ik heb in mijn tabel 4 lijntjes gemaakt met afbeelding1 - text zo tot afbeelding4 - text
Dan heb ik in mijn formulier 4 bestuuringselementen afbeelding geplaats met de namen foto1 tot foto4
Dan heb ik in de eigenschappen van het formulier, bij gebeurtenissen; bij aanwijzen de volgende code gezet:
foto1.Picture = afbeelding1
foto2.Picture = afbeelding2
foto3.Picture = afbeelding3
foto4.Picture = afbeelding4
Het probleem is als er geen foto ingegeven is, en ik krijg ook maar 1 foto per record
ik had iets gevonden in het laatste voorbeeld maar ik krijg dat niet aangepast naar mijn situatie
Private Sub Form_Current()
On Error GoTo foutje
AfbeeldingFilm.Picture = CurrentProject.Path & "\FotosFilm" & fotonaam
Exit Sub
foutje:
AfbeeldingFilm.Picture = CurrentProject.Path & "\FotosFilm\GeenAfbeelding.png"
End Sub
Is mijn uitleg nog te volgen? Het is waarschijnlijk een te simpele oplossing...
Ik heb nog iets gevonden op http://home.hccnet.nl/bp.bergsma/ afb.exe maar ook van dit weet ik niet juist hoe het te gebruiken en wat het juist doet
Al vast bedankt
Els
Ik heb de link gevolg naar https://support.microsoft.com/nl-nl/help/285820 daar staat een ganse code die moet opgeslagen worden als een module maar zo ver ben ik niet mee. Ik had op you-tube iets gevonden dat simpeler leek maar als er geen foto's in de tabel staan geeft het een error. Nog wat verder gezocht en een voorbeeld gevonden op https://www.pc-helpforum.be/topic/50470-fotos-linken-aan-access-2010/ (een zip bestandje)
Ik heb in mijn tabel 4 lijntjes gemaakt met afbeelding1 - text zo tot afbeelding4 - text
Dan heb ik in mijn formulier 4 bestuuringselementen afbeelding geplaats met de namen foto1 tot foto4
Dan heb ik in de eigenschappen van het formulier, bij gebeurtenissen; bij aanwijzen de volgende code gezet:
foto1.Picture = afbeelding1
foto2.Picture = afbeelding2
foto3.Picture = afbeelding3
foto4.Picture = afbeelding4
Het probleem is als er geen foto ingegeven is, en ik krijg ook maar 1 foto per record
ik had iets gevonden in het laatste voorbeeld maar ik krijg dat niet aangepast naar mijn situatie
Private Sub Form_Current()
On Error GoTo foutje
AfbeeldingFilm.Picture = CurrentProject.Path & "\FotosFilm" & fotonaam
Exit Sub
foutje:
AfbeeldingFilm.Picture = CurrentProject.Path & "\FotosFilm\GeenAfbeelding.png"
End Sub
Is mijn uitleg nog te volgen? Het is waarschijnlijk een te simpele oplossing...
Ik heb nog iets gevonden op http://home.hccnet.nl/bp.bergsma/ afb.exe maar ook van dit weet ik niet juist hoe het te gebruiken en wat het juist doet
Al vast bedankt
Els
Laatst bewerkt: