PeopleSoft Adoption Made Smooth & Simple!
On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool. Claim Your Free WalkMe Account Now
If Me.Dirty = False Then 'This section counts the number of servers to which the update has been deployed Dim rs As DAO.Recordset Dim sSQL As String sSQL = "SELECT Count(tblDeployment.Computer) AS CountOfComputer " sSQL = sSQL & "FROM tlkComputers INNER JOIN tblDeployment ON tlkComputers.Computer=tblDeployment.Computer " sSQL = sSQL & "WHERE (((tblDeployment.DeploymentType) = 'Live') And ((tlkComputers.Group) = 'Servers')) " sSQL = sSQL & "GROUP BY tblDeployment.UpdateID HAVING (((tblDeployment.UpdateID)= " & Forms!frmUpdatesWrapper!frmUpdates!txtUpdateID & "));" Debug.Print sSQL Set rs = CurrentDb.OpenRecordset(sSQL) If Not (rs.BOF And rs.EOF) Then Me.txtNumberDeployed = rs!CountOfComputer Else 'your query did not return any records. End If Set rs = Nothing End If
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.