Beste groep,
ik heb een rapport waar er een aantal gekoppelde foto's in Jpg formaat van +/- 800 kb tot 2500 Kb in moeten verschijnen. Nu lukt dat maar deels; een aantal foto's wordt niet geladen van de server naar de cliënt PC en andere weer wel; er zit niet echt een regelmaat in welke wel en niet worden geladen. Als ik het met individuele foto's doe lukt het prima.
De bestandslocatie wordt bijgehouden in een tabel (de TxtImageName,) de bestandslocatie van de pasfoto die in de plaats moet verschijnen als er nog geen gewone foto is genomen wordt bijgehouden in de TxtEid_foto en als er geen van beide voorhanden is verschijnt een vast "0geenfoto.jpg" Ik dacht eerst dat het een geheugenprobleem is want 175 foto's laden in een document is wel veel maar als ik dezelfde functie ombouw (zie Rpt Foto Overzicht EID.pdf) om enkel de EID's te laten zien treedt soms hetzelfde fenomeen op en verschijnen er niet genoeg EID foto's (deze zijn allemaal max 88Kb groot, dat is dus heel klein) . De bijgevoegde PDF's tonen misschien meer (bv het Rpt Foto Overzicht 1.pdf zie je duidelijk dat er foto's ontbreken terwijl de tekstvakjes wel netjes de bestandslocatie van de foto's die wel degelijk bestaan weergeven) Tevens ziet het afdrukvoorbeeld er steeds anders uit als je het rapport opnieuw opent.
Is hier een oplossing voor?
Ik gebruik volgende code hiervoor
ik heb een rapport waar er een aantal gekoppelde foto's in Jpg formaat van +/- 800 kb tot 2500 Kb in moeten verschijnen. Nu lukt dat maar deels; een aantal foto's wordt niet geladen van de server naar de cliënt PC en andere weer wel; er zit niet echt een regelmaat in welke wel en niet worden geladen. Als ik het met individuele foto's doe lukt het prima.
De bestandslocatie wordt bijgehouden in een tabel (de TxtImageName,) de bestandslocatie van de pasfoto die in de plaats moet verschijnen als er nog geen gewone foto is genomen wordt bijgehouden in de TxtEid_foto en als er geen van beide voorhanden is verschijnt een vast "0geenfoto.jpg" Ik dacht eerst dat het een geheugenprobleem is want 175 foto's laden in een document is wel veel maar als ik dezelfde functie ombouw (zie Rpt Foto Overzicht EID.pdf) om enkel de EID's te laten zien treedt soms hetzelfde fenomeen op en verschijnen er niet genoeg EID foto's (deze zijn allemaal max 88Kb groot, dat is dus heel klein) . De bijgevoegde PDF's tonen misschien meer (bv het Rpt Foto Overzicht 1.pdf zie je duidelijk dat er foto's ontbreken terwijl de tekstvakjes wel netjes de bestandslocatie van de foto's die wel degelijk bestaan weergeven) Tevens ziet het afdrukvoorbeeld er steeds anders uit als je het rapport opnieuw opent.
Is hier een oplossing voor?
Ik gebruik volgende code hiervoor
Code:
Option Compare Database
Option Explicit
Dim strImagePath1 As String
Private Sub Report_Current()
setimagepath1
End Sub
Private Sub Details_Format(Cancel As Integer, FormatCount As Integer)
setimagepath1
End Sub
Function setimagepath1()
On Error GoTo PictureNotAvailable
strImagePath1 = Me.TxtImageName
Me.ImageFrame1Foto.Picture = strImagePath1
Exit Function
PictureNotAvailable:
If (IsNull(Me.TxtEid_foto.Value)) Then
strImagePath1 = GetPath & "\fotomap\0geenfoto.jpg"
Me.ImageFrame1Foto.Picture = strImagePath1
Else
strImagePath1 = Me.TxtEid_foto
Me.ImageFrame1Foto.Picture = strImagePath1
End If
End Function
Foto's kan ik zelf wel verzorgen, als er tenminste een logica in de naamgeving zit, zoals Foto01, Foto02 enz. Dan is het simpel om een aantal foto's naar een map te kopieëren en ze te hernoemen. Dus als je een db met tabel, rapport en formulier kan aanleveren, dan kunnen we eens kijken wat er aan de hand is.
