Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails
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
|SQL Server R2 Stored procedure performance||8||30|
|convert a string containing currency data into a currency or decimal in vb6, no matter the country currency||4||28|
|Run MS Access Module from Macro / Bat File||9||39|
|MS Access Query Help With Updating Information To Specific IDs Criteria||6||13|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
9 Experts available now in Live!