ADO NET

public sub llenarCombo()
Me.cmboEliminar.Items.Clear()
sql = "SELECT IDPERSONA FROM Persona"
cmd.CommandType = CommandType.Text
cmd.Connection = conn
cmd.CommandText = sql
dr = cmd.ExecuteReader

If dr.HasRows = True Then
While dr.read()
Me.cmbEliminar.Items.Add(dr.Getvalue(0))
End While
end If









Comentarios

Entradas populares de este blog

Para que sirve la N en SQL Server

MYSQL : CURSORES

SQL SERVER : EJECUTAR UN PAQUETE SSIS