Here is my openrecordset and select statement.
Expand|Select|Wrap|Line Numbers
- Set rst = dbs.OpenRecordset("SELECT DISTINCT Software.[Software Name], Software.Version, Software.[Operating System], " & _
- "Software.Status, Software.[Status Date], Software.[Approved Platforms], " & _
- "Software.[Code Type], CUsage.[Cost Center], CUsage.[Entered On] " & _
- "FROM Software INNER JOIN CUsage " & _
- "ON Software.[Software Name] = CUsage.[Software Name] " & _
- "AND Software.Version = CUsage.Version " & _
- "AND Software.[Operating System] = CUsage.[Operating System] " & _
- "WHERE Software.[Software Name] = '" & strSoftwareNameOI & "' " & _
- "AND Software.Version = '" & strVersionOI & "' " & _
- "AND Software.[Operating System] = '" & strOSOI & "'" & _
- "ORDER BY Status DESC ", dbOpenDynaset, dbReadOnly)
My output is showing like this.....
Expand|Select|Wrap|Line Numbers
- Software Name Version Operating System Status Status Date Approved Platforms Code Type Cost Center Entered On
- 2000Times 1.0 Windows Pending 1/6/2010 2011 2/17/2010
- 2000Times 1.0 Windows Pending 1/6/2010 2012 2/17/2010
- 2000Times 1.0 Windows Active 1/20/2010 Non-controlled Access 2011 2/17/2010
- 2000Times 1.0 Windows Active 1/20/2010 Non-controlled Access 2012 2/17/2010
But it needs to look like this...
Expand|Select|Wrap|Line Numbers
- Software Name Version Operating System Status Status Date Approved Platforms Code Type Cost Center Entered On
- 2000Times 1.0 Windows Pending 1/6/2010 2011 2/17/2010
- Pending 1/6/2010 2012 2/17/2010
- Active 1/20/2010 Non-controlled Access 2011 2/17/2010
- Active 1/20/2010 Non-controlled Access 2012 2/17/2010
If anyone could help I would greatly appreciate it. Thanks