Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat. The purpose of this eBook is to educate the reader about ransomware attacks.
Private Sub btnAddUser_Click(sender As System.Object, e As System.EventArgs) Handles btnAddUser.Click Try btnAddUser.Enabled = False Dim sUserName = txtUsername.Text Dim sFirstname = txtFirstName.Text Dim sLastName = txtLastName.Text Dim sPassword = txtPassword.Text Dim sGroupname = cbGroupAdd.SelectedValue Dim sEmail = txtAddEmail.Text If ((txtPassword.Text) = (txtConfirmPassword.Text)) Then ADWrapper.CreateAdAccount(sUserName, sPassword, sFirstname, sLastName, sGroupname, sEmail) MessageBox.Show(txtFirstName.Text & " " & txtLastName.Text & " has been created and added to " & sGroupname, Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Information) Else MessageBox.Show("Passwords do not match") End If Catch ex As Exception MessageBox.Show(ex.Message) End Try End Sub
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.