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.
If (a = 6) Then Dim MyConn As ADODB.Connection Dim MyRecSet1 As New ADODB.Recordset Set MyConn = New ADODB.Connection MyConn.Open "Provider=Microsoft.ACE.OLEDB.12.0;;Data Source=" & Form4.txtBaseDe.Text MyRecSet1.Open "SELECT * FROM [Employés] WHERE Nom='" & txtNomemploye1.Text & "'", MyConn, adOpenForwardOnly, adLockReadOnly If MyRecSet1.EOF = False Then MyConn.Execute ( _ "Update [Employés] SET Adresse= '" & txtAdresse.Text & "' AND " _ & "Ville ='" & txtVille.Text & "'" _ & Where _ & "Nom ='" & txtNomemploye1.Text & "' AND " _ & "Prénom ='" & txtPrenomEmploye.Text & "'")
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.