This function is being called in some cases HUNDREDS of times in some existing code.
This existing code is so costly it is not even funny.
Do we even need to fill a dataset? Wouldn't it be better just to do maybe an ExecuteNonQuery and test the return value?

Is ther a better way to do it all together?

```
Private Function GetSomeInfo(ByVal primaryID As Integer) As Boolean
    Dim val As Boolean = False

    Dim CmdReturn As SqlCommand = New SqlCommand
    CmdReturn.CommandText = "uspTheSPROC"
    CmdReturn.CommandType = CommandType.StoredProcedure
    CmdReturn.Parameters.Add(New SqlParameter("@primaryID", primaryID))

    Dim daSQL As SqlDataAdapter = New SqlDataAdapter
    daSQL.SelectCommand = CmdReturn

    Dim dsTheData As DataSet = New DataSet
    Dim ConnMain As SqlConnection = New SqlConnection(ConfigurationManager.ConnectionStrings("MainConnection").ConnectionString)
    Try
        CmdReturn.Connection = ConnMain
        CmdReturn.CommandTimeout = 2000
        ConnMain.Open()
        daSQL.Fill(dsTheData, "Data")

        If (dsTheData.Tables(0).Rows.Count > 0) Then
            val = True
        Else
            val = False
        End If
    Catch SQLExcept As SqlException
        Dim lError As Main.ErrorHandlers.ErrorAtServer = New Main.ErrorHandlers.ErrorAtServer()
        lError.ProcessError(SQLExcept, "..." + ".GetContents")
        Return val
    Catch Except As Exception
        Dim lError As Main.ErrorHandlers.ErrorAtServer = New Main.ErrorHandlers.ErrorAtServer()
        lError.ProcessError(Except, "..." + ".GetContents")
        Return val
    Finally
        If ConnMain.State = ConnectionState.Open Then
            ConnMain.Close()
        End If
    End Try

    Return val
End Function

```