Hollis, Virginia
hollisvj at pgdp.usec.com
Wed Nov 18 11:50:30 CST 2009
This gives me an error. I think because I have the text fields '''' messed up. If Not IsNull(ItemName) And Not IsNull(ItemDesc) Then If DCount("ItemName", "tbl_ItemMain", "ItemName = '" & [ItemName] & "'and "ItemDesc = '" & [ItemDesc]) > 0 Then MsgBox "You have entered a ItemName and ItemDesc that already exists" ItemName.SetFocus ItemName.Undo End If End If