All sorts of threat intelligence is available on the web. Intelligence you can learn from, and use to anticipate and prepare for future attacks.
Option Compare Database Option Explicit Private Sub Form_Current() If Me.optAsset.Value = -1 Then Me!lblAsset.Visible = True Me!cmdUpdateID.Enabled = True Me!AssetNo.Enabled = False Else: Me!AssetNo.Enabled = True Me!lblAsset.Visible = False Me!cmdUpdateID.Enabled = False End If End Sub Private Sub optAsset_Click() If optAsset.Value = -1 Then Me.lblAsset.Visible = True Me.cmdUpdateID.Enabled = True Me.AssetNo.Enabled = False Me.Comment = (Date & " -- No ID was found on Equipment, please notify Department of use to fix this issue.") Else Me.lblAsset.Visible = False Me.cmdUpdateID.Enabled = False Me.AssetNo.Enabled = True End If End Sub Private Sub cmdUpdateID_Click() Dim i As String i = InputBox("Enter Asset ID Number", "Asset ID") Me.AssetNo.Enabled = True Me.AssetNo = i Me.optAsset.Value = 0 Me.lblAsset.Visible = False Me.Comment = (Date & " -- ID found and affixed to equipment") End Sub
|Allow user to choose the file to import||15||44|
|Sum Max help (Add 1 Month)||3||18|
|Splitting out Data||14||27|
|Trying to display the sum of values on a subform on the main form||6||20|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
10 Experts available now in Live!