Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Sub UpdateAllComments_Click() Dim strMsg As String, strQry As String, strRemark As String strMsg = "Update All Comments in the Current view. IMPORTANT!!! Will update a the filtered records." If vbYes = MsgBox(strMsg, vbYesNo, "IMPORTANT!! Confirmation") Then strMsg = "Please enter the remark" strRemark = InputBox(strMsg, "Remark") If Len(strRemark) > 0 Then strQry = "Update Final_Table set UpdatedDate = now(), UpdatedBy = """ & txtWelcome & """, Final_Table.Remarks1 = Allot_Q.Remarks1" '& '--" & strRemark & "'" QuickQry strQry, False Me.Requery End If Else MsgBox "Action cancelled." End If End Sub
Join the community of 500,000 technology professionals and ask your questions.