TryingMyBest
Registered User.
- Local time
- Today, 15:04
- Joined
- Nov 18, 2004
- Messages
- 54
Hi there
,
I have written this code to check for an entry in my table and return an error if the entry already exists....this works for the first entry in each case but not for subsequent entries.....why?
I've highlighted the bit of the code that I think is a problem.
My table is as follows:
TBLAuditRecords
Ref (autonumber)
AuditNumber
ProcessName
I need to be able to add many processes to one audit without duplicating the processes for each audit.....for example
This is ok:
AuditNumber ProcessName
1 Incident Management
1 Problem Management
2 Incident Management
2 Problem Management
This isn't:
AuditNumber ProcessName
1 Incident Management
1 Problem Management
1 Incident Management
1 Problem Management
Any help/guidance as to a better way to do this is much appreciated.
Thanks
Jo

I have written this code to check for an entry in my table and return an error if the entry already exists....this works for the first entry in each case but not for subsequent entries.....why?
Code:
Private Sub cmdAddToAudit_Click()
If IsNull(Me.txtAuditNumber) Then
MsgBox "You must choose an audit", vbOKOnly, "Error"
[COLOR=Red]ElseIf Me.cboProcessName.Value = DLookup("[ProcessName]", "TBLAuditRecords", "[AuditNumber]=[Forms]![frmAuditProgrammePlanning]![txtAuditNumber]") Then
MsgBox "You have already added this process to this audit", vbOKOnly, "Error"[/COLOR]
Else
DoCmd.RunSQL "INSERT INTO TBLAuditRecords (AuditNumber, ProcessName) VALUES ([Forms]![frmAuditProgrammePlanning]![txtAuditNumber],[Forms]![frmAuditProgrammePlanning]![cboProcessName])"
DoCmd.Requery "SUBAuditDetails"
End If
End Sub
I've highlighted the bit of the code that I think is a problem.
My table is as follows:
TBLAuditRecords
Ref (autonumber)
AuditNumber
ProcessName
I need to be able to add many processes to one audit without duplicating the processes for each audit.....for example
This is ok:
AuditNumber ProcessName
1 Incident Management
1 Problem Management
2 Incident Management
2 Problem Management
This isn't:
AuditNumber ProcessName
1 Incident Management
1 Problem Management
1 Incident Management
1 Problem Management
Any help/guidance as to a better way to do this is much appreciated.
Thanks
Jo