Hide Command Button if Field Is Null

[alnino]

Hi,

I have a command button on a form that the user can use to browse to a file and the user can select that file and a hyperlink to that file is stored in a txtfield for that record.

I then have a command button that a user can click to open and view the associated file.

This all works fine. BUT:

I would like the command button that allows the user to view the file to be hidden if no hyperlink was added. In other words the txtfield for the hyperlink IsNull.

Here is what I have tried with no luck:

 
Private Sub txtSelectedFile_AfterUpdate()
If (Me.[txtSelectedFile]) = IsNull Then
cmdExplore.Visible = False
Else
cmdExplore.Visible = True
End If
 
End Sub
 
 

Thank you!!!

[alnino]

msquared,

I have command button on a form that allows a user to browse to a file (doc, pdf, etc..)
The user chooses that file and a hyperlink for that file is stored in a txt field for the table

Then on the form there is a command button that allows the user to click and open the hyperlinked file.

Currently it is set up so if the hyperlink field is empty, the command button to view a file is not visible

This all works fine.

The ONLY issue is if:
The user clicks and adds the hyperlink; the “view” button is not visible until the user advances one record on the form and then goes back to the record in question.

[MMcCarthy]

Put the Form_Current command at the end of the code that adds the hyperlink to the field. It doesn't work in the AfterUpdate event because you never tab into that field so the event never triggers.

[alnino]

msquared,

I have put the Form_Current at the ned of the code to add the hyperlink... since no luck making the "View File" command button visible unless advance record and go back...umm...

Private Sub CmdBuildingAdd_Click()
 
Me!txtSelectedFile = BrowseFiles()
   variable = Me!txtSelectedFile
 
Form_Current 
 
End Sub
 

[TheSmileyCoder]

While what you have posted will certainly work, it might clutter up things latter if you wish to add other code to your Form_Current that you might not like running after uses adds his hyperlink.

Instead add a procedure to your form:

Private Sub setLinkVis()
    If Nz(Me!txtSelectedFile, "") = "" Then 
        Me!cmdExplore.Visible = False 
    Else 
        Me!cmdExplore.Visible = True 
    End If 
End Sub

Then change your code to:

Private Sub CmdBuildingAdd_Click() 
 
Me!txtSelectedFile = BrowseFiles() 
   variable = Me!txtSelectedFile 
   call setLinkVis
 
End Sub 

And in your Form_Current:

Private Sub Form_Current() 
   call setLinkVis
End Sub 

[alnino]

TheSmileyOne,

That did it. THANKS!!!