How to Stop ONCurrent event on form crashing when there are no records

[Moss100]

Hello, I have a form which uses the oncurrent event to set a value.

If Nz(Me.Receipt_Number) <> "" Then
    Me.txt_highlight_record_header = Me.Receipt_Number
  End If

The code works fine UNLESS there are No records in the recordset.

I want to quit the sub if there are no records so the code does not crash. I was hoping the NZ would work, but sadly not.

Thanks Mark

 

[sxschech]

Maybe you could try a dcount of the table/query and use >0 or instead of nz try

If not isnull(Me.Receipt_Number) Then

 

[dhookom]

I would try check for new record like:

If Not Me.NewRecord Then
    If Nz(Me.Receipt_Number,"")  <> "" Then
        Me.txt_highlight_record_header = Me.Receipt_Number
    End If 
End If

Duane
Hook'D on Access
MS Access MVP

 

[Andrzejek]

Moss100,
what do you get in [tt]Me.Receipt_Number[/tt] when "there are No records in the recordset"? You may be evaluating the wrong 'piece' in your IF statement...

Have fun.

---- Andy

There is a great need for a sarcasm font.

 

[Darrylles]

I'm not even sure if you can reference a bound field to check for null, if no records are brought into the form.
sxschech touched on this already.

Maybe try this:

http://www.fontstuff.com/mailbag/qaccess04.htm

ATB,

Darrylle