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]