Søg
Avatar billede bondester Nybegynder
05. juni 2005 - 01:16 Der er 11 kommentarer og
1 løsning

Visning af billede ud fra link / ref

Jeg begyndte for et års tid siden at lægge alle mine DVD film i en Access database, og som I kan se på dette spørgsmål (http://www.eksperten.dk/spm/485063) brugte jeg et OLE-objekt til at indeholde et scannet billede af coveret... Det virker også meget fint, men databasen er godt nok begyndt at fylde en del ;-)

Derfor tjekkede jeg lige den anden løsning ud med blot at sætte en tekst ref ind i databasen og så lade Access hente billedet direkte fra placeringen på harddisken.

Jeg er gået ud fra http://support.microsoft.com/default.aspx?kbid=285820 og har også fået formularen til at virke, men jeg kan ikke få mine rapporter til at vise det rigtige billede... Jeg mener selv jeg har gjort præcis som der står beskrevet i KB-artiklen.. Skal dog siges at jeg er temelig noob i VBA programering.

Nogen der har en ide om hvad jeg kan have lavet forkert??


/ Cowman
Avatar billede -anders- Juniormester
05. juni 2005 - 01:30 #1
Hej cowman, brugeren stry har skrevet en god artikel om emnet http://www.eksperten.dk/artikler/197, prøv at kikke på den, jeg tror det er noget du kan bruge, også i en rapport, jeg mener denne løsning er velfungerende, og lidt mere simpel, så længe det er ren Access
Avatar billede -anders- Juniormester
05. juni 2005 - 01:35 #2
Det har altid været et problem i Access med OLE-felter i en tabel, det fylder urimeligt meget, men Access håndtere det på denne måde :o(
Avatar billede mugs Novice
05. juni 2005 - 07:15 #3
Jeg har en testdb med vejledning bygget efter samme principper som stry's artikel. Læg din e-mail så skal jeg sende den.
Avatar billede bondester Nybegynder
05. juni 2005 - 09:52 #4
God artikel som Stry har lavet der, men det fandt jeg også selv ud af... Mit problem er at få vist billedet på mine rapporter....

Jeg har oprettet de rigtige felter og bruger så nedenstående kode for at få det vist i rapporterne, men der sker intet:

Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
    Me!txtImageNote = DisplayImage(Me!ImageFrame, Me!txtImageName)
End Sub

Mugs hvis du har rapportvisning med må du gerne sende databasen til Webmaster@maboni.dk

/Cowman
Avatar billede terry Ekspert
05. juni 2005 - 10:22 #5
what type of objecty is this txtImageNote? It shoud be an image object! if it is then try setting the picture property directly in code instead of using your own function (DisplayImage)


Me.YourImage.picture = "C:SomePicture.gif"

If this works then your problem lies in your own code!
Avatar billede bondester Nybegynder
05. juni 2005 - 11:16 #6
txtImageNote is just for telling the status of the picture: "No image name specified.", "Can't find image in the specified name.", "Image found and displayed."...

I have made a test datebase with som testprctures... You can find it at http://www.maboni.dk/TEST_DB.zip

Maybe you can see the error!

/Cowman
Avatar billede mugs Novice
05. juni 2005 - 15:00 #7
Sendt.
Avatar billede mugs Novice
05. juni 2005 - 15:22 #8
Jeg har downloadet cowman's db. Når koden flyttes fra Detaljesektionen's VedUdskrivning til Vedformat viser den de billeder der hører til hver enkelt post.
Avatar billede bondester Nybegynder
05. juni 2005 - 17:44 #9
mugs det er præcis hvad jeg snakker om.... Vil lige prøve om jeg kan rette min store database til!
Avatar billede mugs Novice
06. juni 2005 - 17:07 #10
Db er modtaget, rettet og returneret.
Avatar billede bondester Nybegynder
07. juni 2005 - 19:33 #11
Perfekt nu virker rapporten som den skal.

I får lige lidt kode fra databasen:

Option Compare Database
Option Explicit

Private Sub Detaljesektion_Format(Cancel As Integer, PrintCount As Integer)
If Not IsNull(Me!felt1) Then
    Me!billede.Visible = True
    Me!billede.Picture = Me!felt1
    Me!Etiket31.Visible = False
Else
    Me!billede.Visible = False
    Me!Etiket31.Visible = True
End If
End Sub
Avatar billede mugs Novice
08. juni 2005 - 17:17 #12
Tak for point. Etiket31 er en etiket med teksten "Billede kommer senere", hvis felt1 der indeholder henvisningen til billedet er tomt.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
en word dotx fil stilles om til at blive gemt i skyen Af per2edb i Access 9 16/04/202620:11 21/04/202615:43
AI integreret i Access Af per2edb i Access 3 06/04/202610:42 06/04/202612:58
Autonummerering Af hlnviv i Access 2 06/03/202606:24 06/03/202607:48
stigende sortering på et Link felt Af hlnviv i Access 6 03/03/202613:18 04/03/202608:09
Access database udskriver ikke rammer korrekt Af Uvanga i Access 8 18/11/202500:24 18/11/202510:25
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 20:48 Bred buet skærm vs. 2 skærme Af Nanarsi i Skærme
I dag 18:07 Tilslut printer til netværk med WPS - hvis WPS slukkes på Router mistes forbindelse. Af Uvanga i Wifi
11/0521:05 Questyle M15i lydforstærker Af valby i Diverse
11/0518:27 Mærkeligt ikon på proceslinjen Af ErikHg i Windows
11/0513:54 Jeg skal have indstaleret Garmin express Af skolevej321 i Andet software
White papers
Flere white papers »