bestand locatie openen met de waarde van een veld

[Rene71]

het is me gelukt om met

Private Sub Knop33_Click()
Shell "explorer.exe D:\testmap\  ", 1
End Sub

dat de map, testmap op schijf D: wordt geopend

kan dit ook als je een veldnaam opgeeft

ik heb een veld TxtFilepath met bijvoorbeeld de waarde D:\DZ04044837\


als dit mogelijk is hoe doe je dat?

 

[OctaFish]

Waarom zou je dat zo willen?

 

[Rene71]

omdat er in een map meerdere mappen, tekeningen en uitslagen kunnen zitten, en ik nu iedere tekening apart invoer. en dat is niet nodig
wanneer ik een overzicht tekening opgeef en dit in de bestand Omschrijving aangeef dan weet ik dat er meerdere bestanden in die map zitten, dan wil ik met de knop direct naar die betreffende bestand locatie gaan
in cad heb ik een optie zitten die de bestand locatie opent, en ik vroeg me af of dit ook in access zou kunnen

handige optie dacht ik zo

 

[OctaFish]

Bestanden toevoegen aan een database kan veel makkelijker met een FileDialog, en bestanden openen vanuit een database kan ook veel makkelijker. Dus ik zie het voordeel nog steeds niet.

 

[Rene71]

ik wil geen bestanden openen, daar heb ik al een module voor

ik wil de bestands locatie openen

voor het toevoegen heb ik onderstaande code

Dim fDialog As Office.FileDialog
Dim sPath As Variant
Dim sPathFull As String
Dim sFileName As String

Set fDialog = Application.FileDialog(msoFileDialogFilePicker)
    With fDialog
        
        .Title = "Select One File"
        .AllowMultiSelect = False

        .Filters.Clear
        '.Filters.Add "", Me.txtExtension
        
               If .Show = True Then
            For Each sPath In .SelectedItems
                sPathFull = sPath
                sFileName = GetFilenameFromPath(sPathFull)
            Next sPath
            Me.txtFileName = sFileName
            Me.txtFilePath = Replace(sPathFull, sFileName, "")
        Else
            MsgBox "U klikte op Annuleren in het zoek venster."
        End If
    End With