I managed this manually by using:
Dim CurrentUser As String = Membership.GetUser(User.Identity.Name).ToString()
Protected Sub btnYes_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnYes.Click
Membership.DeleteUser(User.Identity.Name, True)
Dim conString As String = System.Configuration.ConfigurationManager.Connecti onStrings("ConnectionString").ConnectionString
Dim con As New SqlConnection(conString)
Dim cmd As SqlCommand = New SqlCommand("DELETE FROM UserDetails WHERE (UserName = @UserName)", con)
cmd.Parameters.AddWithValue("@UserName", CurrentUser)
con.Open()
cmd.ExecuteNonQuery()
con.Close()
con.Dispose()
FormsAuthentication.SignOut()
FormsAuthentication.RedirectToLoginPage()
End Sub
|