petersen7913 Seniormester
11. januar 2021 - 10:37 Der er 11 kommentarer og
1 løsning

Indsætte et billede men sti og filnavn gemmes ikke

Jeg ønsker at indsætte et billede i en record og har fundet en kode, der fungerer i eksemplet.

Når jeg bruger koden kan jeg vælge billedet og som vist i koden nedenfor får jeg fat i strPath og Me.Picture. Problemet er, at værdien IKKE bliver gemt i feltet .... Jeg har prøvet at håndskrive sti/fil ind i feltet, så fungerer det som det skal.

Nogen forslag til at værdien ikke bliver gemt?????

Private Sub cmdAdd_Click()
    On Error GoTo Err_Handler
   
    Dim strPath As String
   
    ' open 'file open' dialogue and get path to selected file
    strPath = GetFilePath()
   
    If Len(strPath) > 0 Then
        Me.Picture = strPath
        Me.ctrlPicture.Visible = True
    End If
        'test for at se om sti-fil er valgt rigtigt
        MsgBox strPath
        MsgBox Me.Picture
   
Exit_here:
    Exit Sub
   
Err_Handler:
    MsgBox Err.Description, vbExclamation, "Error"
    Resume Exit_here

End Sub
terry Ekspert
11. januar 2021 - 11:28 #1
The code doesnt really help in understanding the problem. I assume the function GetFilePath() is returning the correct data and msgBox strPath and Me.Picture also show the value. But at this stage the record isnt saved, so where can you see taht the path/filename arent being saved in table?
martens Professor
11. januar 2021 - 11:29 #2
der mangler da lidt kode her...

men et bud kunne da være :

        DoCmd.RunSQL "INSERT INTO [tbl_pix]([path]) VALUES ('" & strPath & "'); "

mvh martens
martens Professor
11. januar 2021 - 11:34 #3
Ja terry har ret ...
og jeg skulle måske lige "koge" path og picture sammen til en variabel ;o) og bruge den, når der indsættes i tabellen...
terry Ekspert
11. januar 2021 - 11:35 #4
"Jeg har prøvet at håndskrive sti/fil ind i feltet, så fungerer det som det skal."
If you mean that you are entering the data directly into the field on the form, then this indicates that you need to save the record when you do it in code
terry Ekspert
11. januar 2021 - 11:37 #5
strPath I think contains path and filename
petersen7913 Seniormester
11. januar 2021 - 12:02 #6
Tak for jeres forslag. jeg prøver :)

Men det er lidt 'sjovt' for så vidt jeg kan se har jeg kopieret al koden fra det eksempel jeg fandt.
terry Ekspert
11. januar 2021 - 12:43 #7
Can I see the example please?
petersen7913 Seniormester
11. januar 2021 - 13:22 #8
Terry - er sendt og jeg takker
terry Ekspert
11. januar 2021 - 14:28 #9
The example i received works OK, I didnt reive the none-working version, so I'm guessing that the problem is that the Control Source of the Image object needs to point to the field containing the  path/filename
terry Ekspert
12. januar 2021 - 11:32 #10
Solution = #9
petersen7913 Seniormester
16. januar 2021 - 14:40 #11
Tingene skal ikke altid være så lette .... Hvis jeg prøvede at ændre feltnavne på det eksempel Terry sendte tilbage (tak) så fejlede det.... Hvis jeg byggede op helt fra bunden med de navne jeg ville have, så fungerede det. Hm ...
Men jeg fik løst problemet :)
terry Ekspert
16. januar 2021 - 14:52 #12
Good yoy got it to work
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

Opret Preview

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.

Du kan også logge ind via nedenstående tjenester





Premium
IBM sætter flere navne på topledelsen for sit nye selskab 'NewCo'
Der er blevet sat navne på flere af de aboslutte topposter i IBM's nye driftsselskab, NewCo. Ind til videre fisker IBM inden for egne rækker.
Computerworld
Trump bønfalder Helle Thorning: Giv mig min Facebook-konto tilbage
Facebooks tilsynsråd, der har Helle Thorning-Schmidt i spidsen, har modtaget en erklæring fra Donald Trump, som ønsker at få genoprettet adgangen til sin Facebook og Instagram-konto.
CIO
Har du rost din mellemleder i dag? Snart er de uddøde - og det er et tab
Computerworld mener: Mellemledere lever livet farligt: Topledelsen får konstant ideer med skiftende hold i virkeligheden, og moden går mod flade agile organisationer. Men mellemlederen er en overset hverdagens helt med et kæmpe ansvar. Her er min hyldest til den ofte latterliggjorte mellemleder.
Job & Karriere
IBM Danmark trækker tilbud om frivillige fratrædelser tilbage for stort antal ansatte: "IBM har taget røven på sine ansatte"
Som led i IBM Danmarks store fyringsrunde fik 130 ansatte grønt lys til at forlade selskabet på en frivillig fratrædelsesordning. Men nu har IBM Danmark trukket det oprindelige tilbud tilbage for størstedelen af de ansatte.
White paper
Sådan: Giv medarbejderne frit valg og øg arbejdsglæden
Mange virksomheder udleverer stadig samme smartphone, laptop eller tablet til alle medarbejderne. Det kan koste dyrt på produktivitet, effektivitet, arbejdsglæde – og reelt også medføre ressourcespild, massivt øget administration og øgede sikkerhedsrisici. Men det behøver slet ikke at koste ekstra, hvis du giver medarbejderne indflydelse på, hvilke enheder de skal arbejde på. Tværtimod kan du med en gennemtænkt choose-your-own-device-aftale stille præcis det udvalg af enheder og tilbehør til rådighed, som både lever op til medarbejdernes forventninger og virksomhedens sikkerhedskrav.