Tips de Programación

Visual C#.NET - Generación de Colores y Figuras

2012-08-25T07:50:00.009-07:00

Hola nuevamente, mediante esta aplicación aprenderemos lo sgte:

Generar Números Aleatorios gracias a la clase Random
Trabajar con Colores gracias a la clase Color
Generar algunas figuras

El proyecto en el cual se ha desarrollado la aplicación ha sido en Visual Studio 2008.

Primeramente crearemos una nueva Aplicación de Windows Forms, plasmaremos el siguiente diseño:

Cada control tiene un nombre especifico (el cual es deducible), el codigo es el sgte:

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Text;

using System.Windows.Forms;

namespace AplicacionesCSharp

{

public partial class Form2 : Form

{

public Form2()

{

InitializeComponent();

}

String ColorEjegido;

Random rnd = new Random();

int[,] Matriz = new int[9, 9];

String Figuras;

private void Form1_Load(object sender, EventArgs e)

{

DgvListado.ColumnCount = 9;

DgvListado.RowCount = 9;

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

DgvListado.Columns[i].HeaderText = (i + 1).ToString();

}

GenerarNumerosAleatorios();

DgvListado.ClearSelection();

DgvListado.DefaultCellStyle.SelectionBackColor = DgvListado.DefaultCellStyle.BackColor;

DgvListado.DefaultCellStyle.SelectionForeColor = DgvListado.DefaultCellStyle.ForeColor;

}

private void LimpiandoColor()

{

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

for (int j = 0; j <= Matriz.GetUpperBound(1); j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = Color.White;

}

private void GenerarNumerosAleatorios()

{

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

for (int j = 0; j <= Matriz.GetUpperBound(1); j++)

{

Matriz[i, j] = (int)(rnd.NextDouble() * 10);

DgvListado.Rows[i].Cells[j].Value = Matriz[i, j];

}

private void ColoreandoGrilla(String ColorF, String Forma)

{

Color cl = new Color();

switch (ColorF)

{

case "Rojo": cl = Color.Red; break;

case "Amarillo": cl = Color.Yellow; break;

case "Verde": cl = Color.Green; break;

case "Naranja": cl = Color.Orange; break;

case "Azul": cl = Color.Blue; break;

}

if (Forma.Equals("Cuadrado"))

{

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

for (int j = 0; j <= Matriz.GetUpperBound(1); j++)

{

if ((i == Matriz.GetLowerBound(0) || i == Matriz.GetUpperBound(0)) || (j == Matriz.GetLowerBound(1) || j == Matriz.GetUpperBound(1)))

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

if (Forma.Equals("Rombo"))

{

int x, y, a, b;

x = 4;

y = 4;

a = 7;

b = 1;

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

if (x > -1 || x == 0)

{

for (int j = x; j <= y; j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

x = x - 1;

y = y + 1;

}

else

{

for (int j = b; j <= a; j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

a = a - 1;

b = b + 1;

}

if (Forma.Equals("Triangulo"))

{

int x, y;

x = 4;

y = 4;

for (int i = 0; i <= Matriz.GetUpperBound(0); i++)

{

if (x > -1 || x == 0)

{

for (int j = x; j <= y; j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

x = x - 1;

y = y + 1;

}

if (Forma.Equals("Lados Internos"))

{

int x, y, i, j;

x = 0;

y = 0;

i = 0; j = x;

for (i = 0; i <= Matriz.GetUpperBound(0); i++)

{

for (j = x; j <= y; j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

x = x + 1;

y = y + 1;

}

x = 8;

y = 0;

for (i = x; i >= 0; i--)

{

for (j = y; j <= y; j++)

{

DgvListado.Rows[i].Cells[j].Style.BackColor = cl;

}

x = x + 1;

y = y + 1;

}

private void AsignandoColor(object sender, EventArgs e)

{

ColorEjegido = ((RadioButton)sender).Text;

LimpiandoColor();

if (!String.IsNullOrEmpty(Figuras))

{

ColoreandoGrilla(ColorEjegido, Figuras);

}

private void AsignarFigura(object sender, EventArgs e)

{

Figuras = ((RadioButton)sender).Text;

LimpiandoColor();

ColoreandoGrilla(ColorEjegido, Figuras);

}

private void btnGenNumAle_Click(object sender, EventArgs e)

{

GenerarNumerosAleatorios();

}

Seguidamente ejecutaremos el aplicativo, elegiremos el color Amarillo y la Figura Geométrica Cuadrado, nos mostrara así:

Ahora elegiremos el color Naranja y la Figura Geométrica Triangulo, nos mostrara así:

Ahora elegiremos el color Azul y la Figura Geométrica Rombo, nos mostrara así:

Ahora elegiremos el color Rojo y la Figura Lados Internos, nos mostrara así:

Puedes descargar el Proyecto desde el sgte link:

Windows Server 2003 - Active Directory

2012-08-23T06:42:00.000-07:00

Hola nuevamente, esta clase fue desarrollada en el instituto IDAT de Peru a cargo del Profesor Martin Camacho, que hasta en la actualidad sigue como docente, mientras escuche su clase decidi desarrollarla en un manual en el cual se indique paso a paso y mediante pantallas el como crear el Directorio Activo (Active Directory), ya que esta basado en un servidor Windows Server 2003, a alguna persona podria serle de utilidad, asi que empezamos.

DIAGRAMA DE RED ACTIVE DIRECTORY

CONFIGURANDO ACTIVE DIRECTORY PRIMARIO

Primeramente vamos a verificar el nombre de la PC y grupo de trabajo, presionar las teclas Windows + Pausa, al hacer esto se mostrara la ventana de Propiedades del Sistema, así como en la imagen:

Nota 1: Debes de verificar que tanto el nombre de la PC y Grupo de trabajo no contengan caracteres no validos, por ejemplo el carácter “_”.
Nota 2: Debes de tener el CD de instalación de Windows Server 2003.

Ahora vamos al Panel de Control, para eso presionar las teclas Windows + R, se mostrara la ventana de Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana del Panel de Control, ahora seleccionar Network Connections (Conexiones de Red), así como en la imagen:

Ahora debes darle doble click, se mostrara la sgte ventana:

Ahora debes seleccionar Local Area Connection, darle click derecho, luego click en Properties (Propiedades), así como en la imagen:

Al dar click se mostrara una ventana en la cual deberás seleccionar Internet Protocol (TCP/IP), así como en la imagen:

Ahora dar click al botón Properties, al hacerlo se mostrara una ventana en la cual en mi caso no hay asignada una dirección IP, algo así:

Ahora deberemos configurar lo sgte:

Dirección IP
Máscara de Subred
Puerta de Enlace
Servidor DNS Preferido

Configurar la dirección IP, teniendo así:

Ahora dar click al botón OK, mostrándonos la ventana anterior:

Ahora dar click al botón OK, Ahora vamos a comenzar con la instalación de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Nota:

DCPROMO--> Promover a Controlador de Dominio.
DC--> Domain Controller || PROMO --> Promover.

Al dar click en el botón OK, se mostrara una ventana de bienvenida, así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual nos informa de la compatibilidad del Sistema Operativo (SO), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos el tipo de controlador de dominio, elegiremos la primera opción Controlador de dominio para un nuevo dominio, así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual elegiremos Domain in a new forest (dominio en un nuevo bosque), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos el nombre del nuevo dominio, teniendo así:

Ahora especificaremos el nombre del nuevo dominio, en nuestro caso nuestro dominio se llamara GRUPO.COM, así como en la imagen:

Ahora al dar click al botón Next, se mostrara la sgte ventana en la cual especificaremos el nombre NetBIOS, lo dejamos por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos en donde se almacenara la carpeta de base de datos y registro de Active Directory, en mi caso lo dejare por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos la carpeta donde se va a compartir como volumen del sistema, en mi caso la dejo por defecto, así como en la imagen:

Nota: Aquí debe de especificarse una partición, en la cual el Sistema de Archivos sea NTFS.

Ahora al dar click en el botón Next, se mostrara una ventana en la cual la dejaremos por defecto.

Ahora al dar click en el botón Next, se mostrara una ventana en la cual especificaremos los permisos predeterminados para usuarios y objetos de grupo, en nuestro caso dejamos la opción por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara una ventana en la cual especificaremos una contraseña para cuando inicie el equipo en el modo de restauración de servicios de directorio. Esta contraseña debe ser lo mas compleja posible, usar letras, números, caracteres especiales, en nuestro no asignaremos contraseña alguna, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara una ventana en la cual nos muestra un resumen de lo realizado hasta ahora, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara una ventana en la cual nos indica que se está instalando Active Directory, esto puede tomar algo de tiempo, dependiendo de tu memoria RAM y del procesador. Solo debes de tener paciencia y esperar a que termine. Alrededor de 5 minutos o menos.

Bueno, luego de esperar por un buen rato, se mostrara la sgte ventana en la cual nos muestra que la instalación de Active Directory se realizo con éxito, así como en la imagen:

Ahora dar click al botón Finish, se mostrara la sgte ventana:

Para que los cambios se puedan realizar, deberás reiniciar, para eso dar click en el botón Restart Now (Reiniciar Ahora). Luego de esto se reiniciara el equipo, no t extrañes si demora más de lo habitual al cargar, esto pasa xq se está cargando todos los objetos del directorio activo, luego de una larga espera se mostrara una ventana en la cual especificaras el nombre de usuario, contraseña y conectarse al dominio creado, en nuestro caso GRUPO, así como en la imagen:

Al dar click al botón OK, se iniciara sesión. Ahora para comprobar si estoy como grupo de trabajo o dominio, presionar las teclas Windows + Pausa, se mostrara la ventana de Propiedades del Sistema, en la cual daremos click a la ficha Computer Name, se tendrá así:

Con esto terminamos de instalar en el principal.

CONFIGURANDO ACTIVE DIRECTORY SECUNDARIO

Primeramente vamos a verificar el nombre de la PC y grupo de trabajo, presionar las teclas Windows + Pausa, al hacer esto se mostrara la ventana de Propiedades del Sistema, así como en la imagen:

Nota 1: Debes de verificar que tanto el nombre de la PC y Grupo de trabajo no contengan caracteres no validos, por ejemplo el carácter “_”.
Nota 2: Debes de tener el CD de instalación de Windows Server 2003.

Ahora vamos al Panel de Control, para eso presionar las teclas Windows + R, se mostrara la ventana de Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana del Panel de Control, ahora seleccionar Network Connections (Conexiones de Red), así como en la imagen:

Ahora debes darle doble click, se mostrara la sgte ventana:

Ahora debes seleccionar Local Area Connection, darle click derecho, luego click en Properties (Propiedades), así como en la imagen:

Al dar click se mostrara una ventana en la cual deberás seleccionar Internet Protocol (TCP/IP), así como en la imagen:

Ahora dar click al botón Properties, al hacerlo se mostrara una ventana en la cual en mi caso no hay asignada una dirección IP, algo así:

Ahora deberemos configurar lo sgte:

Dirección IP
Máscara de Subred
Puerta de Enlace
Servidor DNS Preferido

Configurar la dirección IP, teniendo así:

Ahora dar click al botón OK, mostrándonos la ventana anterior:

Ahora dar click al boton OK, Ahora vamos a comenzar con la instalación de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Nota:

DCPROMO--> Promover a Controlador de Dominio.
DC--> Domain Controller || PROMO--> Promover.

Al dar click en el botón OK, se mostrara una ventana de bienvenida, así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual nos informa de la compatibilidad del Sistema Operativo (SO), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos el tipo de controlador de dominio, elegiremos la segunda opción Adicionar un controlador de dominio a uno ya existente, así como en la imagen:

Ahora dar click en el botón Next, nos mostrara la sgte ventana:

Ahora definiremos las credenciales de nuestro equipo controlador de dominio, en User Name definiremos al usuario Administrator de controlador de dominio principal, en Password definiremos la contraseña del controlador de dominio y en Domain definiremos el nombre de dominio y extensión del controlador de dominio, teniendo así:

Ahora dar click al botón Next, nos mostrara una ventana en la cual deberemos de definir el nombre de dominio a agregarse.

Ahora dar click al botón Browse, al hacerlo nos mostrara una ventana en la cual deberemos de elegir el dominio a agregarnos, teniendo así:

Una vez elegido el dominio dar click al botón OK, teniendo así:

Ahora dar click al botón Next, se mostrara la sgte ventana en la cual especificaremos en donde se almacenara la carpeta de base de datos y registro de Active Directory, en mi caso lo dejare por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara una ventana en la cual nos muestra un resumen de lo realizado hasta ahora, así como en la imagen:

Bueno, luego de esperar por un buen rato, se mostrara la sgte ventana en la cual nos muestra que la instalación de Active Directory se realizo con éxito, así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual nos informa de la compatibilidad del Sistema Operativo (SO), así como en la imagen:

CONFIGURANDO CLIENTE XP O SERVER 2003

Nota 1: Debes de verificar que tanto el nombre de la PC y Grupo de trabajo no contengan caracteres no validos, por ejemplo el carácter “_”.
Nota 2: Debes de tener el CD de instalación de Windows Server 2003.

Ahora vamos al Panel de Control, para eso presionar las teclas Windows + R, se mostrara la ventana de Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana del Panel de Control, ahora seleccionar Network Connections (Conexiones de Red), así como en la imagen:

Ahora debes darle doble click, se mostrara la sgte ventana:

Ahora debes seleccionar Local Area Connection, darle click derecho, luego click en Properties (Propiedades), así como en la imagen:

Al dar click se mostrara una ventana en la cual deberás seleccionar Internet Protocol (TCP/IP), así como en la imagen:

Ahora dar click al botón Properties, al hacerlo se mostrara una ventana en la cual en mi caso no hay asignada una dirección IP, algo así:

Ahora deberemos configurar lo sgte:

Dirección IP
Máscara de Subred
Puerta de Enlace
Servidor DNS Preferido

Configurar la dirección IP, teniendo así:

Ahora dar click al botón OK, mostrándonos la ventana anterior:

Ahora dar click al botón OK, ahora presionamos las teclas Windows + Pausa, al hacerlo nos mostrara la ventana de Propiedades de Sistema en la cual daremos click a la pestaña Computer Name, teniendo así:

Ahora dar click al botón Change, al hacerlo nos mostrara la sgte ventana:

Ahora en el grupo Member of elegir la opción Domain, al hacerlo se habilitara la caja de texto en la cual digitaras el nombre del dominio (GRUPO.COM), teniendo así:

Una vez definido todo lo anterior presionar la tecla OK, al hacer click nos mostrara la sgte ventana de autenticación:

Ahora pondremos las credenciales del dominio (User Name y Password), teniendo así:

Una vez definida las credenciales dar click al botón OK, si todo esta correcto nos mostrara una ventana en la cual nos mostrara como mensaje Bienvenido al dominio GRUPO.COM, algo así:

Ahora dar click al botón OK, nos mostrara el sgte mensaje el cual nos indica que debemos de reiniciar nuestro equipo.

Ahora dar click al botón OK, nos mostrara la ventana anterior:

Ahora dar click al botón OK, nos mostrara la sgte ventana:

Ahora dar click al botón Yes, al hacerlo se reiniciara la PC, luego nos mostrara la ventana de inicio de sesión con la diferencia que nos aparecerá una opción más que es la de Log on to en la cual podremos desplegar la lista desplegable en la cual podremos definir si deseamos logearnos a nivel de equipo o a través de un dominio, algo así:

En nuestro caso en la opción Log on to elegiremos nuestro dominio (GRUPO), teniendo así:

Ahora al dar click al botón OK iniciaremos sesión.

CREACION DE OBJETOS ACTIVE DIRECTORY EN DOMINIO PRINCIPAL

Un equipo que esta como controlador de dominio tiene herramientas de sistemas adicionales a la de un grupo de trabajo, tales como: Active Directory Users and Computers, Domain Security Policy, Domain Controller Security Policy y otros adicionales.

Ahora vamos a iniciar la herramienta Active Directory Users and Computers, esta herramienta me permite la creación de objetos tales como: Usuarios, Grupos, Unidades Organizativas, etc.

Para poder iniciar esta herramienta solo bastara dar click al Menú Inicio y click en Ejecutar y digitar lo sgte: DSA.MSC, así como en la imagen:

Una vez digitado el ejecutable dar click al botón OK, al hacerlo nos mostrara la herramienta Active Directory Users and Computers, así como en la imagen:

Ahora cerraremos esta herramienta, luego daremos click en el Menú Inicio – Programas – Administrative Tools y finalmente Domain Security Policy, así como en la imagen:

A la hora que des click en la opción nos mostrara la herramienta Domain Security Settings, teniendo así:

En resumen: lo que pretendemos hacer es que la contraseña que se le asigne a un usuario no sea tan compleja y que la longitud de dicha contraseña sea mayor a 1 carácter ya que por defecto la contraseña debe contener letras, números y caracteres especiales.

Ahora desplegar los sgtes nodos: Security Settings – Account Policy y seleccionar la política Password must meet complexity requirements, teniendo así:

Ahora dar doble click, nos mostrara la sgte ventana:

En esta ventana marcar la opción Disabled, teniendo así:

Una vez elegida la opción dar click al botón OK, ahora seleccionar la política Minimum password length, teniendo así:

Ahora dar doble click, nos mostrara la sgte ventana:

Ahora definiremos que la longitud mínima para mis contraseñas es de 1 carácter, teniendo así:

Una vez elegida la cantidad de caracteres dar click al botón OK, luego cerrar la ventana. Para poder realizar este cambio deberías de reiniciar tu PC, pero eso tomaria mucho tiempo, para ahorrarnos ese tiempo damos click al Menu Inicio y click en Ejecutar y escribir lo sgte:

Nota: GPUPDATE /FORCE--> Forzar la actualización de las directivas de grupo.
GP: Group Polices || Update--> Actualizar || Force--> Forzar

Una vez escrito el comando presionar la tecla ENTER, teniendo así:

Ahora proceder las sgtes Unidades Organizativas y Usuarios (para un mejor aprendizaje hazlo por código).

Ahora restringiremos al usuario USER1 para que no tenga acceso al dominio los días domingos, para esto solo seleccionas el usuario USER1, les da click derecho y finalmente click en Properties, así como en la imagen:

A la hora que des click nos mostrara una ventana en la cual nos describe las propiedades del usuario, damos click a la pestaña Account, teniendo así:

Ahora dar click al botón Logon Hours, al hacerlo tendremos la sgte ventana:

Ahora voy a negar al usuario para que no pueda iniciar sesión en el dominio los días domingos, para eso selecciono toda la fila del día domingo y dar click a la opción Logon Denied, al hacerlo toda la fila cambiara a color blanco, queriendo decir que no se podrá iniciar sesión ese día, teniendo así:

Una vez definida esta opción dar click al botón OK, teniendo así:

Ahora dar click al botón OK.

Realizar las sgtes restricciones:

Restringir al usuario USER2 para que no tenga acceso los días sábados.
Restringir al usuario USER3 para que no tenga acceso los días sábados desde el medio día hasta las 6pm.
Restringir al usuario USER4 para que no tenga acceso los días domingos de 2pm hasta 11pm.
Restringir al usuario USER5 para que no tenga acceso los días sábados de 2pm A 5pm.
Restringir al usuario USER6 para que no tenga acceso los días sábados y domingos.

Ahora si verificas en el servidor secundario (Active Directory Secundario) tendrás así:

Ahora en la PC del cliente procederemos a iniciar sesión con el usuario USER1, para eso deberás iniciar sesión con el usuario USER1 con su respectivo password y que se conecte al dominio GRUPO, teniendo así.

Ahora al dar click al botón OK se iniciara sesión con el usuario USER1 en el equipo cliente, teniendo así:

Ahora pongámonos en el caso que llego el día domingo, si quisieras iniciar sesión en el equipo cliente con el usuario USER1 mostraría el sgte mensaje:

Finalmente prueba las restricciones con los demás usuarios.

Windows Server 2003 - Creación y Administración de Grupos

2012-08-22T17:29:00.000-07:00

Los Grupos son un conjunto de cuentas de equipos y de usuario que se pueden administrar como una sola unidad.

Ventajas:

· Simplifican la administración al facilitar la concesión de permisos para recursos a todo un grupo en lugar de a cada una de las cuentas de usuario individualmente.
· Se distinguen por su ámbito y tipo.

Antes de empezar tienes que tener en cuenta que para poder crear Unidades Organizativas y demás objetos que veremos posteriormente debes de haber creado un controlador de dominio.

Ahora vamos a ingresar a la herramienta administrativa Usuarios y equipos de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana de Usuarios y equipos de Active Directory, así como en la imagen:

Ahora vamos a crear una OU (Unidad Organizativa), para eso seleccionamos nuestro dominio (en nuestro caso IDAT.MSFT) le damos clic derecho, luego clic en New y finalmente clic en Organizational Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mí caso Perú, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, quedando así:

Ahora vamos a crear un grupo local, para eso hacer lo sgte:

Al hacer click se mostrara una ventana en la cual deberemos de ingresar los datos correspondientes, quedando así:

Al dar click en el botón OK se creara el grupo, quedando así:

Ahora mediante comandos vamos a crear el grupo llamado Callao, para eso ir a la ventana de comandos de la sgte manera:

Al dar click en el botón se mostrara la ventana de comandos, en la cual deberás poner lo sgte:

Explico:

DSADD GROUP--> Agrego un grupo al Directorio Activo.
“CN=Callao,OU=Peru,DC=IDAT,DC=MSFT”--> Es la ubicación en donde se creara el grupo.
-Secgrp--> especifica el tipo de seguridad del grupo yes / no.
-Scope--> especifica el tipo de alcance (ámbito) del grupo, dominio (l), global (g), o universal (u).
-Samid--> Aquí se especifica el nombre completo del objeto de grupo que se desea agregar.

Ahora si verificas dentro de la OU Perú se tendrá así:

Ahora mediante comandos crearemos un grupo global llamado Tumbes en la Unidad Organizativa llamada Perú, primeramente ir a la ventana de comandos y escribir lo sgte:

Ahora si verificas la herramienta administrativa Usuarios y equipos de Active Directory, se tendrá así:

Ahora si quieres eliminar un grupo mediante comando, x ejm Callao lo puedes hacer así:

Si lo eliminaste tendrás así:

Ahora vamos a crear 4 usuarios, ya sea mediante comando o x diseño dentro de la Unidad Organizativa Perú. Los Usuarios en mi caso son los sgtes:

Cn=Ricardo (Nombre=Ricardo, Nombre de Inicio=Ricky01)
Cn=Lady (Nombre=Lady, Nombre de Inicio=Lady02)
Cn=Javier (Nombre=Javier, Nombre de Inicio=Javier03)
Cn=Fiorella (Nombre=Fiorella, Nombre de Inicio=Fiorella04)

En mi caso todo lo he hecho x diseño, teniendo finalmente asi:

Ahora vamos a hacer miembro a la cuenta de usuario Ricardo y Lady al grupo Lima, para eso seleccionamos el grupo local Lima le damos clic derecho y Propiedades, así como en la imagen:

Al dar click se mostrara la sgte ventana:

Ahora dar click en la ficha Members, se mostrara así:

Ahora dar click en el botón Add, se mostrara la sgte ventana:

Ahora dar click en el botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos a los Usuarios Lady y Ricardo, así como en la imagen:

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora seleccionaremos el Grupo Tumbes, le damos click derecho y click en Propiedades, así como en la imagen:

Al dar click se mostrara la sgte ventana:

Ahora dar click a la pestaña Members, se tendrá así:

Ahora dar click al botón Add, se mostrara la sgte ventana:

Ahora dar click al botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos a los Usuarios Fiorella y Javier, así como en la imagen:

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora vamos a hacer miembro el grupo global Tumbes al grupo Lima, para eso seleccionar el grupo local Tumbes, dar clic derecho y clic en Propiedades, así como en la imagen:

Al hacer click se mostrara la sgte ventana:

Ahora dar click en la ficha Member of, se mostrara así como en la imagen:

Ahora dar click en el botón Add, se mostrara la sgte ventana:

Ahora dar click en el botón Advanced, se mostrara así como en la imagen:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos al grupo Lima, así como en la imagen:

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora vamos a designar al usuario Lady para que pueda crear, eliminar y administrar cuentas de usuario (que tenga la mayoría de privilegios)

Para eso seleccionamos la OU Perú, le damos click derecho y click en Delegate Control, así como en la imagen:

Al hacer click se mostrara un Asistente de bienvenida.

Ahora dar click en el botón Next, se mostrara la sgte ventana:

Ahora dar click en el botón Add, se mostrara la sgte ventana:

Ahora dar click en el botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos al grupo Lima, así como en la imagen:

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta.

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual marcaremos todos los checks (esto es xq queremos que el usuario Lady tenga todos los privilegios), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana.

Ahora dar click en el botón Finish.

Ahora para que los Usuarios puedan iniciar sesión ir al Menú inicio / Programas / Herramientas Administrativas / Directiva de seguridad del controlador de dominio (Domain Controller Security Policy), así como en la imagen:

Ahora en el panel izquierdo desplegar Local Polices – User Rights Assignment, y en el panel derecho seleccionar Allow log on localy, así como en la imagen:

Ahora al darle doble click, se mostrara la sgte ventana:

Ahora dar click en el botón Add User or Group, se mostrara la sgte ventana:

Ahora dar click al botón Browse, se mostrara la sgte ventana:

Ahora dar click al botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos al grupo Lima, así como en la imagen:

Ahora dar doble click, se mostrara la ventana anterior a esta.

Ahora dar click al botón OK, se mostrara la ventana anterior a esta.

Ahora dar click al botón Add User or Group, se mostrara la sgte ventana:

Ahora dar click al botón Browse, se mostrara la sgte ventana:

Ahora dar click al botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), al dar click se listaran todos los usuarios, grupos, etc., en la cual elegiremos al grupo Tumbes, así como en la imagen:

Ahora dar doble click, se mostrara la ventana anterior a esta.

Ahora dar click al botón OK, se mostrara la ventana anterior a esta.

Ahora dar click al botón OK, para poder realizar este cambio se debería reiniciar el equipo, pero eso tomaría mucho tiempo, para ahorrarnos tiempo damos click en el Menú Inicio y click en Ejecutar y escribir el sgte comando:

Nota: GPUPDATE / FORCE--> Forzar la actualización de las directivas de grupo
GP--> Group Policies || Update--> Actualizar || Force--> Forzar

Windows Server 2003 - Creación de Cuentas de Usuario y Equipos

2012-08-21T18:37:00.000-07:00

Una cuenta de Usuario es un objeto que contiene toda la información que define a un usuario de Windows Server 2003 y puede ser local o de dominio. Incluye el nombre de usuario y la contraseña con los que el usuario inicia la sesión y los grupos de los que la cuenta es miembro.

Cuentas de Usuario Local (Almacenadas en el equipo local)
Cuentas de Usuario de dominio (Almacenadas en Active Directory)

Creando una cuenta de usuario

Antes de empezar tienes que tener en cuenta que para poder crear Unidades Organizativas y demás objetos que veremos posteriormente debes de haber creado un controlador de dominio.

Ahora vamos a ingresar a la herramienta administrativa Usuarios y equipos de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana de Usuarios y equipos de Active Directory, ahora vamos a crear una OU (Unidad Organizativa), para eso seleccionamos nuestro dominio (en nuestro caso IDAT.MSFT) le damos clic derecho, luego clic en New y finalmente clic en Organizacional Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mí caso SENATI, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, quedando así:

Importante: vamos a configurar nuestro dominio lo sgte:

Que la longitud mínima de contraseñas sea 4.
Que la contraseña requerida no sea compleja.

Para realizar esto, debemos seleccionar nuestro dominio, darle click derecho y click en Properties, así como en la imagen:

Al hacer click se mostrara la sgte ventana:

Ahora damos click a la pestaña Group Policy, así como en la imagen:

Ahora dar click en el botón Edit, se tendrá así:

Ahora en el panel izquierdo seleccionamos Windows Setting – Security Settings – Account Policies – Password Policy, así como en la imagen:

Ahora ir al panel derecho y seleccionar la directiva Minimum password length, asi como en la imagen:

Ahora dar doble click a la directiva, se mostrara la sgte ventana por defecto.

Ahora vamos a cambiar este valor por defecto por 4, debe quedar así como en la imagen:

Ahora dar click al botón OK, se tendrá ala ventana anterior, ahora seleccionar la directiva Password must meet complexity requirements, así como en la imagen:

Ahora dar doble click a la directiva, se mostrara la sgte ventana por defecto.

Ahora vamos a cambiar este valor por defecto por Disabled, debe quedar así como en la imagen:

Ahora dar click en el botón OK, para poder realizar este cambio se debería reiniciar el equipo, pero eso tomaría mucho tiempo, para ahorrarnos tiempo damos click en el Menú Inicio y click en Ejecutar y escribir el sgte comando:

Nota: GPUPDATE / FORCE--> Forzar la actualización de las directivas de grupo
GP--> Group Policies || Update--> Actualizar || Force--> Forzar

Ahora vamos a crear un usuario dentro de la OU SENATI, para eso seleccionamos la OU, le damos click derecho, click en New y finalmente click en User, así como en la imagen:

Al hacerlo aparecerá una ventana, en la cual deberemos completar la información del Usuario, definir los sgtes datos para el Usuario:

Ahora dar click en el botón Next, se mostrara una ventana en la cual se deberá definir la contraseña, en mi caso la contraseña será 123456 y marcaremos el check Password never expires, al hacerlo aparecerá la sgte ventana:

A dar click en el botón OK se tendrá finalmente así:

Ahora dar click en el botón Next, se mostrara una ventana en la cual se muestra un resumen de lo que se ha hecho, así como en la imagen:

Ahora al dar click en el botón Finish, se tendrá así:

Ahora para que este usuario pueda acceder al controlador de dominio IDAT.MSFT, hacer lo sgte: clic en el Menú Inicio / Programas / Herramientas Administrativas / Directiva de seguridad del controlador de dominio (Domain Controller Security Policy), se tendrá así:

Ahora en el panel izquierdo seleccionar Local Policies – User Rights Assignment, así como en la imagen:

Ahora ir al panel derecho y seleccionar la directiva Allow logo on Locally, así como en la imagen:

Ahora dar doble click a la directiva, se mostrara la sgte ventana:

Ahora dar click al botón Add User or Group, se mostrara la sgte ventana:

Ahora dar click en el botón Browse, se mostrara la sgte ventana:

Ahora dar click en el botón Advanced, se mostrara la sgte ventana:

Ahora dar click en el botón Find Now (Buscar ahora), se mostraran usuarios, grupos o computadoras, ahora seleccionamos a nuestro usuario creado, así como en la imagen:

Después de seleccionar al usuario darle doble click, se mostrara la ventana anterior a esta:

Ahora dar click en el botón OK, se mostrara la ventana anterior a esta:

Nota: GPUPDATE / FORCE--> Forzar la actualización de las directivas de grupo
GP--> Group Policies || Update--> Actualizar || Force--> Forzar

Ahora vamos a cerrar nuestra sesión actual, para esto damos click en el Menú Inicio y click en Apagar (Shut Down), al hacerlo aparecerá una ventana en la cual seleccionaremos cerrar sesión del Administrador (Log off Administrator), así como en la imagen:

Al dar click en el botón OK se cerrara sesión, luego presionar las teclas CTRL + ALT + SUPR, luego de eso se mostrara una ventana en la cual en Nombre de Usuario pondremos al usuario creado con su respectiva contraseña, y también elegiremos nuestro dominio, así como en la imagen:

Al dar click en el botón OK se iniciara sesión, este es su entorno:

Nota: si este usuario entrara a la herramienta administrativa Usuarios y equipos de Active Directory, no podrá crear, modificar ni eliminar ningún objeto del directorio activo, esto es xq un usuario no tiene los suficientes privilegios para realizar dichas acciones, salvo que el Administrador le delegue algunos privilegios.

Bueno ahora vamos a cerrar sesión, para eso damos click en el Menú Inicio y click en Log Off, se
mostrara la sgte ventana:

Al dar click en el botón Log Off se mostrara la ventana de inicio de sesión, iniciaremos sesión con el Administrador, así como en la imagen:

A la hora que des click en el botón OK se iniciara sesión, Ahora vamos a crear un usuario x comandos, para eso dar clic en el Menú Inicio y clic en Ejecutar y escribir lo sgte:

Al dar click en el botón OK se mostrara la ventana de comandos:

Ahora vamos a crear al usuario Edwin dentro de la Unidad Organizativa SENATI, seria de la sgte
manera:

Explico:

DSADD USER--> Crea un objeto usuario en el controlador de dominio.
Cn=Identifica a un objeto usuario, ou=Unidad Organizativa, dc=Controlador de dominio.
-samid--> Es el nombre de la cuenta de usuario con el que se va a iniciar sesión en el controlador de dominio.
-fn (FirstName)--> Identifica el nombre del usuario.
-ln (LastName)--> Identifica el apellido del usuario.
-display--> Muestra el nombre y el apellido del usuario ingresado.
-UPN--> Identifica su correo del usuario.
-pwd--> Identifica la contraseña del usuario.

Después de digitar el comando y demás parámetros, se deberá crear el usuario y quedara así:

Ahora vamos a crear la OU llamada TECSUP a nivel de dominio, digitar lo sgte:

Se deberá tener así:

Ahora vamos a mover al usuario Edwin que esta dentro de la OU SENATI y lo trasladaremos dentro de la OU TECSUP, el comando es el sgte:

Explico:

DSMOVE--> Mover un Objeto de Active Directory.
“CN=EDWIN,OU=SENATI,DC=IDAT,DC=MSFT”--> Objeto a mover, en mi caso el usuario Edwin que esta dentro de la OU SENATI del dominio IDAT y de extensión MSFT.
-NEWPARENT “OU=TECSUP,DC=IDAT,DC=MSFT”--> Aquí especifico el nombre completo de la nueva ubicación principal del objeto a mover, en mi caso la OU TECSUP que estará como OU principal, así como en la imagen:

Ahora si quisiera eliminar a un usuario por comandos, lo puedes hacer mediante el comando
DSRM, así:

Pide una confirmación de lo que quieres realizar, solo presionas la tecla Y y ENTER, finalmente se deberá mostrar así:

Ahora vamos a eliminar la OU TECSUP, de la sgte manera:

Finalmente tendremos así:

CREANDO UNA CUENTA DE EQUIPO

Para eso damos clic en la Unidad Organizativa Computers, darle clic derecho, clic en New y finalmente clic en Computer, así como en la imagen:

Se mostrara una ventana en la cual especificaremos el nombre de nuestra cuenta de equipo, algo así:

Dar click en el botón Next, se mostrara la sgte ventana:

Dar click en el botón Finish, se tendrá así:

Mediante comandos vamos a crear una cuenta de equipo llamado RESERVA dentro de la Unidad Organizativa creada anteriormente llamada SENATI, para eso ir a la ventana de comandos, así como en la imagen:

Luego escribir lo sgte:

Se tendrá así:

Ahora si quieres eliminar esta cuenta mediante comando harías lo sgte:

Quedando finalmente así:

Windows Server 2003 - Creación de Unidades Organizativas (OU)

2012-08-21T18:32:00.000-07:00

Una unidad organizativa es un tipo especialmente útil de objeto de Active Directory contenido en un dominio. Las unidades organizativas son útiles porque pueden organizarse cientos de miles de objetos en unidades administrables dentro de un directorio. Utilice la unidad organizativa para agrupar y organizar objetos con fines administrativos como x ejemplo, delegar derechos administrativos y asignar directivas a una colección de objetos como una unidad única.

Ventajas Principales:

1.- Organizar objetos en un dominio.
2.- Delegar el control administrativo.
3.- Simplificar la administración de los recursos agrupados mas utilizados.

Antes de empezar tienes que tener en cuenta que para poder crear Unidades Organizativas y demás objetos que veremos posteriormente debes de haber creado un controlador de dominio.

Ahora vamos a ingresar a la herramienta administrativa Usuarios y equipos de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana de Usuarios y equipos de Active Directory, así como en la imagen:

Ahora vamos a crear la sgte estructura de Unidades Organizativas

Departamentos del Perú

Lima
Callao
Tumbes
Arequipa

Ahora para crear una Unidad Organizativa, seleccionamos el dominio IDAT.MSFT damos click derecho, click en New y finalmente click en Organizational Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mi caso Departamentos del Perú, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, quedando así:

Ahora vamos a crear una Unidad Organizativa dentro de la Unidad Organizativa Departamentos del Perú llamada Lima, para eso seleccionamos la Unidad Organizativa Departamentos del Perú, le damos click derecho, click en New y finalmente click en Organizational Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mi caso Lima, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, Ahora vamos a crear una Unidad Organizativa dentro de la Unidad Organizativa Departamentos del Perú llamada Callao, para eso seleccionamos la Unidad Organizativa Departamentos del Perú, le damos click derecho, click en New y finalmente click en Organizational Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mi caso Callao, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, Ahora vamos a crear una Unidad Organizativa dentro de la Unidad Organizativa Departamentos del Perú llamada Tumbes, para eso seleccionamos la Unidad Organizativa Departamentos del Perú, le damos click derecho, click en New y finalmente click en Organizational Unit, así como en la imagen:

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mi caso Tumbes, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, Ahora vamos a crear una Unidad Organizativa dentro de la Unidad Organizativa Departamentos del Perú llamada Arequipa, para eso seleccionamos la Unidad Organizativa Departamentos del Perú, le damos click derecho, click en New y finalmente click en Organizational Unit, así como en la imagen

Al dar click aparecerá una ventana en la cual pondremos el nombre de nuestra Unidad Organizativa a crear, en mi caso Arequipa, así como en la imagen:

Al dar click en el botón OK, se creara la Unidad Organizativa, quedando así:

Ahora vamos a crear la sgte estructura de Unidades Organizativas pero mediante comandos:

Cementos Lima S.A.

Departamento de Mantenimiento Eléctrico
Departamento de Mantenimiento Mecánico
Departamento de Recursos Humanos

La sintaxis es la sgte: Dsadd ou NombreDeUnidadOrganizativa

Para poder crear Unidades Organizativas o cualquier objeto de Active Directory deberás abrir la ventana de comandos, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana de comandos, así como en la imagen:

Ahora agregar el sgte comando:

Explico:

DSADD OU--> Creación de una Unidad Organizativa.
“OU=Cementos Lima S.A.,DC=IDAT,DC=MSFT”--> Primeramente mediante el primer parámetro “OU=Cementos Lima S.A.” especifico el nombre de mi OU a crear, luego separado por una coma (,) sigue el segundo parámetro “DC=IDAT” en la cual se especifica el nombre de nuestro dominio, luego separado por una coma (,) sigue el tercer parámetro “DC=MSFT” en la cual se especifica la extensión que le estamos dando a nuestro dominio (este viene a ser dominio de tipo), se debe tener así como en la imagen:

Ahora vamos a crear nuestra segunda Unidad Organizativa llamada Departamento de Mantenimiento Eléctrico, para la cual ponemos el sgte comando y demás parámetros.

Explico:

DSADD OU--> Creación de una Unidad Organizativa.
“OU=Departamento de Mantenimiento Eléctrico,OU=Cementos Lima S.A.,DC=IDAT,DC=MSFT”--> Primeramente mediante el primer parámetro “OU=Departamento de Mantenimiento Eléctrico” especifico el nombre de mi OU a crear, luego separado por una coma (,) sigue el segundo parámetro “OU=Cementos Lima S.A.” en la cual especifico la OU que contendrá la Unidad Organizativa especificada en el primer parámetro (esta OU ya existe), luego separado por una coma (,) sigue el tercer parámetro “DC=IDAT” en la cual se especifica el nombre de nuestro dominio, luego separado por una coma (,) sigue el cuarto parámetro “DC=MSFT” en la cual se especifica la extensión que le estamos dando a nuestro dominio (este viene a ser dominio de tipo).

Ahora vamos a crear nuestra tercera Unidad Organizativa llamada Departamento de Mantenimiento Mecánico, para la cual ponemos el sgte comando y demás parámetros, así como en la imagen:

Ahora vamos a crear nuestra cuarta Unidad Organizativa llamada Departamento de Recursos Humanos, para la cual ponemos el sgte comando y demás parámetros, así como en la imagen:

Finalmente tendremos así como en la imagen:

Moviendo objetos dentro de un dominio

Los objetos que se pueden mover son los sgtes:

Usuarios.
Unidades Organizativas.
Impresoras.
Equipos.
Grupos.
Carpetas Compartidas.

Nos dirigimos a la Herramienta Administrativa Usuarios y Equipos de Active Directory.

Para nuestro ejemplo, vamos a mover la OU llamada Cementos Lima S.A. y todo objeto que contenga, para eso seleccionar la ou le damos click derecho y seleccionamos All Tasks y finalmente click en Move, así como en la imagen:

A la hora que das click se mostrara la sgte ventana en la cual especificaremos que la OU Cementos Lima S.A. este dentro de la OU llamada Lima que se encuentra dentro de la OU llamada Departamentos del Perú, así como en la imagen:

Al dar click en el botón OK se moverá la OU y se tendrá así como en la imagen:

Ahora vamos a mover la OU llamada Arequipa que esta dentro de la OU llamada Departamentos del Perú a nivel del dominio pero mediante comandos, para hacerlo presionar las teclas Windows + R, al hacerlo se mostrara la ventana de Ejecutar y escribir CMD, así como en la imagen:

Al dar click en el botón OK se mostrara la ventana de comandos y escribir el sgte comando:

Explico:

DSMOVE--> Mover un Objeto de Active Directory.
“OU=Arequipa,OU=Departamentos del Peru,DC=IDAT,DC=MSFT”--> Objeto a mover, en mi caso la OU Arequipa que esta dentro de la OU Departamentos del Perú del dominio IDAT y de extensión MSFT.
-NEWPARENT “OU=Arequipa,OU=Departamentos del Peru,DC=IDAT,DC=MSFT”--> Aquí especifico el nombre completo de la nueva ubicación principal del objeto a mover, en mi caso la OU Arequipa que estará como OU principal, así como en la imagen:

Y si quisiéramos eliminar una OU, lo puedes hacer seleccionando la OU darle click derecho y click en Delete, así como en la imagen:

O lo podrías hacer mediante comandos:

DSRM “NombreObjeto”--> Elimina un objeto de Active Directory.

Windows Server 2003 - Creación de controlador de Dominio

2012-08-21T18:29:00.000-07:00

Un Controlador de Dominio almacena los datos de directorios y administran la comunicación entre usuarios y dominios, que incluye los procesos de inicio de sesión de usuario, autenticación y búsqueda de directorios. Al instalar Active Directory en un equipo que utiliza Windows Server 2003, el equipo se convierte en un controlador de dominio.

Primeramente vamos a verificar el nombre de la PC y grupo de trabajo, presionar las teclas Windows + Pausa, al hacer esto se mostrara la ventana de Propiedades del Sistema, así como en la imagen:

Nota 1: Debes de verificar que tanto el nombre de la PC y Grupo de trabajo no contengan caracteres no validos, por ejemplo el carácter “_”.
Nota 2: Debes de tener el CD de instalación de Windows Server 2003.

Ahora vamos al Panel de Control, para eso presionar las teclas Windows + R, se mostrara la ventana de Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana del Panel de Control, ahora seleccionar Network Connections (Conexiones de Red), así como en la imagen:

Ahora debes darle doble click, se mostrara la sgte ventana:

Ahora debes seleccionar Local Area Connection, darle click derecho, luego click en Properties (Propiedades), así como en la imagen:

Al dar click se mostrara una ventana en la cual deberás seleccionar Internet Protocol (TCP/IP), así como en la imagen:

Ahora dar click al botón Properties, al hacerlo se mostrara una ventana en la cual tiene que estar configurado lo sgte:

Dirección IP
Máscara de Subred
Puerta de Enlace
Servidor DNS Preferido

Un ejemplo es así:

Una vez verificado esto, vamos a comenzar con la instalación de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Nota:

DCPROMO--> Promover a Controlador de Dominio.
DC--> Domain Controller || PROMOà Promover.

Al dar click en el botón OK, se mostrara una ventana de bienvenida, así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual nos informa de la compatibilidad del Sistema Operativo (SO), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual elegiremos Domain in a new forest (dominio en un nuevo bosque), así como en la imagen:

Ahora dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos el nombre del nuevo dominio, en nuestro caso nuestro dominio se llamara IDAT.MSFT, así como en la imagen:

Nota: MSFT--> MICROSOFT.

Ahora al dar click al botón Next, se mostrara la sgte ventana en la cual especificaremos el nombre NetBIOS, lo dejamos por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos en donde se almacenara la carpeta de base de datos y registro de Active Directory, en mi caso lo dejare por defecto, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara la sgte ventana en la cual especificaremos la carpeta donde se va a compartir como volumen del sistema, en mi caso la dejo por defecto, así como en la imagen:

Nota: Aquí debe de especificarse una partición, en la cual el Sistema de Archivos sea NTFS.

Ahora al dar click en el botón Next, se mostrara una ventana en la cual la dejaremos por defecto.

Ahora al dar click en el botón Next, se mostrara una ventana en la cual especificaremos una contraseña para cuando inicie el equipo en el modo de restauración de servicios de directorio

Nota: Esta contraseña debe ser lo mas compleja posible, usar letras, números, caracteres especiales.

En nuestro no asignaremos contraseña alguna, así como en la imagen:

Ahora al dar click en el botón Next, se mostrara una ventana en la cual nos muestra un resumen de lo realizado hasta ahora, así como en la imagen:

Bueno, luego de esperar por un buen rato, se mostrara la sgte ventana en la cual nos muestra que la instalación de Active Directory se realizo con éxito, así como en la imagen:

Ahora dar click al botón Finish, se mostrara la sgte ventana:

Ahora vamos a ingresar a la herramienta administrativa Usuarios y equipos de Active Directory, para eso dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK, se mostrara la ventana de Usuarios y equipos de Active Directory, así como en la imagen:

Nota: Esta herramienta administrativa no existe si el equipo esta como Grupo de Trabajo.

Windows Server 2003 - Creación de consola de Administración de Microsoft Windows

2012-08-21T18:26:00.000-07:00

Una consola de Administración de Microsoft Windows (MMC) se utiliza para crear, guardar y abrir las herramientas administrativas, llamadas consolas, que administran el hardware, software y los componentes de red del sistema operativo Windows.

Para crear una consola de administración dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte:

Al dar click en el botón OK se mostrara la sgte ventana:

Ahora vamos a agregar un complemento, para eso dar click en el Menú File y luego click en Add/Remove Snap-in, así como en la imagen:

Al hacer click se mostrara la sgte ventana en la cual darás click en el botón Add (Agregar):

Al dar click en el botón se mostrara la sgte ventana en la cual elegiremos Device Manager (Administración de dispositivos), así como en la imagen:

Ahora al dar click en el botón Add se mostrara la sgte ventana en la cual se dejara x defecto.

Ahora dar click en el botón Finish, se mostrara la ventana anterior:

Ahora al dar click en el botón Finish se mostrara la ventana anterior a esta con la herramienta elegida anteriormente, así como en la imagen:

Ahora al dar click en el botón OK, se mostrara la ventana anterior a esta, así como en la imagen:

Ahora vamos a guardar este archivo de administración, para esto dar click en el Menú File y click en Save As, así como en la imagen:

Al dar click se mostrara una ventana en la cual especificaras en donde se almacenara nuestra consola de administración, en mi caso la almacenare en mi Escritorio y con el nombre Consola1, así como en la imagen:

Ahora al dar click en el botón Save se guardara el archivo, se tendrá así:

Ahora si seleccionas la Herramienta Administrativa llamada Device Manager, podrás ver todo Hardware de la PC, así como en la imagen:

Ejercicios Propuestos

1.- Crear una consola de administración que apunte a los siguientes complementos:

Carpetas compartidas.
Visor de sucesos
Escritorios Remotos

2.- Crear una consola de administración que apunte a los siguientes complementos:

Servicios
Usuarios y equipos de Active directory
Desfragmentador de disco

Solución

Solucion Ejercicio 1:

Para crear una consola de administración dar click en el Menú Inicio y click en Ejecutar y escribir lo sgte

Al hacer click en el botón OK se mostrara la ventana de consola de administración, ahora dar click en el Menú File y luego click en Add/Remove Snap-in, así como en la imagen:

Al hacer click se mostrara la sgte ventana en la cual darás click en el botón Add (Agregar):

Al dar click en el botón se mostrara la sgte ventana en la cual elegiremos Shared Folders (Carpetas compartidas), así como en la imagen:

Ahora al dar click en el botón Add se mostrara la sgte ventana en la cual se dejara x defecto.

Ahora dar click en el botón Finish, se mostrara la ventana anterior, ahora elegir Event Viewer, así como en la imagen:

Ahora al dar click en el botón Add se mostrara la sgte ventana en la cual se dejara x defecto:

Ahora dar click en el botón Finish, se mostrara la ventana anterior, ahora elegir Remote Desktops (Escritorios Remotos), así como en la imagen:

Ahora al dar click en el botón Add, ahora dar click en el botón Close.

Al dar click en el botón se mostrara la ventana anterior a esta, en la cual darás click en el botón OK.

Ahora al dar click en el botón OK, se mostrara la ventana anterior a esta, así como en la imagen:

Ahora vamos a guardar este archivo de administración, para esto dar click en el Menú File y click en Save As, así como en la imagen:

Solucion Ejercicio 2:

Para crear un nuevo archivo de consola damos click en el Menú File y click en New, así como en la imagen:

Al dar click se obtendrá un nuevo archivo en blanco, como en la imagen:

Ahora dar click en el Menú File y luego click en Add/Remove Snap-in, así como en la imagen:

Al hacer click se mostrara la sgte ventana en la cual darás click en el botón Add (Agregar)

Al dar click en el botón se mostrara la sgte ventana en la cual elegiremos la herramienta administrativa Services, así como en la imagen:

Ahora al dar click en el botón Add se mostrara una ventana en la cual se dejara x defecto y le darás click en el botón Finish, al hacerlo se mostrara la ventana anterior, ahora seleccionaras la herramienta administrativa Active Directory Users and Computers, así como en la imagen:

Ahora al dar click en el botón Add se mostrara una ventana en la cual se dejara x defecto y le darás click en el botón Finish, al hacerlo se mostrara la ventana anterior, ahora dale click en el botón Close, se mostrara la ventana anterior, teniendo así:

Ahora al dar click en el botón OK, se tendrá la ventana anterior a esta:

Ahora vamos a guardar este archivo de administración, para esto dar click en el Menú File y click en Save As, así como en la imagen:

Visual C#.NET - Introducción a C# (Parte 6)

2012-08-18T21:12:00.001-07:00

Hola nuevamente, mediante esta segunda parte del manual continuare con la Introducción a C#.

Para esta aplicación habrá que crear un nuevo formulario, para eso hacer lo sgte:

Al hacer esto se mostrara la sgte ventana en la cual daremos x nombre: FrmADO5, como en la imagen:

Al dar clic en Agregar se tendrá así:

Ahora realizar el sgte diseño. Nota: El formato del listview se hará x código.

Ahora procederemos a crear nuestra Biblioteca de Clases, para eso dar clic derecho a la Solución, seleccionar Agregar y finalmente clic en Nuevo Proyecto, como en la imagen:

Al hacer esto se mostrara una ventana en la cual en el panel izquierdo deberás seleccionar Windows y en el panel derecho deberás elegir Biblioteca de Clases, En nombre deberás de poner el nombre del proyecto, en nuestro caso Componente y además establecer una ubicación en donde se guardara este proyecto, así como en la imagen:

Al dar clic en el botón Aceptar se creara el proyecto y se mostrara así:

Ahora seleccionaremos Class1.cs y lo eliminaremos. Ahora crear una nueva clase, para eso dar clic derecho en Componente, seleccionar Agregar y finalmente clic en Nuevo Elemento, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaremos Clase y en Nombre estableceremos el nombre ClsComponente, así como en la imagen:

Al dar clic en Agregar, se mostrara lo sgte:

En esta clase vamos a crear nuestros Métodos con valor o sin valor de retorno que podrán ser accedidos por la Aplicación Windows.

La programación para esta clase será la sgte:

using System;

using System.Collections.Generic;

using System.Text;

using System.Data;//Objetos de ADO

using System.Data.SqlClient;//Provider de SQL Server

namespace Componente

{

public class ClsComponente

{

SqlConnection Cn = new

SqlConnection("Server=(Local);Database=Northwind;Uid=sa;Pwd=");

public DataSet Listar_Region()

{

SqlDataAdapter Da = new SqlDataAdapter("Sp_ListarRegion"

, Cn);

DataSet Ds = new DataSet();

Da.Fill(Ds);

return Ds;

}

public DataSet Listar_Territorio(int Region)

{

String Cad = "Sp_ListarTerritorio " + Region;

SqlDataAdapter Da = new SqlDataAdapter(Cad, Cn);

DataSet Ds = new DataSet();

Da.Fill(Ds);

return Ds;

}

public DataSet Listar_Empleados(String Territorio)

{

String Cad = "Sp_ListarEmpleados '" + Territorio + "'";

SqlDataAdapter Da = new SqlDataAdapter(Cad, Cn);

DataSet Ds = new DataSet();

Da.Fill(Ds);

return Ds;

}

public DataSet Mostrar_Ordenes(int Empleado)

{

String Cad = "Sp_MostrarOrdenes " + Empleado;

SqlDataAdapter Da = new SqlDataAdapter(Cad, Cn);

DataSet Ds = new DataSet();

Da.Fill(Ds);

return Ds;

}

public DataSet Mostrar_Detalle(int Orden)

{

String Cad = "Sp_MostrarDetalles " + Orden;

SqlDataAdapter Da = new SqlDataAdapter(Cad, Cn);

DataSet Ds = new DataSet();

Da.Fill(Ds);

return Ds;

}

Ahora seleccionar el proyecto Componente, darle clic derecho y clic en Generar, así como en la imagen:

Para saber si se ha generado el proyecto correctamente ir al Menú Ver y clic en Ventana de Resultados. Se tendrá algo así:

Con esto quiere decir de que se ha creado la DLL (Dynamic Library Language) llamada Componente, como sabrás esta DLL es reutilizable, quiere decir que cualquier proyecto (puede ser Visual Basic 6.0, etc.) puede invocar sus métodos. Ahora seleccionar AplicacionWindows, darle clic derecho y dar clic en Agregar Referencia, así como en la imagen:

Al hacer esto aparecerá una ventana en la cual daremos clic en la ficha Proyectos, en la cual seleccionaremos Componente, así como en la imagen:

Ahora dar clic en el botón Aceptar, se tendrá así:

Ahora seleccionar el Proyecto AplicaciónWindows dar clic derecho y clic en Generar, así como en la imagen:

Al hacer esto se mostrara la sgte información en la ventana de resultados:

Ahora vamos a darle un formato al DataGridView llamado DgvDetalle, para eso lo seleccionamos, damos clic derecho y damos clic en Editar Columnas, así como en la imagen:

Al hacer esto aparecerá la sgte ventana en la cual daremos clic en el botón Agregar:

Al dar clic en el botón Agregar, se mostrara una ventana en la cual pondremos lo sgte:

Ahora dar clic en el botón Agregar y clic en Cancelar, se mostrara la sgte ventana en la cual en la propiedad DataPropertyName pondremos el nombre del campo a mostrar, en mí caso es OrderID, en la propiedad Width poner como ancho de columna 70, así como en la imagen:

Ahora dar clic en el botón Agregar, se mostrara una ventana en la cual pondremos lo sgte:

Ahora dar clic en el botón Agregar y clic en Cancelar, se mostrara la sgte ventana en la cual en la propiedad DataPropertyName pondremos el nombre del campo a mostrar, en mí caso es ProductName, en la propiedad Width poner como ancho de columna 150, así como en la imagen:

Ahora dar clic en el botón Agregar, se mostrara una ventana en la cual pondremos lo sgte:

Ahora dar clic en el botón Agregar y clic en Cancelar, se mostrara la sgte ventana en la cual en la propiedad DataPropertyName pondremos el nombre del campo a mostrar, en mí caso es UnitPrice, en la propiedad Width poner como ancho de columna 50, así como en la imagen:

Ahora dar clic en el botón Agregar, se mostrara una ventana en la cual pondremos lo sgte:

Ahora dar clic en el botón Agregar y clic en Cancelar, se mostrara la sgte ventana en la cual en la propiedad DataPropertyName pondremos el nombre del campo a mostrar, en mí caso es Quantity, en la propiedad Width poner como ancho de columna 60, así como en la imagen:

Ahora dar clic en el botón Agregar, se mostrara una ventana en la cual pondremos lo sgte:

Ahora dar clic en el botón Agregar y clic en Cancelar, se mostrara la sgte ventana en la cual en la propiedad DataPropertyName pondremos el nombre del campo a mostrar, en mí caso es Total, en la propiedad Width poner como ancho de columna 60, así como en la imagen:

Ahora dar clic en el botón Aceptar teniendo el sgte formato:

Ahora dar doble clic al formulario y ubicarte en la sgte parte del código y poner lo sgte:

Ahora volver al formulario y dar doble clic al formulario y poner el sgte código:

Ahora volver al formulario y dar doble clic en el ListBox llamado LstRegion y programar lo sgte:

Ahora volver al formulario y dar doble clic en el ListBox llamado LstTerritorio y programar lo sgte:

Ahora volver al formulario y seleccionar el ListView llamado LvEmpleados e ir a sus propiedades y en la cual daremos doble clic en el evento clic.

Al hacer esto se mostrara la ventana de código del ListView, la programación será la sgte:

Ahora volver al formulario y seleccionar el ListView llamado LvOrdenese ir a sus propiedades y en la cual daremos doble clic en el evento clic

Al hacer esto se mostrara la ventana de código del ListView, la programación será la sgte:

Los Procedimiento Almacenados (Store Procedure) son los sgtes:

Set Statistics Time On

Set Language Spanish

Set Quoted_Identifier Off

Set Dateformat DMY

Use Northwind --Base de Datos a trabajar

If Exists(Select Name From SysObjects Where Name='Sp_listarregion'

And Type='P')

Begin

Drop Procedure Sp_Listarregion

End

Create Procedure Sp_Listarregion

Select RegionID,RegionDescription From Region

Execute Sp_Listarregion

If Exists(Select Name From SysObjects Where Name='sp_listarterritorio'

And Type='p')

Begin

Drop Procedure sp_listarterritorio

End

Create Procedure Sp_ListarTerritorio

@Region Int

Select TerritoryID,TerritoryDescription From Territories

Where RegionID=@Region

Execute Sp_ListarTerritorio 1

If Exists(Select Name From SysObjects Where Name='Sp_ListarEmpleados'

And Type='P')

Begin

Drop Procedure Sp_Listarempleados

End

Create Procedure Sp_ListarEmpleados

@Territorio Varchar(10)

Select et.EmployeeID,(e.LastName+Space(1)+e.FirstName)As Empleados,e.Title,

(Cast(Day(BirthDate)As Varchar(2))+'/'+Cast(Month(BirthDate)As

Varchar(2))+'/'+ Cast(Year(BirthDate)As Varchar(4)))As BirthDate

From employees As e Inner Join EmployeeTerritories As et

On et.EmployeeID=e.EmployeeID

Where et.TerritoryID=@Territorio

Execute Sp_ListarEmpleados '80202'

If Exists(Select Name From Sysobjects Where Name='Sp_MostrarOrdenes'

And Type='P')

Begin

Drop Procedure Sp_Mostrarordenes

End

Create Procedure Sp_MostrarOrdenes

@Empleado Int

Select OrderID,(Cast(Day(OrderDate)As

Varchar(2))+'/'+Cast(Month(OrderDate)As Varchar(2))+'/'+

Cast(Year(OrderDate)As varchar(4)))As OrderDate,(Cast(Day(ShippedDate)As

Varchar(2))+'/'+

Cast(Month(ShippedDate)As varchar(2))+'/'+Cast(Year(ShippedDate)As

varchar(4)))As ShippedDate,

ShipCountry,Datediff(d,OrderDate,ShippedDate)As Dias_Envios

From Orders Where EmployeeID=@Empleado

Execute Sp_MostrarOrdenes 7

If Exists(Select Name From Sysobjects Where Name='Sp_MostrarDetalles'

And Type='P')

Begin

Drop Procedure Sp_MostrarDetalles

End

Create Procedure Sp_MostrarDetalles

@OrderID Int

Select od.OrderId,ProductName,od.UnitPrice,Quantity,(od.UnitPrice*Quantity)

As Total From Products As p Inner Join [order details] As Od

On p.ProductID=od.ProductID

Where OrderID=@OrderID

Execute Sp_MostrarDetalles 10248

Ahora como queremos ejecutar este formulario, hay que ir al archivo Program.cs y modificar el nombre del formulario el cual queremos que se ejecute, en nuestro caso es el FrmADO5, así como en la imagen:

Ahora hay que ejecutar el formulario, para eso presionar la tecla de función F5, al hacerlo se mostrara el formulario en la cual cuando selecciones una región se mostrara en el segundo ListBox los territorios que pertenecen a esa región, al elegir un territorio se mostrara en el primer ListView los empleados que pertenecen a ese territorio, al elegir un empleado se mostrara en el segundo ListView todas las ordenes de ese empleado, al elegir una orden se mostrara en el DataGridView el detalle de la orden seleccionada, además se deberá mostrar el monto total de la orden seleccionada en el TextBox, así como en la imagen:

Con este sexto y ultimo ejemplo básico tuvo como finalidad el brndarte un panorama de como iniciarte con este lenguaje.

Visual C#.NET - Introducción a C# (Parte 5)

2012-08-18T21:05:00.001-07:00

Hola nuevamente, mediante esta segunda parte del manual continuare con la Introducción a C#.

Para esta aplicación habrá que crear un nuevo formulario, para eso hacer lo sgte:

Al hacer esto se mostrara la sgte ventana en la cual daremos x nombre: FrmADO4, como en la imagen:

Al dar clic en Agregar se tendrá así:

Ahora realizar el sgte diseño:

Ahora dar doble clic en el formulario, al hacerlo se mostrara lo sgte:

Primeramente vamos a crear nuestra cadena de conexión “POR CÓDIGO”, para esto ubicarnos a esta altura del código y poner lo sgte:

Ahora ubicarnos a esta altura del código y definir nuestra cadena de conexión. En mi caso estoy trabajando con la Autenticación de SQL Server con el usuario sa y sin contraseña, con la Base de Datos Northwind y mi servidor (Local).

Ahora ir a esta parte del código y programar lo sgte:

Ahora volver al formulario y dar doble clic al ComboBox, la programación para este control es la sgte:

Los Procedimientos Almacenados (Store Procedure) son los sgtes:

Set Statistics Time On

Use Northwind --Base de Datos a trabajar

--Primer Procedimiento Almacenado

If Exists(Select Name From SysObjects Where Name='Sp_Clientes'

And Type='P')

Begin

Drop Procedure Sp_Clientes

End

Create Procedure Sp_Clientes

Select CustomerID,CompanyName From Customers

Execute Sp_Clientes

--Segundo Procedimiento Almacenado

If Exists(Select Name From Sysobjects Where Name='Sp_Ordenes' And Type='P')

Begin

Drop Procedure Sp_Ordenes

End

Create Procedure Sp_Ordenes

@Customerid Varchar(5)

Select o.OrderID,o.OrderDate,Sum(od.Unitprice*od.Quantity)As Monto

From Orders As o Inner Join [Order Details]As od

On o.OrderID=od.OrderID

Where o.CustomerID=@CustomerID

Group by o.OrderID,o.OrderDate

Order by o.OrderID Asc

Execute Sp_Ordenes 'VINET'

Ahora hay que ejecutar el formulario, para eso presionar la tecla de función F5, al hacerlo se mostrara el formulario en la cual al seleccionar un clientes me mostrara las ordenes de ese cliente y además la cantidad de ordenes y el monto total de todas las ordenes, así como en la imagen:

Con este quinto ejemplo te doy un ejemplo básico de como iniciarte con este lenguaje, la continuación sigue en la entrada Visual C#.NET - Introducción a C# (Parte 6)

Visual C#.NET - Introducción a C# (Parte 4)

2012-08-18T21:02:00.001-07:00

Hola nuevamente, mediante esta cuarta parte del manual continuare con la Introducción a C#.

Para esta aplicación habrá que crear un nuevo formulario, para eso hacer lo sgte:

Al hacer esto se mostrara la sgte ventana en la cual daremos x nombre: FrmADO3, como en la imagen:

Al dar clic en Agregar se tendrá así:

Ahora vamos a combinar los dos ejercicios anteriores, primeramente seleccionaremos Customers y desplegaremos el DropDowList y daremos clic en DataGridView y luego lo arrastraremos al formulario, luego, volvemos a seleccionar Customers y desplegaremos el DropDowList y daremos clic en Detalles y también procederemos a arrastrarlo al formulario, el diseño deberá quedar algo así:

Ahora hay que ejecutar el formulario, para eso presionar la tecla de función F5, al hacerlo se mostrara el formulario.

Ahora navegar por los registros y además realizar un mantenimiento ya no es tan complicado como antes “SIN PROGRAMAR NADA”.

Con este cuarto ejemplo te doy un ejemplo básico de como iniciarte con este lenguaje, la continuación sigue en la entrada Visual C#.NET - Introducción a C# (Parte 5)

Visual C#.NET - Introducción a C# (Parte 3)

2012-08-18T20:58:00.001-07:00

Hola nuevamente, mediante esta tercera parte del manual continuare con la Introducción a C#.

Para esta aplicación habrá que crear un nuevo formulario, para eso hacer lo sgte:

Al hacer esto se mostrara la sgte ventana en la cual daremos x nombre: FrmADO2, como en la imagen:

Dar clic en el botón Agregar, Ahora como ya hemos establecido nuestro Origen de Datos pues seleccionaremos Customers y desplegaremos el DropDowList y daremos clic en Detalles, así como en la imagen:

Ahora arrastraremos Customers el formulario, a la hora que lo haces debes de ordenar los controles, algo así:

Ahora hay que ejecutar el formulario, para eso presionar la tecla de función F5, al hacerlo se mostrara el formulario.

Con este tercer ejemplo te doy un ejemplo básico de como iniciarte con este lenguaje, la continuación sigue en la entrada Visual C#.NET - Introducción a C# (Parte 4)

Visual C#.NET - Introducción a C# (Parte 2)

2012-08-18T20:47:00.001-07:00

Hola nuevamente, mediante esta segunda parte del manual continuare con la Introducción a C#.

Para esta aplicación habrá que crear un nuevo formulario, para eso hacer lo sgte:

Al hacer esto se mostrara la sgte ventana en la cual daremos x nombre: FrmADO1, como en la imagen:

Al dar clic en Agregar se tendrá así:

Ahora para mostrar los orígenes de datos hay que ir al Menú Datos y clic en Mostrar Orígenes de Datos, así como en la imagen:

Se mostrara el sgte panel:

Ahora dar clic en el vínculo Agregar Nuevo Origen de Datos, al hacerlo aparecerá la sgte ventana en la cual seleccionare Base de Datos:

Al hacer clic en Siguiente se mostrara la sgte pantalla:

Aquí tengo que establecer mi conexión, como no he hecho ninguna pues le doy clic en el botón Nueva Conexión, al hacerlo aparecerá la sgte ventana:

En nombre del servidor poner (Local) ya que hace referencia al servidor local, en Conexión con el servidor trabajaremos con la Autenticación de SQL Server donde en Nombre de Usuario pondremos al usuario sa (System Administrator), luego en Establecer conexión con una base de datos elegiremos la BD Northwind y luego de todo esto dar clic en el botón Probar Conexión, al hacerlo se mostrara la sgte ventana:

Al dar clic en Aceptar se mostrara la pantalla anterior:

Al dar clic en el botón Siguiente se mostrara una ventana en la cual me pregunta si deseo guardar mi cadena de Conexión en el archivo app.config, se recomienda que si, así que deja todo como esta, así como en la imagen:

Al dar clic en el botón Siguiente se mostrara la sgte ventana en la cual marcaremos todos los checks, así como en la imagen:

Al dar clic en el botón Finalizar se tendrá lo sgte:

Ahora seleccionar Customers y desplegar el DropDowList y clic en DataGridView, así como en la imagen:

Ahora seleccionar Customers y arrastrarlo al formulario, a la hora que lo haces debes de ordenar los controles, teniendo así:

Ahora hay que ejecutar el formulario, para eso presionar la tecla de función F5, al hacerlo se mostrara el formulario.

Con este segundo ejemplo te doy un ejemplo básico de como iniciarte con este lenguaje, la continuación sigue en la entrada Visual C#.NET - Introducción a C# (Parte 3)

Visual C#.NET - Introducción a C# (Parte 1)

2012-08-18T20:28:00.001-07:00

Hola nuevamente, mediante esta primera parte del manual les daré los principio básicos para poder conocer el Lenguaje C#, ya que en sintaxis es bastante similar a Java.

Requisitos de Software:

• SQL Server 2005 o superior (Para el ejemplo se utilizara SQL Server 2005).
• Visual Studio 2005 o superior (Para el ejemplo se utilizara Visual Studio 2005).

Para iniciar Visual Studio 2005 ir al Menú Inicio y luego clic en Ejecutar y poner lo sgte:

Luego de esto Aparecerá la página de Inicio de Visual Studio 2005, como en la imagen:

Antes de crear nuestra Aplicación para Windows vamos a crear una nueva Solución, para eso clic en el Menú Archivo, luego ir al submenú Nuevo y finalmente clic en Proyecto, al hacerlo aparecerá una ventana en la cual en la panel izquierdo desplegar Otros tipos de Proyectos y elegir Soluciones de Visual Studio y en el panel derecho elegir Solución en Blanco, Ahora en Nombre poner el nombre a la solución, en mi caso Proyectos y en ubicación elegir una carpeta que en mi caso esta en el escritorio con el nombre Aplicaciones, así como en la imagen:

Ahora dar clic en Aceptar, se tendrá así:

Ahora en la Solución creada dar clic derecho, seleccionar Agregar y finalmente clic en Nuevo Proyecto, así como en la imagen:

Al hacer esto aparecerá la sgte ventana en la cual en el panel izquierdo desplegar Visual C# y elegir Windows, en el panel derecho elegir Aplicación para Windows, Además de poner el nombre del Proyecto y la ubicación como en la imagen:

Al hacer esto se deberá tener lo sgte:

Ahora realizar el sgte diseño para el formulario y establecer las sgtes propiedades para cada control:

Ahora dar doble clic al botón Nuevo, al hacerlo aparecerá lo sgte:

La programación para este botón será el sgte:

private void BtnNuevo_Click(object sender, EventArgs e)

{

foreach (Control Obj in this.Controls)

{

if (Obj is TextBox)

{

Obj.Text = "";

}

TxtCodigo.Focus();

}

Ahora ubicarte a esta altura del código y declara las sgtes variables:

Ahora volver al formulario y dar doble clic al botón Salir, la programación para este botón
será la sgte:

private void BtnSalir_Click(object sender, EventArgs e)

{

try

{

this.Close();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

Ahora volver al formulario y dar doble clic al botón Calcular, la programación para este

botón será la sgte:

private void BtnCalcular_Click(object sender, EventArgs e)

{

try

{

double pp, ep, ef, prom;

Ntotal += 1; // Ntotal=Ntotal+1

pp = Convert.ToInt32(TxtPP.Text);

ep = Convert.ToInt32(TxtEP.Text);

ef = Convert.ToInt32(TxtEF.Text);

prom = (pp + ep + 2 * ef) / 4;

Suma += prom;

TxtPromedio.Text = prom.ToString();

if (prom >= 10.5)

{

Naprob += 1;

TxtCondicion.Text = "Aprobado";

TxtCondicion.ForeColor = Color.Blue;

}

else

{

Nrodes += 1;

TxtCondicion.Text = "Desaprobado";

TxtCondicion.ForeColor = Color.Red;

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

Si te das cuenta, cuando das doble click a un boton (x ejm: al boton nuevo), automaticamente se crea: private void BtnNuevo_Click (object sender, EventArgs e), si quieres cambiar el nombre del procedimiento BtnNuevo por LimpiarControles y que este ligado con el boton, pues deberas de realizar algunos pasos adicionales antes de programar, para la programacion del boton Informe le cambiaremos el nombre del procedimiento.

Ahora seleccionar el boton Informe e ir a la ventana de propiedades

Ahora darle clic a este botón, al hacer esto ir al evento Clic y escribir Mostrar_Informe, así como en la imagen:

Ahora darle doble clic al botón Informe, la programación será la sgte:

private void Mostrar_Informe(object sender, EventArgs e)

{

try

{

// Instanciar el Form FrmInforme

FrmInforme objInforme = new FrmInforme();

objInforme.NroAprobI = Naprob;

objInforme.NroDespI = Nrodes;

objInforme.NtotalI = Ntotal;

objInforme.SumaI = Suma;

objInforme.ShowDialog();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

No ejecutes el formulario aun xq el formulario de nombre FrmInforme no ha sido creado, para crearlo ir al proyecto llamado AplicacionWindows darle click derecho y seleccionar Agregar y finalmente dar click en Nuevo Elemento, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual elegiremos Windows Forms y le pondremos por nombre FrmInforme, asi como en la imagen:

Al dar click en el boton Aceptar se mostrara lo sgte:

El diseño de este formuario es el sgte:

Ahora darle doble clic al formulario y ubícate a esta altura del código y declara las sgtes variables:

Ahora la programación para el evento FrmInforme_Load del formulario es la sgte:

private void FrmInforme_Load(object sender, EventArgs e)

{

try

{

LblAluAprob.Text = NroAprobI.ToString();

LblAluDesap.Text = NroDespI.ToString();

LblTotal.Text = NtotalI.ToString();

double prom = SumaI / NtotalI;

LblPromedio.Text = prom.ToString();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

Ahora vuelve al formulario y dale doble click al boton Aceptar, la programacion para este botón sera la sgte:

private void BtnAceptar_Click(object sender, EventArgs e)

{

try

{

this.Close();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

Ahora vuelve al formulario y dale doble click al boton Cancelar, la programacion para este botón sera la sgte:

private void BtnCancelar_Click(object sender, EventArgs e)

{

try

{

this.Close();

}

catch (Exception ex)

{

MessageBox.Show(ex.Message.ToString());

}

Ahora para saber que formulario se va a ejecutar,ir al Explorador de soluciones y dar doble clic al archivo Program.cs

Al hacer doble clic se mostrara el sgte código:

Para ejecutar el formulario presionar la tecla de función F5, al hacerlo se cargara el formulario.

Al hacer clic en el botón Calcular, se mostrara el sgte resultado:

Si das clic en el botón Informe se vera lo sgte:

Con este primer ejemplo te doy un ejemplo básico de como iniciarte con este lenguaje, la continuación sigue en la entrada Visual C#.NET - Introducción a C# (Parte 2)

VisualAge for RPG - Creación de un Proyecto Con Visual Age For Rpg 6.0

2012-08-18T16:38:00.000-07:00

VisualAge RPG es un componente del producto IBM WebSphere Development Studio Client para iSeries. Puede utilizarlo para crear aplicaciones que tengan Interfaces Gráficas de Usuario (GUI) que se procesan con una versión mejorada del lenguaje RPG. Las aplicaciones que se crean pueden acceder a los datos almacenados en servidores iSeries.

Primeramente deberemos de iniciar nuestro programa, para eso dar click en el Menú Inicio – Programas – IBM CODE y VisualAge RPG 6.0 – VisualAge RPG – Diseñador GUI, algo así:

Una vez dado click comenzara a cargar el programa mostrándonos una ventana de bienvenida, teniendo así:

Una vez que se cierre la ventana de bienvenida nos mostrara la ventana de trabajo de Visual Age, teniendo así:

Ahora comenzaremos a darle un nombre a nuestra ventana con lienzo, para eso damos click derecho en la ventana de lienzo, y elegimos Propiedades, teniendo así:

Una vez dado click nos mostrara la ventana 1 en la cual en Nombre de pieza pondremos el nombre de nuestra ventana de lienzo (en nuestro caso FRMAPP01) y en Titulo pondremos Ejercicio de Aplicación, teniendo como la ventana 2.

Una vez terminado de definir lo de la ventana 2 dar click al botón Aceptar, teniendo así:

Ahora definir el sgte diseño:

Una vez definido el diseño daremos doble click al componente Texto Estático, al hacerlo tendremos como la ventana 1 en la cual en Texto definiremos Suma de dos Números, teniendo como la ventana 2:

Ahora si deseamos dar un formato al Texto Estático damos click a la pestaña Font, teniendo como la ventana 3 en la cual daremos click al botón Cambiar Font, al hacerlo nos mostrara una ventana donde especificaremos el formato deseado, teniendo como la ventana 4:

Una vez terminado de definir lo de la ventana 4 dar click al botón OK, volveremos a la ventana 3 en la cual darás click al botón Aceptar, la ventana de lienzo estará así:

Ahora daremos doble click al componente Texto Estático que está encerrado en el recuadro rojo, al hacerlo tendremos como la ventana 1 en la cual en Texto definiremos Ingrese Num1, teniendo como la ventana 2:

Una vez definido lo anterior dar click al botón Aceptar. Ahora daremos doble click al Texto Estático, al hacerlo tendremos como la ventana 1 en la cual en Texto definiremos Ingrese Num2, teniendo como la ventana 2:

Una vez definido lo anterior dar click al botón Aceptar. Ahora daremos doble click al componente Texto Estático, al hacerlo tendremos como la ventana 1 en la cual en Texto definiremos Resultado Operación, teniendo como la ventana 2:

Una vez terminado de definir lo de la ventana 4 dar click al botón OK, volveremos a la ventana 3 en la cual darás click al botón Aceptar.

Ahora daremos doble click al componente Texto Estático, al hacerlo tendremos como la ventana 1 en la cual en Texto definiremos La suma es:, teniendo como la ventana 2:

Una vez definido lo anterior dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora daremos doble click al componente Texto estático que está encerrado en el recuadro verde, al hacerlo nos mostrara la ventana 1 en la cual en Nombre de pieza pondremos LBLSUMA teniendo como la ventana 2.

Como en este Texto estático se va a mostrar un resultado numérico, lo que debemos de hacer es definir el tipo de dato y longitud a mostrar, para eso damos click a la pestaña Datos y tendremos como la ventana 3, para nuestro caso definiremos que este Texto Estático tenga una longitud de 5 y cuyo Tipo sea Numérico, teniendo como la ventana 4.

Una vez definido todo en la ventana 4 dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora damos doble click al componente Campo de Entrada que está encerrado en el recuadro azul, al hacerlo tendremos como la ventana 1, seguidamente en Nombre de pieza definir como nombre TXTNUM1 y en Texto de sugerencia definir Ingrese Primer Numero, así como la ventana 2:

Como en este Campo de Entrada se va a ingresar un dato numérico, lo que debemos de hacer es definir el tipo de dato y longitud a ingresar, para eso damos click a la pestaña Datos y tendremos como la ventana 3, para nuestro caso definiremos que este Texto caja tenga una longitud de 3 y cuyo Tipo sea Numérico, teniendo como la ventana 4:

Una vez definido todo en la ventana 4 dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora damos doble click al componente Campo de Entrada que está debajo del primero, al hacerlo tendremos como la ventana 1, seguidamente en Nombre de pieza definir como nombre TXTNUM2 y en Texto de sugerencia definir Ingrese Num 2, teniendo como la ventana 2:

Como en este Texto caja se va a ingresar un dato numérico, lo que debemos de hacer es definir el tipo de dato y longitud a ingresar, para eso damos click a la pestaña Datos y tendremos como la ventana 3, para nuestro caso definiremos que este Texto caja tenga una longitud de 3 y cuyo Tipo sea Numérico, teniendo como la ventana 4:

Una vez definido todo en la ventana 4 dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora damos doble click al componente Pulsador que está en el lado izquierdo del lienzo, al hacerlo tendremos como la ventana 1, seguidamente en Nombre de pieza definir como nombre BTNLIMP y en Etiqueta definir &Limpiar, teniendo como la ventana 2:

Una vez definido todo en la ventana 2 dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora damos doble click al componente Pulsador que está en el lado derecho del lienzo, al hacerlo tendremos como la ventana 1, seguidamente en Nombre de pieza definir como nombre BTNCALC y en Etiqueta definir &Calcular, teniendo como la ventana 2:

Una vez definido todo en la ventana 2 dar click al botón Aceptar, teniendo nuestro lienzo así:

Ahora para poder ver el código fuente de nuestra aplicación solo bastara dando click en el menú Proyecto y click en Editar código fuente, teniendo así:

Una vez dado click nos mostrara el Editor de código del Visual Age, teniendo así:

A continuación vamos a definir 2 variables de tipo entero, las cuales almacenaran los dos números que ingresare en cada caja de texto, para esto debajo de la Hoja H definiremos la Hoja D (Recuerda que en la Hoja D se definen variables, constantes y estructura de datos), teniendo así:

Una vez definida la hoja presionar la tecla de función F4, al hacerlo nos mostrara la ventana de Definición, teniendo así:

Ahora mediante esta ventana definiremos lo sgte:

· Nombre de Entidad: En este caso es el Nombre de nuestra variable, constante o estructura de datos.

· Tipo de definición: Aquí defines si es variable, constante o estructura de datos.

· A/Longitud: Aquí defines la longitud de la variable, constante o estructura de datos.

· Tipo de datos interno: Aquí defines si la variable, constante es de tipo Numérico o Alfanumérico.

· Posiciones decimales: Aquí defines la posición de decimales (Solo para campos numéricos).

En nuestro caso defino una variable de tipo entero sin parte decimal de longitud 3 llamado NUM1, teniendo así:

Una vez definido lo anterior dar click al botón Aceptar, teniendo en nuestro editor de código así:

Ahora procederemos a insertar una nueva línea, para eso ubicarte en la primera posición de la línea en la cual se declaro la primera variable y digitar la letra I (Recuerda que este mandato me permite crear una nueva línea), teniendo así:

Una vez definido el mandato a nivel de línea presionar la tecla ENTER, teniendo así:

Ahora definiremos nuestra segunda variable, para eso definimos la Hoja D (Recuerda que en la Hoja D se definen variables, constantes y estructura de datos) debajo de la primera variable declarada anteriormente, teniendo así:

Una vez definida la hoja presionar la tecla de función F4, al hacerlo nos mostrara la ventana de Definición, teniendo así:

Ahora definiremos una variable de tipo entero sin parte decimal de longitud 3 llamada NUM2, teniendo así:

Una vez definido lo anterior dar click al botón Aceptar, teniendo en nuestro editor de código así:

Una vez definida nuestras dos variables a utilizar procederemos a cerrar nuestro editor de código, para esto daremos click al botón Cerrar (X), al hacerlo nos mostrara el sgte mensaje el cual nos indicara si deseamos guardar los cambios realizados, teniendo así:

Como deseamos guardar lo que hemos hecho daremos click al botón Yes, al hacerlo se cerrar dicha ventana y se guardara todo cambio efectuado.

Ahora comenzaremos a programar nuestro Botón Limpiar, el evento en el cual programaremos será el evento PRESS, para eso seleccionaremos el botón Limpiar, damos click derecho, seleccionamos Eventos y finalmente elegimos PRESS, teniendo así:

Una vez dado click nos volverá a aparecer en editor de código con la diferencia que se creara en evento PRESS del botón BTNLIMP, teniendo así:

La programación para este botón es el sgte:

Explicación línea por línea:

· Línea 00037: Aquí inicia el evento PRESS del Pulsador o Botón llamado BTNLIMP, el cual está asociado a la ventana de lienzo llamada FRMAPP01. BEGACT indica el inicio del evento.

· Línea 00038: Aquí lo que se hace es limpiar el contenido de la caja de entrada llamada TXTNUM1 mediante el atributo TEXT de la ventana de lienzo FRMAPP01. El *ZEROS limpia campos numéricos.

· Línea 00039: Aquí lo que se hace es limpiar el contenido de la caja de entrada llamada TXTNUM2 mediante el atributo TEXT de la ventana de lienzo FRMAPP01. El *ZEROS limpia campos numéricos.

· Línea 00040: Aquí lo que se hace es limpiar el contenido del Texto Estático llamado LBLSUMA mediante el atributo LABEL de la ventana de lienzo FRMAPP01. El *ZEROS limpia campos numéricos.

· Línea 00041: Aquí lo que se hace es enfocar el cursor en la caja de entrada llamada TXTNUM1 mediante el atributo FOCUS de la ventana de lienzo FRMAPP01. Si se iguala a 1 que se enfoque, si se iguala a 0 que no se enfoque.

Una vez explicado cada línea cerraremos el editor de código, al hacerlo nos mostrara una ventana en la cual nos preguntara si deseamos guardar los cambios efectuados, teniendo así:

Como deseamos guardar lo que hemos hecho daremos click al botón Yes, al hacerlo se cerrar dicha ventana y se guardara todo cambio efectuado.

Ahora comenzaremos a programar nuestro Pulsador Calcular, el evento en el cual programaremos será el evento PRESS, para eso seleccionaremos el botón Calcular, damos click derecho, seleccionamos Eventos y finalmente elegimos PRESS, teniendo así:

Una vez dado click nos volverá a aparecer en editor de código con la diferencia que se creara en evento PRESS del botón BTNCALC, teniendo así:

La programación para este botón es el sgte:

Explicación línea por línea:

· Línea 00055: Aquí inicia el evento PRESS del Pulsador o Botón llamado BTNCALC, el cual está asociado a la ventana de lienzo llamada FRMAPP01. BEGACT indica el inicio del evento.

· Línea 00056: Aquí lo que se hace es capturar el contenido de la caja de entrada llamada TXTNUM1 mediante el atributo TEXT de la ventana de lienzo FRMAPP01, una vez capturado lo almaceno en la variable llamada NUM1.

· Línea 00057: Aquí lo que se hace es capturar el contenido de la caja de entrada llamada TXTNUM2 mediante el atributo TEXT de la ventana de lienzo FRMAPP01, una vez capturado lo almaceno en la variable llamada NUM2.

· Línea 00058 y Línea 00059: Aquí lo que se hace es asignar o mostrar la suma de las variables NUM1 y NUM2, esto se mostrara en el Texto Estático llamado LBLSUMA mediante el atributo LABEL de la ventana de lienzo FRMAPP01.

· Línea 00060: Aquí finaliza el evento PRESS del Pulsador o Botón llamado BTNCALC.

Una vez explicado cada línea cerraremos el editor de código, al hacerlo nos mostrara una ventana en la cual nos preguntara si deseamos guardar los cambios efectuados, teniendo así:

Como deseamos guardar lo que hemos hecho daremos click al botón Yes, al hacerlo se cerrar dicha ventana y se guardara todo cambio efectuado.

Ahora procederemos a crear una nueva carpeta llamada Proyectos Visual Age que estará creada en mi caso en la unidad D, teniendo así:

Una vez creada dicha carpeta daremos click al botón que se encuentra dentro del recuadro llamado Construir la versión Windows del proyecto, teniendo así:

A la hora que des click nos mostrara una ventana en la cual nos pedirá guardar, teniendo así:

Ahora dar click al botón Guardar, al hacerlo nos mostrara la sgte ventana:

Ahora daremos click al botón Buscar, al hacerlo nos mostrara la sgte ventana:

Ahora buscaremos la carpeta Proyectos Visual Age que creamos anteriormente, teniendo así:

Una vez elegida la carpeta dar click al botón Aceptar, teniendo así:

Ahora definir los sgtes parámetros:

Una vez terminado de definir todos los parámetros anteriores dar click al botón Aceptar, al hacerlo comenzara a construirse el Proyecto, teniendo así:

Ahora para ejecutar nuestro programa dar click al botón que se encuentra en el recuadro llamado Ejecutar el proyecto, teniendo así:

A la hora que des click se ejecutara nuestro programa en la cual ingresaremos dos números y al dar click al botón Calcular nos mostrara la suma de dichos números, teniendo así:

Si te fijaste cuando se ejecuto nuestro programa tanto en las cajas de texto como en los textos estáticos se muestran con ceros a la izquierda, esto no se ve muy apreciable verdad???.

Ahora procederemos a quitar esos ceros, para eso cerrar el programa que se ejecuto, para eso damos doble click al primer Campo de Entrada y seguir las sgtes pantallas en orden:

Una vez definido todos los pasos anteriores dar click al botón Aceptar, tendremos así:

Ahora damos doble click al segundo Campo de Entrada y seguir las sgtes pantallas en orden:

Una vez definido todo los pasos anteriores dar click al botón Aceptar. Ahora dar doble click al componente Texto Estático que muestra el resultado y seguir las sgtes pantallas:

Una vez definido todo los pasos anteriores dar click al botón Aceptar. Ahora para poder guardar todo cambio realizado y volver a construir el proyecto, dar click al botón Construir la versión Windows del proyecto, teniendo así:

A la hora que des click nos mostrara una ventana en la cual nos preguntara si deseamos guardar los cambios realizados, teniendo así:

Ahora dar click al botón Guardar, al hacerlo se construirá nuevamente nuestro proyecto, teniendo así:

Ahora dar click al botón OK. Para ejecutar el programa dar click al botón Ejecutar el Proyecto, teniendo así:

A la hora que des click nos cargara nuevamente nuestro programa con la diferencia que no se anteponen los ceros, teniendo así:

Ahora al dar click al botón Limpiar se limpiara todos los controles, teniendo así:

Objetivos del ejercicio:

· Conocer el entorno y lenguaje de lenguaje Visual Age For RPG.

· Creación y ejecución de un proyecto hecho en Visual Age For RPG.

· Conocer los componentes básicos como en Pulsador, Campo de entrada y Texto estático.

Con este último paso concluimos este manual.

VB.NET - Exportar datos de un Datagridview a Excel y XML en N Capas App Windows Forms

2012-08-17T20:23:00.002-07:00

Hola amigos, con este pequeño pero útil manual pretendo enseñarles como exportar datos de un listado (en este caso es un Datagridview, pero podría ser un ListView u otro control) a Excel y a XML, además como leer un archivo en formato XML y mostrarlo en un TextBox.

Requisitos de Software:

• SQL Server 2000 o 2005 (Para el ejemplo se utilizara SQL Server 2005).
• Visual Studio 2003 o 2005 (Para el ejemplo se utilizara Visual Studio 2005).
• Microsoft Office 2003 o 2007 (Recomendado Microsoft Office 2007).

Conocimientos previos de:

• Algorítmica (Estructuras condicionales, repetitivas, Procedimientos, Funciones, etc.).
• Lenguaje SQL (DML, DDL, DCL), creación de consultas, procedimientos almacenados, etc.
• Lenguaje Visual Basic 6.0 o Visual Basic.NET 2003 o Visual Basic.NET 2005 o superior.

Una vez cumpliendo con los requisitos, vamos a empezar creando una carpeta llamada Exportar Datos y Creación de Reportes, en la cual almacenara nuestro proyecto de Visual Studio, nuestros Scripts a utilizar y nuestros archivos XML que se crearan posteriormente. Te recomiendo crear esta carpeta o directorio en una unidad raíz, en mi caso en la unidad E, así como en la imagen:

Ahora vamos a iniciar Visual Studio, para eso damos click en el Menú Inicio y luego click en Ejecutar y escribimos lo sgte:

Al dar click en el botón Aceptar se mostrara la ventana de Bienvenida de Visual Studio.

Antes que todo, nuestra aplicación será creada en N Capas. Ahora vamos a crear nuestro proyecto Solución en Blanco (recuerda que un proyecto de solución representa a nuestro administrador de proyectos), para eso dar click en el Menú Archivo y click en el Submenú Nuevo y finalmente click en Proyecto, así como en la imagen:

Al dar click se mostrara una ventana en la cual desplegaras el Nodo Otros tipos de proyectos y dar click al SubNodo Soluciones de Visual Studio y en el panel derecho seleccionar Solución en Blanco. Además deberás dar un nombre a la solución y una ubicación de donde se creara (debe ser dentro de una carpeta), debes tener así como en la imagen:

Al dar click en el botón Aceptar tendrás lo siguiente:

Ahora vamos a crear nuestra Capa de Datos, para eso seleccionamos la Solución, damos click derecho seleccionamos Agregar y finalmente click en Nuevo Proyecto, así como en la imagen:

Al hacer esto se mostrara una ventana en la cual en el panel izquierdo deberás desplegar el Nodo Visual Basic, luego seleccionar Windows y en el panel derecho deberás elegir Biblioteca de Clases, En nombre deberás de poner el nombre del proyecto, en nuestro caso LibNetSqldata y además establecer una ubicación en donde se guardara este proyecto, así como en la imagen:

Al dar clic en el botón Aceptar, se tendrá lo sgte:

Ahora selecciona la clase llamada Class1.cs creada por defecto, dale clic derecho y clic en Eliminar, se mostrara una ventana en la cual te pedirá la confirmación de dicho archivo, dale clic en el botón Aceptar, ahora crearemos una nueva clase, para eso seleccionar la Biblioteca de Clases llamada LibNetSqldata, darle clic derecho y elegir el submenú Agregar y finalmente clic en Nuevo Elemento, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaras la plantilla Clase, en Nombre debes poner ClsDatos (este es el nombre de la clase), así como en la imagen:

Al dar clic en el botón Agregar, se tendrá así:

Ahora vamos a crear nuestra Capa Entidad, para eso seleccionamos nuestro proyecto de Solución, damos click derecho seleccionamos Agregar y finalmente click en Nuevo Proyecto, así como en la imagen:

Al hacer esto se mostrara una ventana en la cual en el panel izquierdo deberás desplegar el Nodo Visual Basic, luego seleccionar Windows y en el panel derecho deberás elegir la plantilla Biblioteca de Clases, En nombre deberás de poner el nombre del proyecto, en nuestro caso LibNetBusinessEntity y además establecer una ubicación en donde se guardara este proyecto (déjala por defecto), así como en la imagen:

Al dar clic en el botón Aceptar, se tendrá lo sgte:

Ahora selecciona la clase llamada Class1.cs creada por defecto, dale clic derecho y clic en Eliminar, se mostrara una ventana en la cual te pedirá la confirmación del mismo, dale clic en el botón Aceptar, ahora crearemos una nueva clase, para eso seleccionar la Biblioteca de Clases llamada LibNetBusinessEntity, darle clic derecho y elegir el submenú Agregar y finalmente clic en Nuevo Elemento, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaras la plantilla Clase, en Nombre debes poner ClsEntidad (este es el nombre de la clase), así como en la imagen:

Al dar clic en el botón Agregar, se tendrá así:

Ahora vamos a crear nuestra Capa de Negocio, para eso seleccionamos la Solución, damos click derecho seleccionamos Agregar y finalmente click en Nuevo Proyecto, así como en la imagen:

Al hacer esto se mostrara una ventana en la cual en el panel izquierdo deberás desplegar el Nodo Visual Basic, luego seleccionar Windows y en el panel derecho deberás elegir la plantilla Biblioteca de Clases, En nombre deberás de poner el nombre del proyecto, en nuestro caso LibNetBusinessLogic y además establecer una ubicación en donde se guardara este proyecto, así como en la imagen:

Al dar clic en el botón Aceptar, se tendrá lo sgte:

Ahora selecciona la clase llamada Class1.cs creada por defecto, dale clic derecho y clic en Eliminar, se mostrara una ventana de confirmación del mismo, dale clic en el botón Aceptar, ahora crearemos una nueva clase, para eso seleccionar la Biblioteca de Clases llamada LibNetBusinessLogic, darle clic derecho y elegir el submenú Agregar y finalmente clic en Nuevo Elemento, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaras la plantilla Clase, en Nombre debes poner ClsNegocio (este es el nombre de la clase), así como en la imagen:

Al dar clic en el botón Agregar, se tendrá así:

Ahora vamos a crear nuestra Capa de Presentación con una Aplicación de Windows, para eso seleccionamos nuestro proyecto de solución, le damos clic derecho, seleccionamos el submenú Agregar y damos clic en Nuevo Proyecto, así como en la imagen:

Al hacer click aparecerá la sgte ventana en la cual en el panel izquierdo tendrás que desplegar el Nodo Visual Basic y elegir Windows, en el panel derecho elegir Aplicación para Windows, Además de poner el nombre del Proyecto y la ubicación así como en la imagen:

Al dar clic en el botón Aceptar se tendrá así:

Ahora debemos de establecer como proyecto de inicio a la Aplicación para Windows, para eso dar clic en la Aplicación para Windows (LibNetCliente) y clic en Establecer como proyecto de inicio, así:

Ahora seleccionamos la Biblioteca de Clases llamada LibNetBusinessEntity le damos clic derecho y finalmente clic en Generar, así como en la imagen:

Ahora seleccionamos la Biblioteca de Clases llamada LibNetSqldata le damos clic derecho y finalmente clic en Agregar Referencia, así como en la imagen:

Al hacer esto aparecerá una ventana en la cual daremos clic en la Pestaña Proyectos y seleccionar de la lista LibNetBusinessEntity, así como en la imagen:

Ahora dar clic en el botón Aceptar, luego seleccionar la Biblioteca de Clases llamada LibNetSqldata, darle clic derecho y clic en Generar, como en la imagen:

Ahora seleccionamos la Biblioteca de Clases llamada LibNetBusinessLogic le damos clic derecho y finalmente clic en Agregar Referencia, así como en la imagen:

Al hacer esto aparecerá una ventana en la cual daremos clic en la Pestaña Proyectos y seleccionar LibNetSqldata y LibNetBusinessEntity, así como en la imagen:

Ahora dar clic en el botón Aceptar, luego seleccionar la Biblioteca de Clases llamada LibNetBusinessLogic, darle clic derecho y clic en Generar, como en la imagen:

Ahora seleccionar la Aplicación para Windows llamada LibNetCliente, le damos clic derecho y finalmente clic en Agregar Referencia, así como en la imagen:

Al hacer esto aparecerá una ventana en la cual daremos clic en la Pestaña Proyectos y seleccionar LibNetBusinessEntity y LibNetBusinessLogic, así como en la imagen:

Ahora dar clic en el botón Aceptar. Seleccionar la Aplicación para Windows llamada LibNetCliente, le damos clic derecho y finalmente clic en Generar, así como en la imagen:

Ahora vamos a seleccionar el formulario creado por defecto en la capa LibNetCliente, le damos click derecho y click en Eliminar, ahora Creamos un nuevo formulario, para esto seleccionamos la capa LibNetCliente, le damos click derecho y click en Windows Forms, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaras la plantilla Windows Forms, en Nombre debes poner FrmAplicacion1 (este es el nombre del formulario), así como en la imagen:

Al dar clic en el botón Agregar se tendrá así:

Ahora procederemos a crear nuestro segundo formulario, para esto seleccionamos la capa LibNetCliente, le damos click derecho y click en Windows Forms, así como en la imagen:

Al hacer esto se mostrara la sgte ventana en la cual seleccionaras la plantilla Windows Forms, en Nombre debes poner FrmAplicacion2 (este es el nombre del formulario), así como en la imagen:

Al dar clic en el botón Agregar se tendrá así:

Ahora ir al Explorador de Soluciones y dar doble click a FrmAplicacion1, ahora asignar las sgtes propiedades al formulario:

Propiedades del Formulario:

Text; Exportar Datos y Creación de Reportes
StartPosition: CenterScreen
MaximizeBox: False
FormBorderStyle: FixedSingle
(Name): FrmAplicacion1

El diseño final deberá quedar así

Ahora vamos a realizar el sgte diseño:

Ahora ir al Explorador de Soluciones y dar doble click a FrmAplicacion2, ahora asignar las sgtes propiedades al formulario:

Propiedades del Formulario:

Text: Visualización de un Archivo XML
StartPosition: CenterScreen
MaximizeBox: False
FormBorderStyle: FixedSingle
(Name): FrmAplicacion2

Ahora realizar el sgte diseño:

Ahora volver al formulario FrmAplicacion1.vb, luego ir al Cuadro de Herramientas e ir a la pestaña Cuadro de Dialogo y elegir el control SaveFileDialog, así como en la imagen:

Luego de ubicar el control, arrástralo al formulario.

Con respecto al control SaveFileDialog dejaremos sus propiedades por defecto.

Antes de empezar a programar, empezaremos por crear nuestros procedimientos almacenados, los cuales utilizaremos en nuestro proyecto, para ello dar click en el Menú Inicio y luego click en Ejecutar y escribir lo sgte:

Al dar click al botón Aceptar, se mostrara la sgte ventana de autenticación, es aquí en donde primeramente especificas el tipo de servidor (En nuestro caso Database Engine), luego especificamos el nombre del servidor (En nuestro caso es el servidor (Local)) y finalmente de qué manera te quieres autenticar al servidor SQL Server, nos conectaremos con la autenticación por defecto (Windows Authentication), así como en la imagen:

Luego dar click al botón Connect, al hacerlo se mostrara la sgte ventana:

Ahora procederemos a crear nuestro Script, es en este Script en la cual escribiremos nuestros procedimientos a crear, para esto damos click al Menú File y seguidamente damos click en el Submenú New y finalmente click en Database Engine Query, así como en la imagen:

Al dar click nos volverá a mostrara la ventana de conexión al servidor SQL Server, así como en la imagen:

Ahora dar click al botón Connect, al hacerlo se creara nuestro Script, así como en la imagen:

Ahora vamos a seleccionar nuestra base de datos Northwind (es con la que vamos a trabajar), para eso desplegar el combo y elegir Northwind, así como en la imagen:

Al hacer esto se elegirá la base de datos Northwind como base de datos actual de trabajo, así como en la imagen:

Ahora procederemos a la creación de los Procedimientos Almacenados (Store Procedure), son los sgtes:

Set Language Spanish

Set StatisTics Time On

Set DateFormat DMY

Use Northwind

-----------------------------------------------------------------------------------------

----------------------------------Primer Procedimiento Almacenado------------------------

If Exists(Select Name From Sys.Objects Where Name='Usp_ListadoOpcion' And Type='P')

Begin

Drop Procedure Usp_ListadoOpcion

End

Create Procedure Usp_ListadoOpcion

@Opt Int

If @Opt=0

Begin

Select CustomerID, CompanyName From Customers

End

If @Opt=1

Begin

Select EmployeeID, (FirstName + Space(1) + LastName)As EmployeeName From Employees

End

-----------------------------------------------------------------------------------------

--Ejecutando Nuestro Procedimiento Almacenado

Execute Usp_ListadoOpcion 0

Execute Usp_ListadoOpcion 1

-------------------------------------------------------------------------------------

---------------------------------Segundo Procedimiento Almacenado--------------------

If Exists(Select Name From Sys.Objects Where Name='Usp_ListadoOrdenesXOpcion' And Type='P')

Begin

Drop Procedure Usp_ListadoOrdenesXOpcion

End

Create Procedure Usp_ListadoOrdenesXOpcion

@Opt Int,@Aux Varchar(5)

If @Opt=0

Begin

Select o.OrderID, o.OrderDate, o.ShippedDate, Sum(od.UnitPrice*od.Quantity)As Total

From Orders As o Inner Join [Order Details] As od

On o.OrderID=od.OrderID

Inner Join Products As p

On od.ProductID=p.ProductID

Where o.CustomerID=@Aux

Group By o.OrderID, o.OrderDate, o.ShippedDate

Order By o.OrderID Asc

End

If @Opt=1

Begin

Select o.OrderID, o.OrderDate, o.ShippedDate, Sum(od.UnitPrice*od.Quantity)As Total

From Orders As o Inner Join [Order Details] As od

On o.OrderID=od.OrderID

Inner Join Products As p

On od.ProductID=p.ProductID

Where o.EmployeeID=Convert(Int,@Aux)

Group By o.OrderID, o.OrderDate, o.ShippedDate

Order By o.OrderID Asc

End

-------------------------------------------------------------------------------------------

--Ejecutando Nuestro Procedimiento Almacenado

Execute Usp_ListadoOrdenesXOpcion 0,'ALFKI'

Execute Usp_ListadoOrdenesXOpcion 1,1

Ahora vamos a grabar nuestro Script, para damos presionamos las teclas CTRL + S, al hacerlo se mostrara la sgte ventana en la cual indicaremos en donde se almacenara nuestro Script, para eso damos la ruta en donde creamos nuestro proyecto, así como en la imagen:

Ahora damos click en Crear Nueva Carpeta, al hacerlo se mostrara la sgte ventana en la cual pondremos como nombre a nuestra carpeta Script, así como en la imagen:

Al dar click en el botón OK se creara la carpeta, a continuación pondremos como nombre a nuestro Script Procedimientos Almacenados, así como en la imagen:

Al dar click en el botón Save (Grabar) se guardara nuestro Script.

A partir de ahora comenzaremos con la programación en N Capas. Primeramente comenzaremos a programar en la capa LibNetBusinessEntity, es en esta capa en la cual crearemos nuestras propiedades, las cuales podrán ser accedidas por cualquier capa que este referenciada.

Para esto deberemos en nuestra biblioteca de clases llamada LibNetBusinessEntity y dar doble clic a la clase ClsEntidad, teniendo así:

Las propiedades a definir son las sgtes:

Public Class ClsEntidad

Private CustomerID As String

Private EmployeeID, Tipo As Integer

Public Property Codigo_Cliente()

Get

Return CustomerID

End Get

Set(ByVal value)

CustomerID = CStr(value)

End Set

End Property

Public Property Codigo_Empleado()

Get

Return EmployeeID

End Get

Set(ByVal value)

EmployeeID = CInt(value)

End Set

End Property

Public Property Opcion_Tipo()

Get

Return Tipo

End Get

Set(ByVal value)

Tipo = CInt(value)

End Set

End Property

End Class

Como segundo paso comenzaremos a programar en la capa LibNetSqlData, es esta capa la que se encargara de conectarse con la base de datos, también aquí definiremos nuestros métodos cuyo fin será ejecutar tanto sentencias SQL como Procedimientos Almacenados (en nuestro caso serán procedimientos almacenados).

Para esto deberemos en nuestra biblioteca de clases llamada LibNetSqlData y dar doble clic a la clase ClsDatos, teniendo así:

La programación para esta capa es la sgte:

Imports System.Data

Imports System.Data.SqlClient

Public Class ClsDatos

Dim Cn As New SqlConnection

Private Function ConectarSQL() As SqlConnection

Cn.ConnectionString = "Server=(Local);Database=Northwind;Integrated Security=True"

Return Cn

End Function

Public Function ListadoOpcionD(ByVal ObjEnt As LibNetBusinessEntity.ClsEntidad) As DataTable

Dim Da As New SqlDataAdapter("Usp_ListadoOpcion " & ObjEnt.Opcion_Tipo, ConectarSQL())

Dim Dt As New DataTable

Da.Fill(Dt)

Return Dt

End Function

Public Function ListadoOrdenesXOpcionD(ByVal ObjEnt As LibNetBusinessEntity.ClsEntidad) As DataTable

Dim Dt As New DataTable

If ObjEnt.Opcion_Tipo.Equals(0) Then

Dim Da As New SqlDataAdapter("Usp_ListadoOrdenesXOpcion " & ObjEnt.Opcion_Tipo & ",'" & ObjEnt.Codigo_Cliente & "'", ConectarSQL())

Da.Fill(Dt)

End If

If ObjEnt.Opcion_Tipo.Equals(1) Then

Dim Da As New SqlDataAdapter("Usp_ListadoOrdenesXOpcion " & ObjEnt.Opcion_Tipo & "," & ObjEnt.Codigo_Empleado, ConectarSQL())

Da.Fill(Dt)

End If

Return Dt

End Function

End Class

Como tercer paso comenzaremos a programar en la capa LibNetBusinessLogic, es en esta capa en la cual se aplicaran las reglas de negocios, para nuestro caso no hay ninguna. La programación es la sgte:

Imports System.Data

Public Class ClsNegocio

Dim ObjDatos As New LibNetSqlData.ClsDatos

Public Function ListadoOpcionN(ByVal ObjEnt As LibNetBusinessEntity.ClsEntidad) As DataTable

Return ObjDatos.ListadoOpcionD(ObjEnt)

End Function

Public Function ListadoOrdenesXOpcionN(ByVal ObjEnt As LibNetBusinessEntity.ClsEntidad) As DataTable

Return ObjDatos.ListadoOrdenesXOpcionD(ObjEnt)

End Function

End Class

Como cuarto y último paso comenzaremos a programar en la capa LibNetCliente, es esta capa es la interface entre el usuario y el sistema.

Comenzaremos a programar nuestro primer formulario (En nuestro caso FrmAplicacion1), para eso seleccionamos el formulario, le damos click derecho y click en ver código.

Al hacer esto tendremos acceso a la ventana de código, es aquí en donde se va a programar.

Codificaremos lo sgte:

Public Class FrmAplicacion1

Dim ObjEntidad As New LibNetBusinessEntity.ClsEntidad

Dim ObjNegocio As New LibNetBusinessLogic.ClsNegocio

End Class

Ahora volvemos al diseño del formulario, ahora damos doble click al RadioButton Customers, la programación para este control es la sgte:

Private Sub RdbCustomers_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RdbCustomers.CheckedChanged

If RdbCustomers.Checked.Equals(True) Then

Dim Dt As New DataTable

ObjEntidad.Opcion_Tipo = 0

Dt = ObjNegocio.ListadoOpcionN(ObjEntidad)

With Me.CboOpcion

.DataSource = Dt

.DisplayMember = "CompanyName"

.ValueMember = "CustomerID"

End With

RdbEmployees.Checked = False

End If

End Sub

Ahora volvemos al diseño del formulario, ahora damos doble click al RadioButton Employees, la programación para este control es la sgte:

Private Sub RdbEmployees_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RdbEmployees.CheckedChanged

If RdbEmployees.Checked.Equals(True) Then

Dim Dt As New DataTable

ObjEntidad.Opcion_Tipo = 1

Dt = ObjNegocio.ListadoOpcionN(ObjEntidad)

With Me.CboOpcion

.DataSource = Dt

.DisplayMember = "EmployeeName"

.ValueMember = "EmployeeID"

End With

RdbCustomers.Checked = False

End If

End Sub

Ahora volvemos al diseño del formulario, ahora damos doble click al botón OK, al hacerlo se tendrá así:

La programación para este control es la sgte:

Private Sub BtnOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOK.Click

Dim Dt As New DataTable

If RdbCustomers.Checked.Equals(True) Then

ObjEntidad.Opcion_Tipo = 0

ObjEntidad.Codigo_Cliente = CStr(CboOpcion.SelectedValue.ToString())

Dt = ObjNegocio.ListadoOrdenesXOpcionN(ObjEntidad)

End If

If RdbEmployees.Checked.Equals(True) Then

ObjEntidad.Opcion_Tipo = 1

ObjEntidad.Codigo_Empleado = CInt(CboOpcion.SelectedValue)

Dt = ObjNegocio.ListadoOrdenesXOpcionN(ObjEntidad)

End If

With Me.DtgListadoOrdenes

.DataSource = Dt

End With

Me.LblCantOrdenes.Text = Dt.Compute("Count(OrderID)", "").ToString()

Me.LblMontoTotal.Text = Dt.Compute("Sum(Total)", "").ToString()

End Sub

Ahora vamos a programar el botón Exportar XML, este botón será el encargado de exportar toda la data listada en el DataGridView y almacenarlo en un archivo XML, cuando des click al botón se mostrara una ventana en donde te pedirá en donde almacenar el archivo XML (esto se logra con el control SaveFileDialog).

La programación es la sgte:

Private Sub BtnExpXML_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExpXML.Click

Dim Dt As New DataTable

With Me.SaveFileDialog1

.Filter = "Archivo XML|*.XML"

.FilterIndex = 1

.InitialDirectory = "C:\"

.Title = "Guardar XML como"

End With

If DtgListadoOrdenes.Rows.Count = 0 Then

MessageBox.Show("No se puede exportar, ya que no hay registros", "Mensaje", MessageBoxButtons.OK, MessageBoxIcon.Information)

Else

If (Me.SaveFileDialog1.ShowDialog().Equals(DialogResult.OK)) Then

If (Me.SaveFileDialog1.FileName <> "") Then

If RdbCustomers.Checked.Equals(True) Then

ObjEntidad.Opcion_Tipo = 0

ObjEntidad.Codigo_Cliente = CStr(CboOpcion.SelectedValue.ToString())

Dt = ObjNegocio.ListadoOrdenesXOpcionN(ObjEntidad)

End If

If RdbEmployees.Checked.Equals(True) Then

ObjEntidad.Opcion_Tipo = 1

ObjEntidad.Codigo_Empleado = CInt(CboOpcion.SelectedValue)

Dt = ObjNegocio.ListadoOrdenesXOpcionN(ObjEntidad)

End If

Dim Ds As New DataSet

Ds.DataSetName = "Listado_Ordenes"

Ds.Tables.Add(Dt)

Ds.Tables(0).TableName = "Orden"

Ds.WriteXml(Me.SaveFileDialog1.FileName)

End If

End Sub

Ahora vamos a programar el botón Ver XML, este botón será el encargado de llamar al formulario FrmAplicacion2, es este formulario el cual me permitirá visualizar el contenido de un archivo XML almacenado en el equipo. La programación es la sgte:

Private Sub BtnVerXML_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnVerXML.Click

Dim ObjFrm As New FrmAplicacion3

Me.Hide()

ObjFrm.ShowDialog()

End Sub

Ahora vamos a programar el botón Exportar Excel, para lo cual hay que seguir una serie de pasos que a continuación se tratara de explicar detalladamente.

Para poder exportar datos a Excel necesitamos de una librería DLL, la cual deberemos referenciar para poder realizar dicha acción, para eso realizamos los sgtes pasos: Seleccionar nuestro proyecto de Aplicación (LibNetCliente), luego le damos click derecho y finalmente click en Agregar Referencia.

Luego de dar click se mostrara una ventana en la cual daremos click en la ficha COM, luego de esto nos mostrara un listado de componentes en la cual elegiremos Microsoft Excel 12.0 Object Library, así como en la imagen:

NOTA: En mi caso la versión de mi objeto de librería es la 12.0, esto es debido a que estoy trabajando con Microsoft Office 2007, también mediante esta ventana puedes saber en dónde está almacenado nuestra librería.

Una vez seleccionada la librería dar click en el botón Aceptar.

A lo mejor no notas la diferencia, pero a partir de ahora puedo trabajar con métodos, clases, interfaces, etc. de Excel.

Ahora dar doble click al botón Exportar Excel, se tendrá así:

La programación para este botón es la sgte:

Private Sub BtnExpExcel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExpExcel.Click

Try

If DtgListadoOrdenes.Rows.Count = 0 Then

MessageBox.Show("No se puede exportar, ya que no hay registros", "Mensaje", MessageBoxButtons.OK, MessageBoxIcon.Information)

Else

With Me.SaveFileDialog1

.Reset()

.Filter = "Libro de Excel 2007|*.xlsx|Libro de Excel 2003|*.xls"

.FilterIndex = 1

.InitialDirectory = "C:\"

.Title = "Guardar Libro de Excel como"

End With

If Me.SaveFileDialog1.ShowDialog.Equals(DialogResult.OK) Then

'********Vector el cual alamacenara los procesos de excel que estan*******

'*******ejecutandose hasta el momento*************************************

Dim ListaAntes() As Integer

ListaAntes = ListarProcesosExcelAntes()

'****AQUI EMPIEZA EL CODIGO PARA EXPORTAR LOS DATOS DEL DATAGRIDVIEW A EXCEL****

'Aqui declaro una variable de tipo String en la cual almaceno un valor vacio

Dim Opcion As String = String.Empty

'Aqui me declaro una objeto que representa a mi aplicacion de excel

Dim MiExcel As New Microsoft.Office.Interop.Excel.Application

'********Vector el cual alamacenara los procesos de excel que estan *********

'ejecutandose hasta el momento incluyendo al que se hara lectura respectiva**

Dim ListaDespues() As Integer

ListaDespues = ListarProcesosExcelDespues()

'Obtener PID del excel actual (al cual se hace lectura)

Dim PID As Integer = ObtenerIDProcesoActual(ListaAntes, ListaDespues)

'Aqui me declaro una objeto que representa a mi libro de excel

Dim MiLibro As Microsoft.Office.Interop.Excel.Workbook

'Aqui me declaro una objeto que representa a mi hoja de calculo de excel

Dim MiHoja As Microsoft.Office.Interop.Excel.Worksheet

'Aqui agrego un libro a mi variable MiLibro

MiLibro = MiExcel.Workbooks.Add()

'Aqui agrego una hoja a mi variable MiHoja

MiHoja = MiLibro.Worksheets.Add()

'Estableciendo el nombre a la hoja de calculo, en este caso Ordenes

MiHoja.Name = "Ordenes"

If RdbCustomers.Checked = True Then

Opcion = "Cliente"

End If

If RdbEmployees.Checked = True Then

Opcion = "Empleado"

End If

'---Estableciendo formato al titulo---'

'Hoja de calculo que se mostrara por defecto, en mi caso la hoja llamada Ordenes

MiHoja.Activate()

'Combinando rango de celdas B2:G2, para el titulo

MiHoja.Range("B2", "G2").MergeCells = True

'Estableciendo un tamaño de letra 14 al contenido de la celda B2

MiHoja.Range("B2").Font.Size = 14

'Estableciendo negrita al contenido de la celda B2

MiHoja.Range("B2").Font.Bold = True

'Estableciendo el titulo que aparecera en la celda B2

MiHoja.Range("B2").Value = "Listado de Ordenes del " & Opcion & ": " & Me.CboOpcion.Text

'Estableciendo la alineacion centrado al contenido de la celda B2

MiHoja.Range("B2").HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter

'Estableciendo el color de letra verde al contenido de la celda B2

MiHoja.Range("B2").Font.Color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbGreen

'Definiendo la primera columna

MiHoja.Range("C3").Value = "OrderID"

'Definiendo la segunda columna

MiHoja.Range("D3").Value = "OrderDate"

'Definiendo la tercera columna

MiHoja.Range("E3").Value = "ShippedDate"

'Definiendo la cuarta columna

MiHoja.Range("F3").Value = "Total"

'Aqui defino el color de relleno celeste para el rango de celdas C3 hasta F3

MiHoja.Range("C3:F3").Interior.Color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbSkyBlue

MiHoja.Range("C3:F3").Font.Bold = True

MiHoja.Range("C3:F3").HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter

MiHoja.Range("C3:F3").Font.Color = Microsoft.Office.Interop.Excel.XlRgbColor.rgbWhite

MiHoja.Range("C3:F3").Font.Size = 12

Dim IndiceFinal As Integer = 0

Dim i As Integer = 4

For Each oRow As DataGridViewRow In Me.DtgListadoOrdenes.Rows

MiHoja.Range("C" & i).Value = oRow.Cells(0).Value

MiHoja.Range("D" & i).Value = oRow.Cells(1).Value

MiHoja.Range("E" & i).Value = oRow.Cells(2).Value

MiHoja.Range("F" & i).Value = String.Format("{0:c}", oRow.Cells(3).Value)

i = i + 1

IndiceFinal = i

'Aqui establezco el borde al rango de celda especificado

MiHoja.Range("C3:F" & IndiceFinal - 1).Borders.Value = 12

MiHoja.Range("C4:F" & IndiceFinal - 1).HorizontalAlignment = Microsoft.Office.Interop.Excel.XlHAlign.xlHAlignCenter

'Ajustando el ancho de la celda al contenido

MiHoja.Columns.AutoFit()

'Guardando mi libro de Excel con la ruta y nombre que se asigno en la ventana 'SaveFileDialog

MiLibro.SaveAs(Me.SaveFileDialog1.FileName)

'**

'Muestro la ventana de excel maximizada

'MiExcel.WindowState = Microsoft.Office.Interop.Excel.XlWindowState.xlMaximized

'Muestro la ventana de Excel con los datos exportados

'MiExcel.Visible = True

'**

'Liberando Recursos

MiExcel = Nothing

MiLibro = Nothing

MiHoja = Nothing

'Eliminando el proceso del excel actual mediante su respectivo PID

Process.GetProcessById(PID).Kill()

MessageBox.Show("Datos exportados a Excel correctamente", "Mensaje", MessageBoxButtons.OK, MessageBoxIcon.Information)

End If

Catch ex As Exception

End Try

End Sub

Ahora vamos a programar el botón Salir, este botón será el encargado de cerrar el formulario haciendo una pregunta de confirmación. La programación es la sgte:

Private Sub BtnSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSalir.Click

Dim i As Integer

i = MessageBox.Show("Estas seguro de Salir???", "Mensaje", MessageBoxButtons.YesNo, MessageBoxIcon.Question)

If i.Equals(6) Then

Me.Close()

End If

End Sub

Ahora continuaremos por programar nuestro último formulario, para esto ir a la ventana Explorador de Soluciones y dar doble click al formulario FrmAplicacion2, al hacerlo tendrás así:

Una vez hecho esto vamos a insertar un control llamado OpenFileDialog, este control me permite abrir una ventana en la cual puedo abrir un archivo, este control es necesario ya que al dar click al botón Examinar deberé cargar un archivo XML.

Este control lo ubicas en el Cuadro de Herramientas, luego en la pestaña Cuadros de Dialogo, así como en la imagen:

Una vez ubicado el control, lo único que haces es arrastrarlo al formulario, al hacerlo se tendrá así:

Ahora comenzaremos a programar el botón Limpiar, para eso solo debes darle doble click, la programación es la sgte:

Private Sub BtnLimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnLimpiar.Click

Me.TxtRuta.Clear()

Me.TxtXML.Clear()

Me.BtnExaminar.Focus()

End Sub

Ahora volver al diseño del formulario y dar doble click al botón Volver, la codificación es la sgte:

Private Sub BtnVolver_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnVolver.Click

Dim ObjForm As New FrmAplicacion1

Me.Hide()

ObjForm.ShowDialog()

End Sub

Ahora volver al diseño del formulario y dar doble click al botón Examinar, la codificación es la sgte:

Private Sub BtnExaminar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnExaminar.Click

Me.TxtXML.Clear()

With Me.OpenFileDialog1

.InitialDirectory = "C:\"

.Filter = "Archivo XML|*.XML"

.FilterIndex = 1

.Title = "Abrir XML como"

End With

If Me.OpenFileDialog1.ShowDialog().Equals(DialogResult.OK) Then

Dim Ruta As String

Ruta = Me.OpenFileDialog1.FileName.ToLower

Me.TxtRuta.Text = Ruta

Me.TxtXML.Text = System.IO.File.ReadAllText(Ruta)

End If

End Sub

Con esto terminamos de programar todos nuestros formularios

Funcionamiento del Programa

Ahora procederemos a ejecutar nuestro proyecto, pero para eso deberemos especificar que el formulario a ejecutarse inicialmente sea el formulario FrmAplicacion1, para eso ir a la ventana Explorador de soluciones y dar doble click en My Project, así como en la imagen:

Al hacer doble click nos mostrara un conjunto de pestañas en la cual elegiremos Aplicación, luego en Formulario de Inicio deberás de elegir FrmAplicacion1, así como en la imagen:

Una vez hecho esto deberás ubicarte en la Barra de Herramientas llamada Depurar y deberás dar click en la flechita verde, o si prefieres presiona la tecla F5, cualquiera de las dos.

Una vez que das click en la flecha o presionando la tecla F5, se mostrara el formulario, algo así:

Ahora vamos a seleccionar un cliente, para esto seleccionamos la opción Customers y elegimos al cliente Hungry Coyote Import Store y damos click al botón OK, así como en la imagen:

A la hora que des click al botón se mostraran las órdenes de ese cliente, además nos saldrá las cantidad de ordenes que tiene y finalmente su Monto Total, así como en la imagen:

A continuación vamos a exportar todos los datos a XML, para eso dar click al botón Exportar XML, al hacer click aparecerá la sgte ventana, así como en la imagen:

Ahora deberás de buscar la carpeta en donde se creó el proyecto (E:\Exportar Datos y Creacion de Reportes), así como en la imagen:

Ahora dar click en el botón Create New Folder (Crear nueva carpeta), así como en la imagen:

Luego de crear la carpeta ponerle como nombre XML, deberá quedar así:

Luego de crear la carpeta darle doble click y poner como nombre de archivo HUNGC, así como en la imagen:

Luego de asignar el nombre a mi archivo XML procederemos a guardarlo, para eso darle click al botón Save, al hacerlo se creara el archivo XML.

Ahora procederemos a ver nuestro archivo XML creado, para eso dar click al botón Ver XML, al hacerlo se mostrara el sgte formulario:

Ahora para buscar el archivo XML a visualizar deberás dar click al botón Examinar, al hacer click se mostrara la sgte ventana:

Ahora deberás de buscar el archivo XML, teniendo así:

Una vez que lo encuentras darle doble click, al hacerlo se mostrara el contenido del archivo XML, algo así:

Bueno si quieres limpiar todo el contenido solo debes dar click al botón Limpiar, teniendo algo así:

Bueno dar click al botón Volver, para regresar al formulario principal, teniendo así:

Bueno vuelvo a elegir al cliente Hungry Coyote Import Store y dar click al botón OK, se listaran las órdenes del cliente elegido, algo así:

Ahora vamos a exportar todo este listado a una hoja de Excel, para eso dar click al botón Exportar Excel, al hacer click se mostrara la sgte ventana:

Ahora buscar la ruta en donde se encuentra nuestro proyecto, deberás tener así como en la imagen:

Ahora procederemos a crear una carpeta en la cual almacenaremos el archivo de Excel a crear, para eso dar click en el botón Create New Folder, así como en la imagen:

Al hacer click al botón se creara la carpeta, luego asignarle por nombre EXCEL, así como en la imagen:

Ahora dar doble click a esta carpeta y guardar nuestro archivo de Excel como HUNGC, así como en la imagen:

Una vez asignado el nombre dar click al botón Save, al dar click se guardara el archivo de Excel con todas las órdenes del cliente elegido, una vez que termino la exportación nos mostrara un mensaje indicando que la exportación ha Excel se ha realizado correctamente, así como en la imagen:

Bueno dar click al botón OK, ahora si quieres verificar que el archivo se creo dirígete a la carpeta Excel y allí encontraras el archivo, así como en la imagen:

Ahora dar doble click al archivo de Excel, se mostrara así:

Ahora dar click al botón OK, bueno y finalmente vamos a cerrar nuestro formulario, para eso dar click al botón Salir, así como en la imagen:

Al dar click al botón se mostrara un mensaje de confirmación de que si estás seguro de cerrar el formulario o no, en nuestro caso elegiremos que si, así como en la imagen:

Si das click en el botón Yes se cerrara el formulario, con este último paso concluimos este manual.

El proyecto originalmente fue desarrollado en VB2005, el proyecto a descargar fue migrado a VB2008.

Puedes descargar el Proyecto desde el sgte link:

VB.NET - Mostrar un documento PDF en un Formulario Windows Forms

2012-08-13T12:51:00.006-07:00

Hola nuevamente, mediante esta aplicacion aprenderemos a como mostrar un documento digital PDF en un formulario Windows Forms, para esto necesitaremos como pre.requisitos lo sgte:

1.- Tener instalado el Visual Studio, ya sea 2005 o versiones superiores.
2.- Tener en el equipo local la DLL AcroPDF.dll, la cual nos ayudara en nuestro objetivo.

Primeramente deberemos tener instalado el programa Adobe Reader, en nuestro caso instalaremos la ultima version de este programa (hasta el momento Adobe Reader 10.1.3), para eso ingresaremos a su Pagina Web Oficial.

Seguidamente buscamos en el Menu de la parte superior y daremos click en Downloads, mostrando la sgte pagina:

Seguidamente daremos click al boton Get Adobe Reader, mostrandonos la sgte pagina:

Como no quiero Instalar el McAfee desactivo el check y daremos click al boton Download now, mostrandonos la sgte pagina:

Instantaneamente nos mostrara una ventana en la cual deberemos indicar en que parte de nuestro equipo descargaremos el instalador.

Una vez especificado lo anterior daremos click al boton Save, una vez terminada la descarga procederemos a ejecutar el instalador.

Seguidamente daremos click al boton Run y aceptar la instalacion. Comienza la descarga de los archivos necesarios para la instalacion.

Una vez terminada la descarga (que puede demorar segun sea tu velocidad de conexión) nos mostrara la sgte pantalla:

Seguidamente damos click al boton Finalizar, con esto ya tenemos el programa instalado.

Ahora la primera pregunta que nos hariamos seria: en que ruta de mi equipo local se encuentra la DLL AcroPDF.dll?

Bien, esta DLL se encuentra en la sgte ruta (en mi caso)

C:\Program Files (x86)\Common Files\Adobe\Acrobat\ActiveX

Esta ruta puede variar, dependiendo en que particion estes corriendo tu windows (C, D, E si es que tuvieses varios SO instalados) y del idioma del mismo (en mi caso mi version es en ingles)

Ahora crearemos una carpeta llamada Proyecto_PDF la cual contendra nuestro proyecto, puedes crearla en tu unidad D.

Seguidamente crearemos nuestra Aplicacion de Windows Forms, para eso iniciaremos Visual Studio.

Una vez inicializado procederemos a crear un nuevo Proyecto, para eso daremos click al Menu Archivo y click en New Proyect, asi como en la imagen:

Seguidamente nos mostrara una ventana en la cual en Proyect Types elegiremos Windows y en Templates elegiremos Windows Forms Application, asignaremos por nombre al proyecto AppPDF, asi como en la imagen:

Seguidamente daremos click al boton OK, procediendo a crear dicho proyecto, teniendo asi:

Seguidamente realizaremos el diseño de nuestro formulario.

Controles Agregados:

Panel: Este panel se le establecio la propiedad Dock con el valor Top y se ajusto tal como en la imagen.
Button: Dos botones agregados dentro del Panel, el primer boton de lado izquierdo tiene por nombre btnOpen y el segundo de nombre btnClose.

Seguidamente agregaremos a nuestro proyecto las DLLs correspondientes, para esto seleccionamos nuestro proyecto (AppPDF), le damos click derecho y click en Add Reference, como en la imagen:

Seguidamente nos mostrara una ventana con un listado de componentes.

Seguidamente nos ubicaremos en la pestaña Browse, seteamos la ruta en donde se encuentran las DLLs de Adobe (en mi caso C:\Program Files (x86)\Common Files\Adobe\Acrobat\ActiveX) y seleccionamos todas, como en la imagen:

Seguidamente daremos click al boton OK, luego procederemos a añadir el control de Adobe el cual nos permitira ver en nuestro formulario un documento PDF, para esto en Toolbox daremos click derecho y click en Choose Items, como en la imagen:

Seguidamente nos mostrara una ventana en la cual nos ubicaremos en la pestaña COM Components y marcaremos el check del componente Adobe PDF Reader, como en la imagen:

Una vez marcado daremos click al boton OK. Si verificamos el Toolbox notaremos que se agrego un nuevo control llamado Adobe PDF Reader, como en la imagen;

Ahora arrastraremos este control a nuestro formulario, teniendo asi:

A este control en la propiedad Dook le asignaremos el valor Fill, para que se ajuste al tamaño del formulario, teniendo asi:

El código del programa es el sgte:

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ofdOpen.Filter = "Documento Digital (*.pdf)|*.pdf"

ofdOpen.FileName = ""

ofdOpen.InitialDirectory = "C:\"

AxAcroPDF1.setShowToolbar(True)

End Sub

Private Sub btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpen.Click

If ofdOpen.ShowDialog() = Windows.Forms.DialogResult.OK Then

AxAcroPDF1.src = ofdOpen.FileName

End If

End Sub

Private Sub btnClose_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnClose.Click

Me.Close()

End Sub

End Class

Ahora guardaremos nuestro proyecto dando click al boton Guardar, al hacerlo nos mostrara la sgte ventana.

Ahora setearemos la carpeta en donde guardaremos el proyecto, teniendo asi:

Una vez seteado damos click al boton Save, seguidamente ejecutaremos nuestra aplicacion con la tecla F5, en mi caso, como estoy ejecutando el aplicativo en un SO de 64 bits me mostrara el sgte mensaje:

Para evitar este problema deberemos cambiar una pequeña modificacion, para esto daremos click al Menu Generar y luego click en Configuration Manager, como en la imagen:

Al dar click nos mostrara la sgte ventana.

Seguidamente en la opcion Active solution platform elegiremos el Item New, como en la imagen:

En esta ventana en la opcion Type or select the new platform elegiremos X86, asi como en la imagen:

Seguidamente daremos click al boton OK, mostrandonos la ventana anterior.

Seguidamente cerramos la ventana mediante el boton Close, Ahora ejecutamos nuestra aplicacion mediante la tecla F5, al hacerlo se mostrara nuestra pantalla.

Ahora para elegir un documento PDF daremos click al boton Abrir Documento PDF, al hacerlo nos mostrara una ventana en la cual elegiremos nuestro documento PDF de nuestra preferencia, como en la imagen:

Seguidamente daremos click al boton Open e inmediatamente visualizaremos dicho contenido en nuestro formulario, asi como en la imagen:

Puedes descargar el Proyecto desde el sgte link:

VB.NET - Creación de Biblioteca de Controles de Windows

2012-08-11T17:27:00.000-07:00

Mediante este tipo de proyecto usted podrá crear controles personalizados para usarlos en formularios Windows Forms.

Primeramente crearemos una carpeta en nuestra unidad E llamada Proyecto_Controles, teniendo así:

Ahora iniciaremos el Visual Studio 2005, para eso damos click en el Menú Inicio (Start) y luego click en Ejecutar (Run) y escribimos lo sgte:

Una vez escrito el Ejecutable del Visual Studio daremos click al botón Aceptar (OK), teniendo así:

Ahora procederemos a crear nuestro proyecto, para esto daremos click al Menú Archivo – Nuevo – Proyecto, teniendo así:

Una vez dado click nos mostrara una ventana en la cual en el panel izquierdo en Tipo de Proyecto elegiremos Visual Basic y en el panel derecho elegiremos la plantilla Biblioteca de controles de Windows, en Nombre de proyecto pondremos Proyecto_Mejia y en ubicación estableceremos la ruta de la carpeta creada inicialmente, teniendo así:

Una vez elegida la plantilla correspondiente daremos click en el botón Aceptar, teniendo así:

Ahora procederemos a cambiar de nombre a nuestro Control de Usuario (Usercontrol), le pondremos por nombre TextBoxLetras, teniendo así:

Una vez cambiado el nombre daremos click derecho en el entorno grafico y elegiremos Ver Código, teniendo así:

Una vez dado click nos mostrara la ventana de código, teniendo así:

Ahora en el Combo que dice Declaraciones, lo desplegaremos y elegiremos InitializeComponent, teniendo así:

Una vez dado click en InitializeComponent tendremos acceso al contenido de dicho método, teniendo así:

Ahora procederemos a borrar todo código que contenga este método, quedándonos así:

Ahora volvemos a la ventana de código, teniendo así:

Ahora especificaremos que esta clase herede todas las características de un TextBox, para esto pondremos Inherits (Herencia) y seguidamente de que clase heredara (TextBox), teniendo así:

Notaras que nos marca un error, para controlar este error daremos click en el subrayado de color rojo (el que esta al final), y nos mostrara lo sgte:

Daremos click en el primer vínculo, al hacerlo se corregirá el error, teniendo así:

Ahora volveremos al Diseñador, para eso daremos click derecho y click en Ver Diseñador, teniendo así:

A la hora que des click tendremos una vista completamente distinta a la inicial, teniendo así:

Ahora arrastraremos el control TextBox a nuestra clase, teniendo así:

Ahora daremos click derecho a nuestra clase y click en Ver Código, teniendo así:

Una vez dado click volveremos al Editor de Código, teniendo así:

Ahora desplegaremos el ComboBox que dice TextBoxLetras y elegiremos TextBox1 (Control que arrastramos hace un momento), teniendo así:

Una vez elegido lo anterior procederemos a desplegar en el ComboBox que dice Declaraciones elegiremos en este caso el Evento que se desencadena o ejecuta cuando se pulsa una tecla en dicho control (KeyPress), en este caso lo elegimos y al hacerlo se construirá el método correspondiente, teniendo así:

Ahora el método construido es el que sigue a continuación:

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress

End Sub

Ahora en la parte del Handles cambiaremos TextBox1.KeyPress por MyBase.KeyPress, teniendo asi:

Private Sub TextBox1_KeyPress(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress

End Sub

Palabra Clave MyBase.- Esta Palabra Clave sirve para llamar a métodos de una clase Base cuando reemplace métodos en una clase derivada. Por Ejemplo, supongamos que diseña una clase derivada que reemplaza un método de la clase base. El método reemplazado puede llamar al método de la clase y modificar el valor devuelto como se muestra en el fragmento de código siguiente.

Ahora la programación de este evento es la sgte:

Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress

Dim I As Byte = CByte(Asc(e.KeyChar))

Select Case I

Case 65 To 90

Case 97 To 122

Case 8, 13, 32

e.Handled = False

Case Else

e.Handled = True

End Select

End Sub

Finalmente en tu Editor de Código tendremos así:

Ahora para poder Construir o Crear Nuestro control solo bastara que demos click derecho en nuestro proyecto (Proyecto_Mejia) y click en Generar, teniendo así:

Ahora procederemos a ver si nuestro Proyecto de Solución esta visible, para esto damos click en el Menú Herramientas y luego click en Opciones, teniendo así:

Ahora buscaremos el Nodo Proyectos y Soluciones y deberás constatar que el check Mostrar Solución Siempre este activado, sino lo estuviese pues lo activas, teniendo así:

Una vez marcada la opción daremos click en el botón Aceptar.

Ahora para poder utilizar el control que acabamos de crear procederemos a crear un Proyecto de Aplicación para Windows, para esto seleccionaremos nuestro Administrador de Proyectos (Solución), le damos click derecho y elegimos Agregar y finalmente click en Nuevo Proyecto, teniendo así:

Una vez dado click nos mostrara una ventana en la cual en el panel izquierdo en Tipo de Proyecto elegiremos Visual Basic y en el panel derecho elegiremos la plantilla Aplicación para Windows, en Nombre de proyecto pondremos Proyecto_Formularios_Mejia y en Ubicación estableceremos la ruta de la carpeta creada inicialmente, teniendo así:

Una vez elegida la plantilla correspondiente daremos click en el botón Aceptar, teniendo así:

Ahora seleccionaremos nuestro proyecto, le daremos click derecho y finalmente click en Agregar Referencia, teniendo así:

Una vez dado click nos mostrara la sgte ventana:

Ahora daremos click a la pestaña Examinar, teniendo así:

Ahora seleccionaremos la carpeta la cual contiene todos nuestros proyectos (Proyecto_Controles), teniendo así:

Ahora entraremos a esa carpeta y dentro de Debug elegiremos nuestra DLL (Control) el cual se creó cuando generamos el proyecto anterior, teniendo así:

Una vez elegido daremos click al botón Aceptar, Ahora procederemos a Generar Nuestro Proyecto de Windows, para esto le daremos click derecho a nuestra aplicación para Windows, y le daremos click a Generar, teniendo así:

Ahora notaras que se agrego una Ficha llamada Componentes Proyecto_Mejia en la cual está el control que creamos anteriormente, teniendo así:

Ahora arrastraremos nuestro control a nuestro formulario, el diseño del mismo será algo así:

Aquí lo único que hay que programar es el botón Salir, para esto le daremos doble click a nuestro botón, la programación correspondiente será la sgte:

Private Sub BtnSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSalir.Click

Application.Exit()

End Sub

Una vez terminado de programar nuestro botón pulsaremos la tecla de Función F5 para poder ejecutar nuestro Formulario, Notaras que solo puedes Ingresar tanto letras mayúsculas como en minúsculas, también acepta los espacios en blanco, el backs pace y la tecla ENTER.

Ahora procederemos a cerrar este formulario.

Este Control de Usuario que acabamos de crear lo podemos utilizar en cualquier Lenguaje del Visual Studio, ya sea en Visual Basic, Visual C# como también en Visual J#. A continuación procederé a crear los dos proyectos siguientes para demostrarte que si se puede hacer.

Primeramente empezaremos a crear una Aplicación para Windows bajo el Lenguaje C#, para esto en nuestro Administrador de Proyectos (Solución), le daremos click derecho, elegiremos Agregar y finalmente daremos click en Nuevo Proyecto, teniendo así:

Una vez dado click nos mostrara una ventana en la cual en el panel izquierdo en Tipo de Proyecto elegiremos Visual C# y en el panel derecho elegiremos la plantilla Aplicación para Windows, en Nombre de proyecto pondremos Proyecto_Formularios_Mejia2 y en Ubicación estableceremos la ruta de la carpeta creada inicialmente, teniendo así:

Una vez elegida la plantilla correspondiente daremos click en el botón Aceptar, Ahora arrastraremos nuestro control a nuestro formulario, el diseño del mismo será algo así:

Aquí lo único que hay que programar es el botón Salir, para esto le daremos doble click a nuestro botón, la programación correspondiente será la sgte:

private void BtnSalir_Click(object sender, EventArgs e)

{

Application.Exit();

}

A continuación culminaremos creando nuestra Aplicación para Windows bajo el Lenguaje J#, para esto en nuestro Administrador de Proyectos (Solución), le daremos click derecho, elegiremos Agregar y finalmente daremos click en Nuevo Proyecto, teniendo así:

Una vez dado click nos mostrara una ventana en la cual en el panel izquierdo en Tipo de Proyecto elegiremos Visual J# y en el panel derecho elegiremos la plantilla Aplicación para Windows, en Nombre de proyecto pondremos Proyecto_Formularios_Mejia3 y en Ubicación estableceremos la ruta de la carpeta creada inicialmente, teniendo así:

Una vez elegida la plantilla correspondiente daremos click en el botón Aceptar, Ahora arrastraremos nuestro control a nuestro formulario, el diseño del mismo será algo así:

Aquí lo único que hay que programar es el botón Salir, para esto le daremos doble click a nuestro botón, la programación correspondiente será la sgte:

private void BtnSalir_Click(Object sender, System.EventArgs e)

{

Application.Exit();

}

Con este ultimo proyecto culminamos.

Visual FoxPro 9.0 - Instalación Visual FoxPro 9.0

2012-08-11T16:15:00.027-07:00

Visual FoxPro ofrece a los desarrolladores un conjunto de herramientas para crear aplicaciones de bases de datos para el escritorio, entornos cliente/servidor, tablet PC o para la Web.

Instalación: Antes que todo deberás tener el programa Visual FoxPro 9.0, que puede estar en un CD o en tu equipo local, en nuestro caso el instalador de Visual FoxPro 9.0 se encuentra en nuestro equipo local, en la unidad H, así como en la imagen:

Ahora seleccionar el archivo setup.exe y dar doble click, al hacerlo comenzara el proceso de instalación.

Luego de esto aparecerá la sgte ventana:

Ahora dar click a la opción Prerequisites, al hacer click se mostrara una ventanita en la cual se están cargando todos los componentes para la instalación, así como en la imagen:

Luego aparecerá una ventana en la cual daremos click en la opción I Accept the agreement, así como en la imagen:

Ahora dar click a la opción Continue, se mostrara la sgte ventana en la cual se listaran los componentes que son requeridos para la instalación de Visual FoxPro, así como en la imagen:

Ahora dar click a la opción Install Now!, se instalar instalación a primeramente el componente Setup Runtime Files, así como en la imagen:

Luego de que se instalo el primer componente, se instalara el segundo componente Microsoft SOAP Toolkit 3.0, así como en la imagen:

Finalmente termina la instalación de los dos componentes, quedara así como en la imagen:

Ahora dar click a la opción Done, se mostrara la primera ventana con la diferencia que esta habilitada la segunda opción, así como en la imagen:

Ahora dar click a la opción Visual FoxPro, se mostrara una ventana en la cual darás click en I accept the agreement e ingresar la serie (creías que la iba a poner???), así como en la imagen:

Ahora dar click en la opción Continue, se mostrara la sgte ventana:

Ahora dar click en la opción Install Now, comenzara el proceso de instalación.

Una vez terminada la instalación se mostrara la sgte ventana:

Ahora dar click en la opción Done, al hacerlo se mostrara la ventana inicial.

Seguidamente podremos actualizar nuestro FoxPro 9 con el ultimo Service Pack 2, para eso daremos click a Service Releases, cargando la pagina web de Microsoft, teniendo así:

En esta Web podremos descargar el Service Pack, Documentacion, etc, en nuestro caso daremos click al vinculo Visual FoxPro 9.0 Service Pack 2 (SP2), mostrando la sgte pagina web:

Ahora daremos click al boton Download del Archivo VFP9_sp2.exe y lo descargamos en nuestra PC.

En mi caso lo descargare en mi unidad E.

Una vez descargado procederemos a instalarlo dandole doble click al instalador VFP9_sp2.exe

Al hacerlo nos mostrara la sgte pantalla:

Una vez terminada la extraccion de los archivos necesarios nos mostrara la sgte pantalla:

Ahora daremos click al botón OK para poder continuar con la instalación.

Seguidamente Aceptaremos la licencia dando click al botón I Accept, y comenzara la instalación.

Una ves terminada la instalación nos mostrara una ventana en la cual da por finalizada la instalación.

Ahora estamos listos para trabajar con FoxPro.

VB.NET y SQL - Visual Basic.NET 2005 y Microsoft Access 2007

2012-08-11T13:57:00.009-07:00

Hola con todos, mediante este pequeño manual voy a enseñarles como conectarme desde una aplicación de Windows realizado en Visual Basic.NET a una base de Datos Microsoft Access 2007.

Requisitos:

1.- Conocimientos Básicos de Microsoft Access 2007, esto involucra saber como crear una base de datos, tablas, relaciones entre tablas, inserción datos, crear consultas, etc.

2.- Conocer el lenguaje SQL (DDL, DCL, DML).

Primeramente vamos a crear una carpeta en nuestra unidad C llamada Aplicaciones VB.NET 2005 y Access 2007, es aquí en donde almacenaremos nuestra base de datos que se llamara BDCOLEGIO.

Luego de esto vamos a ejecutar nuestro Microsoft Access 2007, para esto damos click en el Menú Inicio (start) y luego click en Ejecutar (Run) y escribir MSACCESS, así como en la imagen:

Ahora al dar click al botón OK se mostrara la ventana principal de Microsoft Access 2007, así como en la imagen:

Ahora procedemos a crear nuestra base de datos, para esto damos click en el botón de Inicio y damos click en Nuevo, así como en la imagen:

Luego de dar click se mostrara en la parte inferior el nombre del archivo que amos a especificar, en nuestro caso le pondremos como nombre BDCOLEGIO, así como en la imagen:

Nota: Recuerda que la extensión de un archivo creado en Access 2007 es accdb y en versiones anteriores es mdb

Luego vamos a especificar en donde se almacenara nuestro archivo, para eso damos click en el icono de la carpetita, al hacerlo se mostrara la sgte ventana en la cual especificaremos la carpeta que creamos en C llamada Aplicaciones VB.NET 2005 y Access 2007, así como en la imagen:

Ahora dar click al botón Aceptar, se volverá a tener la ventana anterior, así como en la imagen:

Ahora dar click al botón Crear, al hacerlo se creara la base de datos, teniéndose la sgte ventana:

Ahora vamos a la Vista Diseño para crear nuestra primera tabla, así como en la imagen:

Al hacer esto nos pedirá que grabemos con un nombre a nuestra tabla a crear, en nuestro caso nuestra primera tabla se llamara Alumno, así como en la imagen:

Luego dar click el botón Aceptar. Ahora realizar la sgte estructura para nuestra tabla Alumno, así como en la imagen:

Nota: El campo Cod_Alumno será nuestro campo Cave (Cave Principal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click en el botón Guardar, ahora procederemos a crear nuestra segunda tabla, para eso dar click en la ficha Crear y dar click en el botón Diseño de Tabla, así como en la imagen:

Ahora realizar la sgte estructura para nuestra tabla Curso, así como en la imagen:

Nota: El campo Cod_Curso será nuestro campo Clave (Clave Principal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click en el botón Guardar, así como en la imagen:

Al dar click nos mostrara la sgte ventana en la cual nos pedirá con que nombre guardar nuestra tabla, en nuestro caso le asignaremos el nombre Curso, así como en la imagen:

Luego de esto se creara la tabla, ahora procederemos a crear nuestra tercera tabla, para eso dar click en la ficha Crear y dar click en el botón Diseño de Tabla, así como en la imagen:

Ahora realizar la sgte estructura para nuestra tabla Ciclo, así como en la imagen:

Nota: El campo Cod_Ciclo será nuestro campo Clave (Clave Princpal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click al boton Guardar, asi como en la imagen:

Al dar click nos mostrara la sgte ventana en la cual nos pedirá con que nombre guardar nuestra tabla, en nuestro caso le asignaremos el nombre Ciclo, así como en la imagen:

Luego de esto se creara la tabla, ahora procederemos a crear nuestra cuarta tabla, para eso dar click en la ficha Crear y dar click en el botón Diseño de Tabla, así como en la imagen:

Ahora realizar la sgte estructura para nuestra tabla Docente, así como en la imagen:

Nota: El campo Cod_Docente será nuestro campo Clave (Clave Princpal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click al boton Guardar, asi como en la imagen:

Al dar click nos mostrara la sgte ventana en la cual nos pedirá con que nombre guardar nuestra tabla, en nuestro caso le asignaremos el nombre Docente, así como en la imagen:

Luego de esto se creara la tabla, ahora procederemos a crear nuestra quinta tabla, para eso dar click en la ficha Crear y dar click en el botón Diseño de Tabla, así como en la imagen:

Ahora realizar la sgte estructura para nuestra tabla Docente-Curso, así como en la imagen:

Nota: Esta tabla no tiene campo Clave (Clave Princpal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click al boton Guardar, asi como en la imagen:

Al dar click nos mostrara la sgte ventana en la cual nos pedirá con que nombre guardar nuestra tabla, en inuestro caso le asignaremos el nombre Docente-Curso, así como en la imagen:

Al dar click en guardar nos saldrá esta ventana de advertencia diciéndonos de que no se ha definido una clave principal, simplemente damos cick en el botón No, así como en la imagen:

Luego de esto se creara la tabla, ahora procederemos a crear nuestra sexta y última tabla, para eso dar click en la filcha Crear y dar click en el botón Diseño de Tabla, así como en la imagen:

Ahora realizar la sgte estructura para nuestra tabla Notas, así como en la imagen:

Nota: Esta taba no tiene campo Clave (Clave Princpal o Primary Key)

La estructura quedara ago así:

Luego de esto damos click en el botón Guardar, así como en la imagen:

Al dar click nos mostrara la sgte ventana en la cual nos pedirá con que nombre guardar nuestra tabla, en nuestro caso le asignaremos el nombre Notas, así como en la imagen:

Al dar click en guardar nos saldrá esta ventana de advertencia diciéndonos de que no se ha definido una clave principal, simplemente damos cick en el botón No, así como en la imagen:

Finalmente tendremos así:

Ahora nuestro siguiente paso es definir las relaciones que tendrán nuestras tablas creadas, para eso dar click en la ficha Herramientas de base de datos y click en Relaciones, así como en la imagen:

Luego de dar click el botón Relaciones nos mostrara una ventana con el listado de todas las tablas que existen en la base de datos, lo único que hacemos es seleccionar todas las tablas, así como en la imagen:

Ahora dar click al botón Agregar, se mostrara la sgte ventana:

Ahora vamos a establecer las relaciones entre las tablas Alumno y Notas mediante el campo Cod_Alumno, para eso damos click al campo Cod_Alumno de la tabla que tiene la clave principal (Alumno) luego sin soltar el click izquierdo del Mouse lo arrastramos hacia el campo Cod_Alumno de la tabla Notas, y finalmente soltamos el click izquierdo, al hacerlo se mostrara la sgte ventana en la cual daremos en los tres checks, así como en la imagen:

Luego dar click en el botón Crear, se deberá tener la sgte relación, así como en la imagen:

Ahora vamos a establecer las relaciones entre las tablas Curso y Notas mediante el campo Cod_Curso, para eso damos click al campo Cod_Curso de la tabla que tiene la clave principal (Curso) luego sin soltar el click izquierdo del Mouse lo arrastramos hacia el campo Cod_Curso de la tabla Notas, y finalmente soltamos el click izquierdo, al hacerlo se mostrara la sgte ventana en la cual daremos en los tres checks, así como en la imagen:

Luego dar click en el botón Crear, se deberá tener la sgte relación, así como en la imagen:

Ahora vamos a establecer las relaciones entre las tablas Ciclo y Curso mediante el campo Cod_Ciclo, para eso damos click al campo Cod_Ciclo de la tabla que tiene la clave principal (Ciclo) luego sin soltar el click izquierdo del Mouse lo arrastramos hacia el campo Cod_Ciclo de la tabla Curso, y finalmente soltamos el click izquierdo, al hacerlo se mostrara la sgte ventana en la cual daremos en los tres checks, así como en la imagen:

Luego dar click en el botón Crear, se deberá tener la sgte relación, así como en la imagen:

Ahora vamos a establecer las relaciones entre las tablas Docente y Docente-Curso mediante el campo Cod_Docente, para eso damos click al campo Cod_Docente de la tabla que tiene la clave principal (Docente) luego sin soltar el click izquierdo del Mouse lo arrastramos hacia el campo Cod_Docente de la tabla Docente-Curso, y finalmente soltamos el click izquierdo, al hacerlo se mostrara la sgte ventana en la cual daremos en los tres checks, así como en la imagen:

Luego dar click en el botón Crear, se deberá tener la sgte relación, así como en la imagen:

Ahora vamos a establecer las relaciones entre las tablas Curso y Docente-Curso mediante el campo Cod_Curso, para eso damos click al campo Cod_Curso de la tabla que tiene la clave principal (Curso) luego sin soltar el click izquierdo del Mouse lo arrastramos hacia el campo Cod_Curso de la tabla Docente-Curso, y finalmente soltamos el click izquierdo, al hacerlo se mostrara la sgte ventana en la cual daremos en los tres checks, así como en la imagen:

Luego dar click en el botón Crear, se deberá tener la sgte relación, así como en la imagen:

Luego de realizar todas las relaciones guardamos todos los cambios realizados, ahora procederemos a insertar registros en todas las tablas, recuerda que esto se hace en la vista Hoja de Datos.

Registros de la Tabla Alumno:

Registros de la Tabla Ciclo:

Registros de la Tabla Docente:

Registros de la Tabla Curso:

Registros de la Tabla Docente-Curso:

Registros de la Tabla Notas:

Luego de terminar nuestra base de datos, podremos empezar creando nuestro formulario en Visual Studio.NET en el lenguaje de Visual Basic.

Iniciando Visual Studio 2005

Para poder iniciar Visual Studio, damos click en el Menú Inicio (start) y luego click en Ejecutar (Run) y escribir DEVENV, así como en la imagen:

Luego dar click en el botón OK, al hacerlo se mostrara la pantalla de bienvenida de Visual Studio 2005, así como en la imagen:

Antes que todo vamos a crear nuestra Solución en Blanco, para eso dar click en el Menú Archivo y click en el Submenú Nuevo y finalmente click en Proyecto, así como en la imagen:

Al dar click se mostrara una ventana en la cual desplegaras el Nodo Otros tipos de proyectos y dar click al SubNodo Soluciones de Visual Studio y en el panel derecho seleccionar Solución en Blanco. Además deberás dar un nombre a la solución (en nuestro caso VB.NET 2005 y Access 2007) y una ubicación de donde se creara (ubicar la carpeta creada en la unidad C llamada Aplicaciones VB.NET 2005 y Access 2007), debes tener así como en la imagen:

Al dar click en el botón Aceptar tendrás lo siguiente:

Ahora vamos a crear nuestra Capa de Datos, para eso seleccionamos la Solución, damos click derecho seleccionamos Agregar y finalmente click en Nuevo Proyecto, así como en la imagen:

Al hacer click aparecerá la sgte ventana en la cual en el panel izquierdo tendrás que desplegar el Nodo Visual Basic y elegir Windows, en el panel derecho elegir Aplicación para Windows, Además de poner el nombre del Proyecto (en nuestro caso Aplicaciones VB.NET 2005 y Access 2007) y la ubicación (en nuestro caso esta en la unidad C dentro de la carpeta llamada Aplicaciones VB.NET 2005 y Access 2007), así como en la imagen:

Al dar click en el botón Aceptar tendrás lo siguiente:

Primera Consulta:

1.- Mediante el sgte formulario mostrar toda la información de los alumnos de la base de datos BDCOLEGIO.

Ahora vamos a renombrar a nuestro archivo, para eso seleccionamos nuestro archivo Form1.vb, le damos click derecho y click en Cambiar Nombre, así como en la imagen:

Bueno le asignamos el nombre de FrmAplicacion1.vb, ten cuidado de borrar la extensión del archivo, ya que si lo haces este archivo dejara de ser útil.

Finalmente quedara así:

Ahora seleccionamos nuestro formulario, presionamos la tecla F4 para acceder a la ventana Propiedades, en la cual especificaremos las sgtes propiedades:

Propiedades del formulario:

Text: Listado de Alumnos (BDColegio)
StartPosition: CenterScreen
(Name): FrmAplicacion1
FromBorderStyle: FixedSingle
MaximizeBox: False

Luego de establecer las propiedades respectivas estiremos nuestro formulario teniendo así:

Ahora nos dirigimos al Cuadro de Herramientas en la pestaña Datos y ubicamos el control DataGridView, así como en la imagen:

Luego darle click al control y arrastrarlo al formulario, luego darle la sgte forma:

Ahora vamos a especificar algunas propiedades a nuestro DataGridView:

Propiedades del Datagridview:

AllowUserToAddRows: False
SelectionMode: FullRowSelect
ReadOnly: True
(Name): DgvListadoAlumnos

Luego de esto seleccionamos nuestro formulario, luego nos vamos al panel de Propiedades y damos click en el botón del rayito (Eventos), luego de eso buscamos el evento Load, así como en la imagen:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento Load del formulario FrmAplicacion1 y nos mandara a la ventana de código, teniendo así:

La programación es la sgte:

Imports System.Data.OleDb

Public Class FrmAplicacion1

Dim Cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Aplicaciones VB.NET 2005 y Access 2007\BDCOLEGIO.accdb")

Private Sub FrmAplicacion1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim Da As New OleDbDataAdapter("Select * From Alumno", Cn)

Dim Dt As New DataTable

Da.Fill(Dt)

Me.DgvListadoAlumnos.DataSource = Dt

End Sub

End Class

Deberás tener algo así:

Ahora para ejecutar este formulario se puede hacer de dos maneras: La primera es presionando la tecla F5, la otra forma es dando click al botón Iniciar Depuración (Start Debugging)

A la hora de ejecutar el formulario, se mostrara el mismo con todos los registros de la tabla Alumno, así como en la imagen:

Segunda Consulta:

2.- Mediante el sgte formulario mostrar en un control ComboBox todos los ciclos que existan en el colegio, al elegir un ciclo mostrar en un control DataGridView los cursos deacuerdo a un ciclo elegido. La base de datos a utilizar es BDCOLEGIO.

Ahora vamos a agregar un nuevo formulario, para eso seleccionar nuestro proyecto (Aplicaciones VB.NET 2005 y Access 2007), damos un click derecho y seleccionamos Agregar (Add) y finalmente dar click en Nuevo Elemento (New Element), así como en la imagen:

Al hacer click nos aparecerá la sgte ventana en la cual elegiremos la plantilla Windows Forms y asignaremos por nombre FrmAplicacion2, así como en la imagen:

Luego dar click en el botón Agregar, se tendrá así:

Ahora seleccionamos nuestro formulario, presionamos la tecla F4 para acceder a la ventana Propiedades, en la cual especificaremos las sgtes propiedades:

Propiedades del formulario:

Text: Listado de Cursos por Ciclo (BDColegio)
StartPosition: CenterScreen
(Name): FrmAplicacion2
FromBorderStyle: FixedSingle
MaximizeBox: False

Luego de establecer las propiedades respectivas estiremos nuestro formulario teniendo así:

Ahora realizar el diseño del formulario y establecer las sgtes propiedades a cada control respectivamente:

Una vez terminado nuestro diseño comenzaremos a programar. Ahora seleccionamos nuestro formulario, luego nos vamos al panel de Propiedades y damos click en el botón del rayito (Eventos), luego de eso buscamos el evento Load, así como en la imagen:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento Load del formulario FrmAplicacion2 y nos mandara a la ventana de código, teniendo así:

Con esto se genero el evento Load del Formulario, ahora volver al diseño del formulario, seleccionar el botón Consultar y pulsar la tecla F4 para acceder a sus propiedades, ahora da click en el rayito (Eventos) y busca el evento click, así como en la imagen:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento Click del botón BtnConsultar y nos mandara a la ventana de código, teniendo así:

Con esto se genero el evento Click del botón, la programación para este formulario es la sgte:

Imports System.Data.OleDb

Public Class FrmAplicacion2

‘Ojo: esto va en una sola linea

Dim Cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Aplicaciones VB.NET 2005 y Access

2007\BDCOLEGIO.accdb")

Private Sub FrmAplicacion2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim Da As New OleDbDataAdapter("Select Cod_Ciclo, Nro_Ciclo From Ciclo", Cn)

Dim Dt As New DataTable

Da.Fill(Dt)

'Aqui especifco que voy a utilizar el control CboCiclo (ComboBox)

With Me.CboCiclo

.DataSource = Dt

.DisplayMember = "Nro_Ciclo"

.ValueMember = "Cod_Ciclo"

End With

End Sub

Private Sub BtnConsultar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnConsultar.Click

'Declaro una variable de tipo entero llamada Cod_Ciclo

Dim Cod_Ciclo As Integer

Cod_Ciclo = CInt(Me.CboCiclo.SelectedValue)

Dim Da As New OleDbDataAdapter("Select Cod_Curso, Nom_Curso From Curso Where Cod_Ciclo=" & Cod_Ciclo, Cn)

Dim Dt As New DataTable

Da.Fill(Dt)

Me.DgvListadoCursosXCiclo.DataSource = Dt

Me.LblCantCursos.Text = Dt.Rows.Count

End Sub

End Class

Ahora debemos de cambiar nuestro formulario inicial, para esto seleccionamos nuestro proyecto, le damos click derecho y click en Propiedades, así como en la imagen:

Al hacer click se mostrara la sgte pestaña en la cual debemos ubicarnos en Objeto Inicial, si verificas esta con el nombre de nuestro primer formulario, esto quiere decir de que si presionamos la tecla F5 se ejecutara este formulario, para cambiarlo solo deberás desplegar el ComboBox y elegir el nombre del formulario a ejecutarse, en mi caso FrmAplicacion2.

Ahora para ejecutar este formulario se puede hacer de dos maneras: La primera es presionando la tecla F5, la otra forma es dando click al botón Iniciar Depuración (Start Debugging)

Una vez hecho esto se ejecutara el formulario, El funcionamiento de esta consulta es el sgte: Cuando el formulario se cargue se mostrara en el ComboBox todos los ciclos que haya en la Base de Datos BDCOLEGIO, luego de elegir un ciclo y dar click en el botón Consultar, se mostrara en el DataGridView los cursos que pertenecen al ciclo elegido.

En este instante se cargo el formulario, elegimos x ejm tercer ciclo (III), así como en la imagen:

Y a la hora de dar click en el botón Consultar se tendrá así:

De esta manera terminamos nuestra segunda aplicación.

Tercera Consulta:

3.- Mediante el sgte formulario mostrar en un control Listbox todos los Alumnos que existan en el colegio, al elegir un alumno se mostrara en un control DataGridView los cursos y las notas respectivamente. La base de datos a utilizar es BDCOLEGIO.

Al hacer click nos aparecerá la sgte ventana en la cual elegiremos la plantilla Windows Forms y asignaremos por nombre FrmAplicacion3, así como en la imagen:

Luego dar click en el botón Agregar, se tendrá así:

Ahora seleccionamos nuestro formulario, presionamos la tecla F4 para acceder a la ventana Propiedades, en la cual especificaremos las sgtes propiedades:

Propiedades del formulario:

Text: Listado de Notas por Alumno (BDColegio)
StartPosition: CenterScreen
(Name): FrmAplicacion3
FromBorderStyle: FixedSingle
MaximizeBox: False

Luego de establecer las propiedades respectivas estiremos nuestro formulario teniendo así:

Ahora realizar el diseño del formulario y establecer las sgtes propiedades a cada control respectivamente:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento Load del formulario FrmAplicacion3 y nos mandara a la ventana de código, teniendo así:

Con esto se genero el evento Load del Formulario, ahora volver al diseño del formulario, seleccionar el ListBox llamado LstAlumnos y pulsar la tecla F4 para acceder a sus propiedades, ahora da click en el rayito (Eventos) y busca el evento SelectedIndexChanged, así como en la imagen:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento SelectedIndexChanged del Listbox LstAlumnos y nos mandara a la ventana de código, teniendo así:

Con esto se genero el evento SelectedIndexChanged del botón, ahora volver a diseño del formulario e ir a la ficha Componentes y elegir el control Timer, luego de elegirlo arrastrarlo al formulario, quedando así:

Nota: Este control solo ve visualiza en tiempo de diseño mas no en tiempo de ejecución

Ahora seleccionar nuestro control Timer y presionar la tecla F4 para acceder a sus Propiedades, asignar lo sgte:

Propiedades del Timer:

Enabled: Establecemos el valor de True para habilitar este control.
(Name): Asignamos el nombre de nuestro control (en nuestro caso TmrTiempo).
Interval: En esta propiedad especificamos una cantidad de milisegundos en la cual se ejecutara el evento Tick del Timer llamado TmrTiempo. Recuerda que 1000 milisegundoss es = a 1segundo

Ahora dar click al botón del rayito (Eventos) e ir al único evento del Timer llamado Tick, así como en la imagen:

Ahora dar doble click al evento mencionado, al hacerlo se mostrara el evento generado en la ventana de código, así como en la imagen:

La programación para este formulario es el sgte:

Imports System.Data.OleDb

Public Class FrmAplicacion3

'Ojo: esto va en una sola linea

Dim Cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Aplicaciones VB.NET 2005 y Access

2007\BDCOLEGIO.accdb")

Private Sub FrmAplicacion3_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

'Aqui obtengo la fecha actual del sistema y lo almaceno en el Label LblFecha

Me.LblFecha.Text = Now.Date

'Aqui obtengo la hora actual del sistema y lo almaceno en el Label LblHora

Me.LblHora.Text = TimeOfDay

Dim Da As New OleDbDataAdapter("Select Cod_Alumno, (Nom_Alumno + Space(1) + Ape_Alumno) As NomApeAlumno " & _

" From Alumno Order By (Nom_Alumno + Space(1) + Ape_Alumno) Asc", Cn)

Dim Dt As New DataTable

Da.Fill(Dt)

With Me.LstAlumnos

.DataSource = Dt

.DisplayMember = "NomApeAlumno"

.ValueMember = "Cod_Alumno"

End With

End Sub

Private Sub LstAlumnos_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

LstAlumnos.SelectedIndexChanged

Try

Dim Cod_Alumno As String = Me.LstAlumnos.SelectedValue

Dim SQL As String = String.Empty : Dim SumProm As Double = 0

Dim PromGlobal As Double = 0 : Dim Cant As Integer = 0

SQL = "Select c.Nom_Curso, n.NP1,n.NP2, ((n.NP1+(2*n.NP2))\3) As Promedio From Curso as c Inner Join Notas as n " & _
" On c.Cod_Curso=n.Cod_Curso Where n.Cod_Alumno='" & Cod_Alumno & "'"

Dim Da As New OleDbDataAdapter(SQL, Cn)

Dim Dt As New DataTable

Da.Fill(Dt)

With Me.DgvListadoNotasXAlumno

.DataSource = Dt

End With

'En esta linea me recorro por todos los elementos que hay en el DataGridView

For i As Integer = 0 To Dt.Rows.Count - 1

'En esta linea caputo el valor de una celda del DataGridView mediante una fila y columna, lo convierto a un tipo de

'datos Double con el Cdbly lo voy acumulando en la variable SumProm

SumProm = SumProm + CDbl(Me.DgvListadoNotasXAlumno.Rows(i).Cells(3).Value)

Cant = Cant + 1

PromGlobal = SumProm / Cant

'Aqui pregunto si el Promedio Global esta entre 0 y 10.4

If PromGlobal >= 0 And PromGlobal < 10.5 Then

'Aqui especifico que el color de letra en la cual se mostrara el texto en el Label LblPromedio es de color rojo

Me.LblPromedio.ForeColor = Color.Red

'Aqui especifico que el promedio global se mostrara en formato numerico de dos decimales y almacenarlo en el Label

Me.LblPromedio.Text = String.Format(FormatNumber(PromGlobal, 2))

Else

'Aqui especifico que el color de letra en la cual se mostrara el texto en el Label LblPromedio es de color azul

Me.LblPromedio.ForeColor = Color.Blue

'Aqui especifico que el promedio global se mostrara en formato numerico de dos decimales y almacenarlo en el Label

Me.LblPromedio.Text = String.Format(FormatNumber(PromGlobal, 2))

End If

Catch ex As Exception

End Try

End Sub

Private Sub TmrTiempo_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TmrTiempo.Tick

Me.LblFecha.Text = Now.Date

Me.LblHora.Text = TimeOfDay

End Sub

End Class

Ahora debemos de cambiar nuestro formulario inicial, para esto seleccionamos nuestro proyecto, le damos click derecho y click en Propiedades, así como en la imagen:

Ahora para ejecutar este formulario se puede hacer de dos maneras: La primera es presionando la tecla F5, la otra forma es dando click al botón Iniciar Depuración (Start Debugging).

Una vez hecho esto se ejecutara el formulario, El funcionamiento de esta consulta es el sgte: Cuando el formulario se cargue se mostrara en el ListBox todos los Alumnos que hayan en la Base de Datos BDCOLEGIO, luego de elegir un Alumno se mostrara en el DataGridView los nombres de los cursos y las notas respectivamente, también se mostrara su promedio x cada curso y finalmente su promedio general, además, cuando su promedio sea menor a 10.5 se mostrara de color rojo, caso contrario se mostrara de color azul.

En este instante se cargo el formulario:

Cuando elijas a un alumno se mostraran los cursos y sus notas respectivamente.

En este caso el promedio general esta de color azul, es debido a que este es mayor igual a 10.5, pero en caso contrario se mostrara de color rojo.

Cuarta Consulta:

4.- Mediante el sgte formulario se seleccionaran mediante un control DateTimePicker un rango de fechas, al dar click al botón Consultar se mostrara en un control DataGridView todos los alumnos que nacieron en ese rango de fechas. La base de datos a utilizar es BDCOLEGIO.

Al hacer click nos aparecerá la sgte ventana en la cual elegiremos la plantilla Windows Forms y asignaremos por nombre FrmAplicacion4, así como en la imagen:

Luego dar click en el botón Agregar, se tendrá así:

Ahora seleccionamos nuestro formulario, presionamos la tecla F4 para acceder a la ventana Propiedades, en la cual especificaremos las sgtes propiedades:

Propiedades del formulario:

Text: Consulta por rango de fechas (BDColegio)
StartPosition: CenterScreen
(Name): FrmAplicacion4
FromBorderStyle: FixedSingle
MaximizeBox: False

Luego de establecer las propiedades respectivas estiremos nuestro formulario teniendo así:

Ahora realizar el diseño del formulario y establecer las sgtes propiedades a cada control respectivamente:

Una vez terminado nuestro diseño comenzaremos a programar. Ahora seleccionamos nuestro botón Consultar, luego nos vamos al panel de Propiedades y damos click en el botón del rayito (Eventos), luego de eso buscamos el evento Click, así como en la imagen:

Luego de ubicar el evento mencionado le damos doble click, al hacerlo se creara el evento Click del botón BtnConsultar y nos mandara a la ventana de código, teniendo así:

La programación para este formulario es el sgte:

Public Class FrmAplicacion4

'Ojo: esto va en una sola linea

Dim Cn As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Aplicaciones VB.NET 2005 y Access 2007\BDCOLEGIO.accdb")

Private Sub BtnConsultar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnConsultar.Click

'Nota Importante 1: Toda variable de tipo fecha almacena solo fechas, y esta tiene que ir entre #

'Nota Importante 2: El formato de fecha que se le tiene que asignar es de mes/dia/año

'Ejm: Dim Fecha As Date=#07/25/2008#

'Declarto una variable de tipo fecha llamada FechaInicial y a la vez almaceno el valor que elija

'en el DateTimePicker llamado DtpFechaInicial previamente lo convierto a un tipo de dato fecha

Dim FecIni As Date = CDate(Me.DtpFechaInicial.Value)

'Declarto una variable de tipo fecha llamada FechaFinal y a la vez almaceno el valor que elija

'en el DateTimePicker llamado DtpFechaFinal previamente lo convierto a un tipo de dato fecha

Dim FecFin As Date = CDate(Me.DtpFechaFinal.Value)

'Esto va en una sola linea

Dim SQL As String = "Select * From Alumno Where FecNac_Alumno>=#" & FecIni & "# And FecNac_Alumno<=#" & FecFin & "#"

Dim da As New OleDbDataAdapter(SQL, Cn)

Dim dt As New DataTable

da.Fill(dt)

Me.DtgListadoAlumnos.DataSource = dt

Me.LblCantAlumnos.Text = dt.Rows.Count

End Sub

End Class

Ahora debemos de cambiar nuestro formulario inicial, para esto seleccionamos My Project, así como en la imagen:

Ahora darle doble click a My Proyect, se mostrara la sgte ventana en la cual te ubicaras en la pestaña Aplicación y en la opción Objeto Inicial:

Ahora para ejecutar este formulario se puede hacer de dos maneras: La primera es presionando la tecla F5, la otra forma es dando click al botón Iniciar Depuración (Start Debugging).

Una vez hecho esto se ejecutara el formulario, El funcionamiento de este consulta es el sgte: elegimos una fecha inicial y una fecha final, al ahora que demos click al botón Consultar, se mostraran a los alumnos que nacieron en ese rango de fechas y la cantidad respectiva. En este instante se cargo el formulario:

Ahora elegimos un rango de fechas y damos click al botón Consultar:

A la hora que damos click al botón Consultar nos mostrara a los alumnos que nacieron en ese rango de fecha y también cuantos son. Con este cuarto y último ejercicio culminamos.

Puedes descargar el Proyecto desde el sgte link:

SQL - Funciones Matemáticas SQL Server

2012-08-08T21:17:00.003-07:00

El SQL Server 2005 incorpora entre sus librerías muchas funciones (Cadenas, Numéricas, de Fecha, de sistema, etc.), las cuales podremos utilizarla según sea necesario.

Funciones Matemáticas:

A.- Función ABS.- Función matemática que devuelve el valor absoluto positivo de una expresión numérica específica.