Home / Questions / 37247
Accepted
Sagara
Asked: 2020-12-03 07:17:20 +0800 CST 2020-12-03 07:17:20 +0800 CST

如何将类中的 SqlDataReader 中的数据捕获到函数中？

  • 772

我正在使用 vb.net，在课堂上conexion我有以下方法：

Function consulta()

Try
    conectar()
    comando = conexion.CreateCommand()
    comando.CommandText = "select * from persona"

    reader = comando.ExecuteReader()
Catch ex As Exception
    MsgBox("Error 1 " + ex.ToString)
End Try

desconectar()

Return reader
End Function

该对象reader的类型为SqlDataReader。

我需要的不是在 a 中输入结果DataGrid，而是从表单中调用它们并在 a 中显示每个字段TextBox。例如字段nombre输入它在一个TextBox，apellido在另一个TextBox。

sql-server

3 Answers

  1. Best Answer

    当前设计中有两个非常严重和基本的问题，其他答案没有提到：

    1. 您正在使用全局变量进行连接和SqlDataReader.
    2. 您desconectar()在返回 之前关闭连接 ( ) SqlDataReader，因此当您尝试使用 读取数据时SqlDataReader，它会抛出异常。

    我一次又一次地看到使用这种使用全局连接的模式的问题。这是非常糟糕的做法，会导致更严重的程序出现问题。集中打开连接的代码并没有错。但是将连接保存在全局变量中是不正确的。

    第二点的问题是，为了返回 aSqlDataReader并能够继续使用它，连接必须保持打开状态。但是如果你desconectar()从你的方法中删除调用来解决这个问题，你的代码现在变得比现在更脆弱，因为不清楚谁负责关闭连接。

    这是一个更健壮且可重用的模式，您可以使用它从 a 中读取SqlDataReader任何查询的数据，并且不属于上述设计问题。

    对于我与您分享的示例，我将假设您已经定义了一个简单地返回conectar()的方法，而不是打开连接并将其分配给全局变量（以避免）的方法没有将其分配给全局变量CrearConexion的新实例（正确）。SqlConnection就像是：

    Public Function CrearConexion() As SqlConnection
    Return New SqlConnection("<cadena de conexión>")
End Function

    方法EjecutarLeerConsulta：

    Public Sub EjecutarLeerConsulta(
    sql As String,
    leerRegistro As Action(Of SqlDataReader),
    ParamArray parametros As SqlParameter())

    Using conn As SqlConnection = CrearConexion()
        Using cmd = New SqlCommand(sql, conn)
            cmd.Parameters.AddRange(parametros)
            conn.Open()

            Using reader As SqlDataReader = cmd.ExecuteReader()
                While (reader.Read())
                    leerRegistro(reader)
                End While
            End Using
        End Using
    End Using
End Sub

    使用此方法，您可以使用最佳实践执行和读取任何查询，无需全局变量，无需担心何时打开和关闭连接等。一切都在这个中心方法中自动处理。

    如何使用它

    要使用该方法，您需要向其传递至少 2 个参数：

    • SQL 字符串。
    • 一个 lambda 表达式，它定义要为查询返回的每条记录执行的代码。
    • （可选）SqlParameter如果查询需要参数列表 ( )。

    例子：

    EjecutarLeerConsulta(
    "select * from persona",
    Sub(reader)
        Dim nombre As String = reader("nombre")
        Dim apellido As String = reader("apellido")
        ' agrega código aquí que asigna los valores a los TextBox o lo que quieras.
    End Sub)

    如果您需要使用参数构建查询，调用将如下所示：

    EjecutarLeerConsulta(
    "select * from persona where nombre = @nombre and apellido = @apellido",
    Sub(reader)
        Dim nombre As String = reader("nombre")
        Dim apellido As String = reader("apellido")
        ' agrega código aquí que asigna los valores a los TextBox o lo que quieras.
    End Sub,
    New SqlParameter("@nombre", "John"),
    New SqlParameter("@apellido", "Smith"))
    • 1

  2. 好吧，首先我建议您将要返回的类型添加到最后的方法中。因此：

    Function consulta() As SQLDataReader
End Function

    现在要从数据阅读器中获取数据，您可以这样做

    'Llamas a tu función para obtener el lector de datos
Dim l = consulta()
'Evaluas si tiene columnas
If l.HasRows Then
    'Evaluas si se leyerón los datos. NOTA: Esto es en caso que solo sea una
    'fila que vas a leer, si son varias te recomiendo usar While l.Read()

    If l.Read() Then
        'obtienes los datos y los agregas donde mayor te convenga

        TextBox1.Text = l["Dato1"].ToString()
        TextBox2.Text = l["Dato2"].Tostring()
        Label1.Text = l["Dato3"].ToString()
        Label2.Text = l["Dato4"].ToString()
        Dim dato5 As Integer = Integer.Parse(l["Dato5"].ToString())

        '....... etc
    End If
End If
    • 0

  3. 它使用 SQLDataReader 类，在 c# 中，您可以按索引或按列名调用它，如下所示

     NombreTextBox.Text = VariableDataReader["NombreColumna"].ToString();
    • -1