Change signatures in report according to author

[Bradon]

I have two names that have signatures for a report and the signatures are .jpg images that are OLEunbound 119 and OLEunbound120.

The code I have used unsuccessfully is:

Private Sub author_AfterUpdate()
If Me.author = "Peter Hills" Then
Me.OLEUnbound119.Visible = True
Else
Me.OLEUnbound120.Visible = False
If Me.author = "John Pierce" Then
Me.OLEUnbound120.Visible = False
Else
Me.OLEUnbound119.Visible = True
End If
End If

End Sub


Wher have I gone wrong, or any suggestions of another method?

 

[Cbrine]

Bradon,
Have you thought about using the NT login ID as the value to assign the signiture with? Something along these lines.

Dim User as String

User = Environ("UserName")
Select Case User
Case "PHills"
   Me.Oleunbound119.visible =True
   Me.oleunbound120.visible = False
Case
   Me.oleunbound120.visible = True
   me.oleunbound119.visible = false
Case Else
    Me.oleunbound119.visible = True
    Me.oleunbound120.visible = False
End Select

HTH
Cal

 

[Bradon]

Hi Cal,

Thanks for the suggestion of using the NT login name. Unfortunately, the person using the report wouldn't automatically be the signature required.

The field [Author] will always contain the correct name.

I must admit I am totally lost on this one.

Gordon