Hét vraag- en antwoordplatform van Nederland

Hoe kan ik in een access database linken naar een bestand?

Ik bouw een access database om de imagebestanden (bv .ISO of .daa) die ik heb makkelijk te organiseren. Nu heb ik al een hoofdtabel (en formulier) gemaakt waar je een naam, omschrijving etc kan invoeren, maar ik wil ook een link naar dat bestand. Dus, hoe kan ik een knop maken in access, die als je er op klikt een venster opent waar je het bestand kan selecteren. Het liefst met mogelijkheid om dat gelinkte bestand uit te voeren vanuit het formulier van dat bestand.

Voor de duidelijkheid, ik wil linken, niet toevoegen als bijlage. Met imagebestanden van DVD's wordt de database dan al snel te groot ;)

Verwijderde gebruiker
12 jaar geleden
1.6K

Heb je meer informatie nodig om de vraag te beantwoorden? Reageer dan hier.

Het beste antwoord

’ create an instance of the File Browser

‘sleep timer nodig vanwege office 2010 issue
dim wordDoc2
set wordDoc2=CreateObject("Word.Application")
set objShell = CreateObject("WScript.Shell")
RetCode = objShell.Run ("cmd.exe /c sleep -m 2000" , 0, true) ‘nodig t.b.v. office 2010
set objShell = nothing
on error goto 0

’———————————————-
msoFileDialogFilePicker = 1

on error goto 0
wordDoc2.Application.Visible=false
wordDoc2.WindowState = 0
on error resume next
wordDoc2.ChangeFileOpenDirectory(CurrentPath())
on error goto 0
wordDoc2.FileDialog(msoFileDialogFilePicker).Title = "Kies de iso file"
wordDoc2.FileDialog(msoFileDialogFilePicker).Filters.clear
wordDoc2.FileDialog(msoFileDialogFilePicker).Filters.Add "Kies data file","*.ISO"
wordDoc2.FileDialog(msoFileDialogFilePicker).AllowMultiSelect = False
wordDoc2.FileDialog(msoFileDialogFilePicker).Show
For Each objFile in wordDoc2.FileDialog(1).SelectedItems
GetFileName = objFile
Next

wordDoc2.quit()
set wordDoc2=nothing
(Lees meer...)
Verwijderde gebruiker
12 jaar geleden

Weet jij het beter..?

Het is niet mogelijk om je eigen vraag te beantwoorden Je mag slechts 1 keer antwoord geven op een vraag Je hebt vandaag al antwoorden gegeven. Morgen mag je opnieuw maximaal antwoorden geven.

0 / 5000
Gekozen afbeelding