Protected Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim cn As String = ConfigurationManager.ConnectionStrings("zzzzz").ConnectionString Using cs As New SqlConnection(cn) Using cmd As New SqlCommand("SELECT xxxxx, COUNT(*) FROM vvvvv GROUP BY xxxxx HAVING COUNT(*) > 1", cs) Using sda As New SqlDataAdapter(cmd) Dim dt As New DataTable() sda.Fill(dt) rptTableUser3.DataSource = dt rptTableUser3.DataBind() End Using End Using End Using End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)