Hyperlinks voor map foto's probleem pad

[anak]

Ik heb een kleine database gemaakt om foto's te kunnen opzoeken.

Probleem is als ik een hyperlink toevoeg en deze in het formulier van de zoekresultaten aanklik dan laat hij via de windowsverkenner de submap zien zoals aangegeven in de hyperlink maar het lijkt een map te zijn die plots is aangemaakt in de root waar het mdb-bestand staat.

De foto's staan op een server en bedoeling is dat verschillende gebruikers deze kunnen raadplegen van op hun PC. Ik heb gelezen dat men de hyperlinkbasis moet instellen.

Mogelijk met een code maar hoe en waar moet ik deze code ingeven.

Sorry ben echt een nooby hierin

 

[Greenery80]

Hoi Anak,

zou je eventueel deze kleine db willen uploaden?

Je kunt namelijk op verschillende manieren je map bepalen. Een voorbeeld hiervan is: CurrentProject.Path. Tevens zit er een stuk code in die een map aanmaakt.
En waarschijnlijk gaat het toevoegen van de hyperlink ook niet goed, want je wilt waarschijnlijk het gehele pad + bestandsnaam opslaan, bijvoorbeeld:
c:\test\hallo\test.jpg of d:\test2\wereld\test2.jpg.

Je kunt idd op de hyperlinkbasis werken, bijvoorbeeld:

Application.FollowHyperlink ("c:\test\hallo\test.jpg")

En als de link bijvoorbeeld in een textbox staat:

Application.FollowHyperlink (Me!txtTest)

Code kun je op veel plaatsen ingeven, bijvoorbeeld een klik op het zoekresultaat of op een knop of een dubbelklik op het zoekresultaat.

Je kunt ook zelf nog een beetje onderzoek doen.
Allereerst maak een kopie van de db -> nu kan je hiermee spelen.
Bekijk de code maar eens achter "zoekresultaten", kan je doen als volgt:
-In ontwerpweergave rechtermuisklik op zoekresultaten, hier eigenschappen selecteren.
-In het eigenschappenvenster het 3e tabblad selecteren (Gebeurtenis).
-Waarschijnlijk bij de event "Bij klikken" op de ... klikken en je ziet de VBA code.

-Versneld de VBA editor openen kan met ALT + F11.

 

[anak]

Thx voor de hulp:thumb:

Wat wel juist werkt is als ik bij het toevoegen van gegevens, de hyperlink aanduid met het volledige pad. T:/..../..../..../.....jpg.

Maar als ze later de hele zooi op de server van plaats veranderen zit ik in de rats!

Dit is de code (event bij klikken) als ik in ontwerpweergave op het veld van de hyperlink klik.

Call objWSH.Run("""" & strPathToRun & """")

Private Sub Image22_Click()

End Sub
Private Sub vorigepagina_Click()
On Error GoTo Err_vorigepagina_Click


    DoCmd.Close

Exit_vorigepagina_Click:
    Exit Sub

Err_vorigepagina_Click:
    MsgBox Err.Description
    Resume Exit_vorigepagina_Click
    
End Sub

Private Sub Mapfotobestanden_BeforeUpdate(Cancel As Integer)

End Sub

Private Sub Mapfotobestanden_Click()

End Sub

 

[Greenery80]

Hoi Anak,

ik kan helaas weinig beginnen met de geplaatste code.
Er is te weinig info om iets zinnigs te kunnen zeggen.

strPathToRun wordt waarschijnlijk gevuld met CurrentProject.Path , maar nog niet met de bestandsnaam.
Ik kan niet zien waar de string gevuld wordt. Ik kan ook niet zien, waarmee je de string gevuld wilt hebben.

Dit zal nooit werken:

Call objWSH.Run("""" & strPathToRun & """")

Normaal gesproken zou je dit bijvoorbeeld als volgt moeten definiëren:

Private Sub KnopOpen_Click()
Dim objWSH As Object
Set objWSH = CreateObject("WScript.Shell")
Call objWSH.Run("""" & strPathToRun & """")
Set objWSH = Nothing
End Sub

Als ik jou was zou ik ook nog even naar deze site kijken:
Access Power
Hier staat ook een voorbeeld db waar je foto's kunt selecteren en die ze kopieert naar een bepaalde map. Kortom je foto's staan altijd op 1 locatie! In het voorbeeld is dit de directory waar de db in staat.

Maar deze locatie kan je ook zelf ingeven, bijvoorbeeld: "T:\Test\Foto\".
Als ze dan "de zooi" verplaatsen, hoef je maar 1 maal de link te veranderen.