Check all fields have been entered

[Sacha Rowland]

I have a database form with 280 fields on it (don't ask)
Does someone know some script I can use to check that all fields for the current record have been entered?

[Ianpbaker]

Try using The below code

private sub checkfields()

Dim myControl As Control
For Each myControl In Controls
    If TypeOf myControl Is TextBox Then
        If myControl.Value = "" Then
           'some alert code
        end if
    End If
Next
End Sub

you can change the if typeof is textbox to different controls if you have other controls than textboxes

This should sort out your problem

Good Luck
Ian

[Edited by Ianpbaker on 04-18-2000 at 05:11 PM]