Here is the code....sans goto...and working. Thank you BruceG.

[/code]
If RCS_Dflt.EOF = True Or RCS_Dflt.BOF = True Then
RCS_Dflt.AddNew
RCS_Dflt.Update
End If

RCS_Dflt.MoveFirst
RCS_Dflt.Edit
RCS_Dflt!DefaultValue.Value = Information
RCS_Dflt.Update

[/code]

DerFarm