Thanks for reponse;
But I wanted to validate the end of the completed form, a button.
Private Sub cmdValidation_Click()
Call valNullControl(Me)
End Sub
Hi all;
How to validation null fields in continuous forms, with this code by tag ???
Public Function valNullControl(frm As Form)
Dim ctl As Control
Dim minhaArray As String
Dim validacaoOk As Byte
validacaoOk = 0
For Each ctl In frm.Controls
If ctl.Tag <> Null Or ctl.Tag <> "" Then...
Sorry
test please:
Dim xlog As Variant
If xlog = DLookup("[Password]", "login", "[Password]='" & Me.Password & "' And [username]='" & Me.UserName & "'") Then
Hi:
Try;
form1
DoCmd.OpenForm "Vendor Details", acNormal, , , , , Nz(Me.ID,0)
form2
Private Sub Form_Open(Cancel As Integer)
If IsNull(Me.OpenArgs) Or Me.OpenArgs = 0 Then
Exit Sub
Else
Me.Filter = "ID=" & OpenArgs
Me.FilterOn = True
End If
End Sub