SteveL13
asked on
Endif and endwith problem
What it wrong with this code? When I try to compile I get a End With without With error.
If Me.txtCredit > 0 Then
Me.txtCredit = Me.txtCurrentRecordAmount
With RS
.FindFirst "[ID]=" & Me.txtID
If .NoMatch = True Then
.AddNew
!RecordDate = Me.txtRecordDate
!Description = Me.txtDescription
!Credit = Me.txtNewRecordAmount
End With
End If
End If
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.