Obtener valores de consulta sql por vbnet ?

[antvo]

Excelente gracias por la respuesta

Ya quedo lo que necesitaba.

Realice una clase para la conexión a la bd de sql server y esto me ayudo a reutilizar mi código que creaba manualmente la conexión y llego un punto donde ya estaba acumulando mucho código.

les dejo un ejemplo si se encuentran con una duda parecida:

Que les parece si optimizamos esta clase agregándole seguridad ¿que mas le faltaría?

Código vbnet:

Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.SqlClient
 
Public Class conexion
 
    Dim Conexion As String = "server=TUsERVIDOR;uid=USER;pwd=CONTRASEÑA;database=BASEDEDATOS"
    Dim Cnn As New SqlConnection()
    Dim Cmd As SqlCommand
    Dim Sql As String
    Dim Dt As New DataTable() 'Datos de la cosulta sql
    Dim Da As New SqlDataAdapter
 
 
'Constructor 
    Sub New()
      'DEFINE SI NECESITAS
    End Sub
 
'Abrir conexion
    Sub conectar()
        Cnn = New SqlConnection(Conexion)  
        Cnn.Open()
    End Sub
 
 
 
    'Update 
    Sub Update(ByVal  st as String, ByVal id As String)
 
        Sql = " UPDATE  tabla set   valor='" & st & "'  WHERE id= " & id
        Cmd = New SqlCommand(Sql, Cnn)
        Cmd.ExecuteNonQuery()
 
    End Sub
 
 
 
End Class