Click on a image opens a folder

[Pinkoto]

Hello,
Can u tell me how can i make a folder from my windows7 opens when i click on a image?
thank you : )

 

[Pinkoto]

no.. i want when i click on an image |which i have put already in the fort| to open a folder from my computer

 

[BlueIshDan]

Do you want a file/folder selection dialog. Or do you want windows explorer to open at the folder's directory?

 

[Pinkoto]

i want a windows of the folder i want to open... i want to click on an image and open a window of the folder i want.

 

[BlueIshDan]

Origin of information

     Dim Foldername As String
     Foldername = "C:\Users\"

     Shell "C:\WINDOWS\explorer.exe """ & Foldername & "", vbNormalFocus

 

[Pinkoto]

thank you it works

 

[Pinkoto]

but how can i make it work for different records? what i mean is for on record i want to open one folder when i click on the image, and for another record i want to open a new folder when i click on the same image.
Can i put the folder link in a textbox so it is different for each record and then when i click on the image it takes the link from this textbox. Do you know how it can be done?

 

[BlueIshDan]

Explain to me again how your form is designed?

Do you have a continuous form with images in the records or something else?

 

[Pinkoto]

This is my form. i will put a image which when i click i want a folder to open depending on the record i am currently on. For one record i want the image to open one folder, for another image i want the image to open another folder and etc, also i want the image to be one and the same.

PS: i have uploaded an image of what my form looks like. Its not a continuous form.

 

[Pinkoto]

I have done something like this using this code

Private Sub imdbbutton_Click()
Application.FollowHyperlink Me.IMDB
End Sub

but its for a button and a hyperlink . i need to make if work for a image.
PS: Me.IMDB from the code is a text field in which i enter the hyperlink i want to open when i click on the button. But this time i need to open a folder from my computer by clicking an image.

 

[vbaInet]

     Shell "C:\WINDOWS\explorer.exe """ & Me.[COLOR="Red"]TextboxName[/COLOR] & "", vbNormalFocus

See above:

 

[Pinkoto]

thank you very much it works : )