none
CLASES EN VB .NET RRS feed

  • Pregunta

  • Hola  a todos

     

    Tengo una Tablas Empleados, en el cual tiene los siguientes Campos : codigo_emp,nombre_emp,direccion_emp,dni_rmp,telefonos_emp,email_emp.

    Como hago una clase para jalar los datos de la Base de Datos de esta tabla, guardar los datos y validar los datos, al momento del ingreso

     

    Es decir, como hago una clase empleados, del cual se puede realizar diferentes transacciones, espero me puedan ayudar.

     

    Saludos

    viernes, 27 de julio de 2007 0:13

Respuestas

  • Pues mira un ejemplo pero en c# sobre una tabla se suscriptores:

     

    Create la entidad:

     

    Code Snippet

    using System.Collections.Generic;

    namespace DatabaseExample

    {

    public class Subscriber

    {

    private int _subscriberId;

    public int SubscriberId

    {

    get { return _subscriberId; }

    set { _subscriberId = value; }

    }

    private string _name;

    public string Name

    {

    get { return _name; }

    set { _name = value; }

    }

    private string _emailAddress;

    public string EmailAddress

    {

    get { return _emailAddress; }

    set { _emailAddress = value; }

    }

    private List cars;

    public List Cars

    {

    get

    {

    if (cars == null)

    cars = new List();

    return cars;

    }

    set

    {

    cars = value;

    }

    }

    public Subscriber() {}

    }

    }

     

     

    Una interfaz que declara los métodos que utilizaras para las operaciones:

     

    Code Snippet

    using System.Collections.Generic;

    namespace DatabaseExample

    {

    public interface IDataAccess

    {

    IList GetSubscribers();

    void InsertSubscriber(Subscriber subscriber);

    void UpdateSubscriber(Subscriber subscriber);

    void DeleteSubscriber(Subscriber subscriber);

    }

    }

     

     

    Una clase para el acceso a datos que implemente esta interfaz:

     

    Code Snippet

    using System.Collections.Generic;

    using System.Data;

    using System.Data.Common;

    using Microsoft.Practices.EnterpriseLibrary.Data;

    using System.Security.Permissions;

     

    namespace DatabaseExample

    {

    public class SqlDataAccess : IDataAccess

    {

    private Database database = DatabaseFactory.CreateDatabase();

    public IList GetSubscribers()

    {

    List subscribers = new List();

    using (IDataReader dr = database.ExecuteReader(CommandType.StoredProcedure, "GetSubscribers"))

    {

    while (dr.Read())

    {

    Subscriber subscriber = SubscriberFactory.Build(dr);

    subscribers.Add(subscriber);

    }

    }

    return subscribers;

    }

    public void InsertSubscriber(Subscriber subscriber)

    {

    DbCommand insertCommand = database.GetStoredProcCommand("InsertSubscriber");

    database.AddInParameter(insertCommand, "Name", DbType.String, subscriber.Name);

    database.AddInParameter(insertCommand, "EmailAddress", DbType.String, subscriber.EmailAddress);

    database.AddOutParameter(insertCommand, "SubscriberId", DbType.Int32, 4);

    database.ExecuteNonQuery(insertCommand);

    subscriber.SubscriberId = (int) database.GetParameterValue(insertCommand, "SubscriberId");

    }

    public void UpdateSubscriber(Subscriber subscriber)

    {

    DbCommand updateCommand = database.GetStoredProcCommand("UpdateSubscriber");

    database.AddInParameter(updateCommand, "Name", DbType.String, subscriber.Name);

    database.AddInParameter(updateCommand, "EmailAddress", DbType.String, subscriber.EmailAddress);

    database.AddInParameter(updateCommand, "SubscriberId", DbType.Int32, subscriber.SubscriberId);

    database.ExecuteNonQuery(updateCommand);

    }

    public void DeleteSubscriber(Subscriber subscriber)

    {

    DbCommand deleteCommand = database.GetStoredProcCommand("DeleteSubscriber");

    database.AddInParameter(deleteCommand, "SubscriberId", DbType.Int32, subscriber.SubscriberId);

    database.ExecuteNonQuery(deleteCommand);

    }

    }

    }

     

     

     Y por último la factoria que te cree tus objetos:

     

    Code Snippet

    using System.Data;

    namespace DatabaseExample

    {

    public class SubscriberFactory

    {

    public static Subscriber Build(IDataReader dr)

    {

    Subscriber subscriber = new Subscriber();

    subscriber.SubscriberId = (int)dr["SubscriberId"];

    subscriber.Name = (string) dr["Name"];

    subscriber.EmailAddress = (string) dr["EmailAddress"];

    return subscriber;

    }

    }

    }

     

     

    Y con esto está listo tu objeto para trabajar con la tabla suscriptores, aplica esto a tu ejemplo y listo.

     

    Salu2

     

    Colabora con el foro: Si la respuesta te es de utilidad marca la pregunta como respondida.

    Luis Ruiz Pavón

    MCP - MCTS

    Blog: http://geeks.ms/blogs/lruiz

    viernes, 27 de julio de 2007 6:21

Todas las respuestas

  • Pues mira un ejemplo pero en c# sobre una tabla se suscriptores:

     

    Create la entidad:

     

    Code Snippet

    using System.Collections.Generic;

    namespace DatabaseExample

    {

    public class Subscriber

    {

    private int _subscriberId;

    public int SubscriberId

    {

    get { return _subscriberId; }

    set { _subscriberId = value; }

    }

    private string _name;

    public string Name

    {

    get { return _name; }

    set { _name = value; }

    }

    private string _emailAddress;

    public string EmailAddress

    {

    get { return _emailAddress; }

    set { _emailAddress = value; }

    }

    private List cars;

    public List Cars

    {

    get

    {

    if (cars == null)

    cars = new List();

    return cars;

    }

    set

    {

    cars = value;

    }

    }

    public Subscriber() {}

    }

    }

     

     

    Una interfaz que declara los métodos que utilizaras para las operaciones:

     

    Code Snippet

    using System.Collections.Generic;

    namespace DatabaseExample

    {

    public interface IDataAccess

    {

    IList GetSubscribers();

    void InsertSubscriber(Subscriber subscriber);

    void UpdateSubscriber(Subscriber subscriber);

    void DeleteSubscriber(Subscriber subscriber);

    }

    }

     

     

    Una clase para el acceso a datos que implemente esta interfaz:

     

    Code Snippet

    using System.Collections.Generic;

    using System.Data;

    using System.Data.Common;

    using Microsoft.Practices.EnterpriseLibrary.Data;

    using System.Security.Permissions;

     

    namespace DatabaseExample

    {

    public class SqlDataAccess : IDataAccess

    {

    private Database database = DatabaseFactory.CreateDatabase();

    public IList GetSubscribers()

    {

    List subscribers = new List();

    using (IDataReader dr = database.ExecuteReader(CommandType.StoredProcedure, "GetSubscribers"))

    {

    while (dr.Read())

    {

    Subscriber subscriber = SubscriberFactory.Build(dr);

    subscribers.Add(subscriber);

    }

    }

    return subscribers;

    }

    public void InsertSubscriber(Subscriber subscriber)

    {

    DbCommand insertCommand = database.GetStoredProcCommand("InsertSubscriber");

    database.AddInParameter(insertCommand, "Name", DbType.String, subscriber.Name);

    database.AddInParameter(insertCommand, "EmailAddress", DbType.String, subscriber.EmailAddress);

    database.AddOutParameter(insertCommand, "SubscriberId", DbType.Int32, 4);

    database.ExecuteNonQuery(insertCommand);

    subscriber.SubscriberId = (int) database.GetParameterValue(insertCommand, "SubscriberId");

    }

    public void UpdateSubscriber(Subscriber subscriber)

    {

    DbCommand updateCommand = database.GetStoredProcCommand("UpdateSubscriber");

    database.AddInParameter(updateCommand, "Name", DbType.String, subscriber.Name);

    database.AddInParameter(updateCommand, "EmailAddress", DbType.String, subscriber.EmailAddress);

    database.AddInParameter(updateCommand, "SubscriberId", DbType.Int32, subscriber.SubscriberId);

    database.ExecuteNonQuery(updateCommand);

    }

    public void DeleteSubscriber(Subscriber subscriber)

    {

    DbCommand deleteCommand = database.GetStoredProcCommand("DeleteSubscriber");

    database.AddInParameter(deleteCommand, "SubscriberId", DbType.Int32, subscriber.SubscriberId);

    database.ExecuteNonQuery(deleteCommand);

    }

    }

    }

     

     

     Y por último la factoria que te cree tus objetos:

     

    Code Snippet

    using System.Data;

    namespace DatabaseExample

    {

    public class SubscriberFactory

    {

    public static Subscriber Build(IDataReader dr)

    {

    Subscriber subscriber = new Subscriber();

    subscriber.SubscriberId = (int)dr["SubscriberId"];

    subscriber.Name = (string) dr["Name"];

    subscriber.EmailAddress = (string) dr["EmailAddress"];

    return subscriber;

    }

    }

    }

     

     

    Y con esto está listo tu objeto para trabajar con la tabla suscriptores, aplica esto a tu ejemplo y listo.

     

    Salu2

     

    Colabora con el foro: Si la respuesta te es de utilidad marca la pregunta como respondida.

    Luis Ruiz Pavón

    MCP - MCTS

    Blog: http://geeks.ms/blogs/lruiz

    viernes, 27 de julio de 2007 6:21
  • Hola Luis

     

    Gracias por la respuesta, lo voy a probar y te aviso que ocurre

     

    Saludos

    viernes, 27 de julio de 2007 14:39
  • Hola Luis

     

    Lo revise y me parece interesante, pero soy novato en esto de clases y quisiera saber si puedes pasarme algún ejemplo implementado en un formulario, para entender mejor su funcionamiento, te agradezco anticipadamente tu ayuda.

     

    Saludos

    lunes, 30 de julio de 2007 14:43
  • en vb.net tienes que crear un archivo de class y declaras las variables publicas 

    le  colocas como nombre clsdatos

    public odigo_emp, as string

    public nombre_emp, as string

    public direccion_emp, as string 

    public dni_rmp, as string

    public telefonos_emp, as string 

    public email_emp, as string 

    lugo agregas otra clases y de las como nombre ddlmantenimineto 

    haora lo que tienes que hacer es estaclecer los parametro con 

    una procedimiento almacenado 

    public function  insertadatos ()

    'esta variable es para establecer las clases a los parametro

    dim data as new clsdatos

    dim dt as new dllmantenimiento 

    'se establece la conexion 

    cnn as new sqlconnection(cntrs)

    cnn.open

    'se crea una instancia de los cmd 

    dim sql as strgin=("sp_procedimiento_insert1")

    cmd= new sqlcommand(sql,ccnn)

            cmd.Parameters.AddWithValue("@Nombre", nombre <--- este es la clases declarada anterior mente en el archivo clsdatos)
            cmd.Parameters.AddWithValue("@Apellidos", apellidos)
            cmd.Parameters.AddWithValue("@Email", email)
            cmd.Parameters.AddWithValue("@Fecha", fecha)
            cmd.Parameters.AddWithValue("@Descripcion", descripcion)

    cmd.executenoquery

    msg()

    end sub



    domingo, 23 de agosto de 2015 16:56