DTO, ¿Que es?
Hola a todos, segun se expone en la wikipedia un DTO es:
Objeto de Transferencia de Datos (DTO por sus siglas en inglés) es un objeto que transporta datos entre procesos. La motivación de su uso tiene relación con el hecho que la comunicación entre procesos es usualmente realizada mediante interfaces remotas (ej. Servicios Web), donde cada llamada es una operación costosa.
Como la mayor parte del costo de cada llamada está relacionado con el tiempo round-trip entre el cliente y servidor, una forma de reducir el número de llamadas es usando un objeto (el DTO) que agrega los datos que habrían sido transferidos por cada llamada, pero que son entregados en una sola invocación.
La diferencia entre DTO y Objetos de Negocio (Business Objects) o Data Access Objects (DAO) es que un DTO no tiene más comportamiento que almacenar y entregar sus propios datos (accessors and mutators).
Los DTOs son objetos simples que no deben contener lógica de negocio que requiera pruebas.
Fuente(http://es.wikipedia.org/wiki/Objeto_de_Transferencia_de_Datos_%28DTO%29)
Hasta aqui el que es y creo que esta bastante bien explicado.
Ahora vamos a crear uno, que es la mar de sencillo.
Para mi la explicacion mas sencilla es, una Clase que contiene propiedades que hacen correspondencia a los campos de la base de datos. ahora veremos el ejemplo.
Creando un DTO
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 |
'EL DTO Public Class CLIENTE Private _IdCliente Public Property IdCliente As Integer Public Property Nombre As String Public Sub New() End Sub End Class 'EL FORM Public Class Form1 Dim MiLista As New List(Of Clientes) Dim id As Integer = 0 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click id += 1 Dim DTOCLIENTES As New Clientes DTOCLIENTES.IdCliente = id DTOCLIENTES.Nombre = Me.TextBox1.Text Me.TextBox1.Text = "" MiLista.Add(DTOCLIENTES) End Sub Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Dim Listado = From variable As Clientes In MiLista Where variable.Nombre Like "*" & Me.TextBox2.Text & "*" Select variable.Nombre & " " & variable.IdCliente Me.ListBox1.Items.Clear() For i As Integer = 0 To Listado.Count - 1 Me.ListBox1.Items.Add(Listado(i)) Next End Sub End Class |
Hasta aqui, a continuacion lo que debemos hacer es una instancia del objeto, y ya lo podemos rellenar con los datos que nos haga falta.
Un saludo a tod@s, si el post te gustó, Comentalo y o compartelo.