Google Earth con Windows Forms

Sencillo programa que nos permite insertar y utilizar de forma totalmente operativa Google Earth, en una aplicación de windows forms. Es muy mejorable.

Para mas información ver el enlace: https://code.google.com/p/earth-api-samples/


using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using GEPlugin;
using System.Runtime.InteropServices;
using System.Security.Permissions;


namespace WindowsFormsApplication1

{
[ComVisibleAttribute(true)]
[PermissionSet(SecurityAction.Demand, Name = "FullTrust")]

public partial class Form1 : Form
{

private const string PLUGIN_URL =
   @"http://earth-api-samples.googlecode.com/svn/trunk/demos/desktop-embedded/pluginhost.html";

private IGEPlugin m_ge = null;

public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
webBrowser1.Navigate(PLUGIN_URL);
webBrowser1.ObjectForScripting = this;
}

public void JSInitSuccessCallback_(object pluginInstance)
{
m_ge = (IGEPlugin)pluginInstance;
}

}
}

Encriptación / Desencriptación

Sencillo programa que nos permite cifrar y descifrar un texto a fin de darle mayor privacidad.
Le damos salida a un fichero de texto, por si necesitamos enviar el texto cifrado por correo electrónico o cualquier otro medio. Quien reciba el texto cifrado debe disponer del programa para su desencriptado. Basado en el cifrado Cesar.


using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
using System.Collections;
using System.IO;

namespace Encriptacion_1
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}

private void button1_Click(object sender, EventArgs e)
{
string entrada, salida;
entrada = textBox1.Text;
salida = "";
// enviamos el texto cifrado a un fichero de texto.
using (StreamWriter sw = new StreamWriter("textocifrado.txt"))
{

salida = encriptacion(entrada);
textBox2.Text = (salida);
  sw.WriteLine(salida);
}

}

private void button2_Click(object sender, EventArgs e)
{
string entrada, salida;
entrada = textBox2.Text;
salida = encriptacion(entrada);
textBox3.Text = desencriptacion(entrada);
}

private void button3_Click(object sender, EventArgs e)
{
Application.Exit();
}

Letra NIF

Sencillo programa para el calculo de la letra del NIF

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace DNI_5
{
public partial class Form1 : Form
{
int numero;
public Form1()
{
InitializeComponent();
}

private void button1_Click(object sender, EventArgs e)
{
numero = Convert.ToInt32(dni.Text);
letra.Text = Convert.ToString(calcularLetra(numero));
//MessageBox.Show("El resultado es: " + calcularLetra(numero));
}
public static char
calcularLetra(int n)
{
string cadena = "TRWAGMYFPDXBNJZSQVHLCKE";
return (char)cadena[n % 23];
}

private void button2_Click(object sender, EventArgs e)
{
Application.Exit();
}
}
}


El número de identificación fiscal (NIF) español es un código único que identifica a todos los ciudadanos españoles a efectos fiscales. Partiendo del tradicional documento nacional de identidad, DNI, añade a éste una letra que actúa como elemento verificador.

La letra del NIF se obtiene a partir de un algoritmo conocido como módulo 23. El algoritmo consiste en aplicar la operación aritmética de módulo 23 al número del DNI. El módulo 23 es el número entero obtenido como resto de la división entera del número del DNI entre 23. El resultado es un número comprendido entre el 0 y el 22. En base a una tabla conocida se asigna una letra. La combinación del DNI con esa letra es el NIF.

TABLA DE ASIGNACIÓN

0	1	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16	17	18	19	20	21	22
T	R	W	A	G	M	Y	F	P	D	X	B	N	J	Z	S	Q	V	H	L	C	K	E