Uploading Images Browse button - Microsoft Access Forum


	Back to Access Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Uploading Images Browse button

Steven Lazo

4 years ago

So I have added a Browse button so that the FileDialog box pops up so I can choose an image. The code that I used for this is

Public Function PickFile() As String

Dim FO As Object
Set FO = Application.FileDialog(3)
FO.Show
PickFile = FO.SelectedItems(1)

This code uploads my picture just fine, but the only weird part is that when I decide to press cancel on the dialog box, it gives me an error message that says "Run-time error '-2147024809 (80070057)': The expression you entered has an invalid reference to the Parent Property.

Has anyone encountered this issue before?

	Steven Lazo OP @Reply 4 years ago

	Steven Lazo OP @Reply 4 years ago

	Kevin Robertson @Reply 4 years ago
At the top of the function put `On Error Resume Next`.

	Ray White @Reply 4 years ago
' Show the dialog box. If the .Show method returns True, the ' ' user picked at least one file. If the .Show method returns ' ' False, the user clicked Cancel. ' If .Show = True Then

	Ray White @Reply 4 years ago
File Dialog Tip

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Forum.

Next Unseen

New Feature: Comment Live View