Funciones y Procedimientos con ORALE!

Creamos la función:

1.-Create or Replace FUNCTION SumaAB(a IN Number, B IN Number) RETURN number

AS

    res number;

Begin

    res := a + b;

    return res;

End SumaAB

Ejecutamos la función con: 

Select SumaAB(2,3) From DUAL;

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

2.- Crear la función para calcular la edad de una persona.

 Como parámetro de entrada se tiene la fecha de nacimiento.

Create or Replace FUNCTION CalEdad(fechaNac IN Number) RETURN number
AS
    edad number;
    fechaAc number;
Begin
    fechaAc:=EXTRACT(YEAR FROM sysdate);
    edad:=fechaAc-fechaNac;
    return edad;
End CalEdad
Ejecutamos la función con:
select CalEdad('1987') from dual;

C#+ACCESS+ASP.NET+VISUAL ESTUDIO 2010

using System;
using System.Configuration;
using System.Data;
using System.Linq;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.HtmlControls;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Xml.Linq;
using System.Data.Odbc;
using System.Data.OleDb;

namespace PROYECTO272
{
    public partial class inicio : System.Web.UI.Page
    {
        protected void Page_Load(object sender, EventArgs e)
        {

        }

        protected void Button1_Click(object sender, EventArgs e)
        {
            OleDbConnection con = new OleDbConnection();
            con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
           "Data Source=c:\\Database2.mdb;";
           //+"Database Password=Secreto;";
            OleDbCommand cmd = new OleDbCommand();
            cmd.Connection = con;
            cmd.CommandText = "INSERT INTO pro VALUES(:atrib1,:atrib2)";
            cmd.Parameters.Add(":atrib1", OleDbType.VarChar, 30).Value = TextBox1.Text;
            cmd.Parameters.Add(":atrib2", OleDbType.VarChar, 30).Value = TextBox2.Text;
            int result = 0;
            con.Open();
            result = cmd.ExecuteNonQuery();
            con.Close();
        }

        protected void Button2_Click(object sender, EventArgs e)
        {
            OleDbConnection con = new OleDbConnection();
            con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
           "Data Source=c:\\Database2.mdb;";
            OleDbCommand cmd = new OleDbCommand();
            cmd.Connection = con;
            cmd.CommandText = "UPDATE pro SET atrib1=:atrib1";
            cmd.Parameters.AddWithValue(":atrib1", TextBox1.Text);
            int result = 0;
            con.Open();
            result = cmd.ExecuteNonQuery();
            con.Close();
        }

        protected void Button3_Click(object sender, EventArgs e)
        {
            OleDbConnection con = new OleDbConnection();
            con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
           "Data Source=c:\\Database2.mdb;";
            OleDbCommand cmd = new OleDbCommand();
            cmd.Connection = con;
            cmd.CommandText = "delete from pro where codigo=:atrib1";
            cmd.Parameters.AddWithValue(":atrib1", TextBox2.Text);
            int result = 0;
            con.Open();
            result = cmd.ExecuteNonQuery();
            con.Close();
        }
       
        protected void Button4_Click(object sender, EventArgs e)
        {
            OleDbConnection con = new OleDbConnection();
            con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" +
           "Data Source=c:\\Database2.mdb;";
            OleDbCommand cmd = new OleDbCommand();
            cmd.Connection = con;
            OleDbDataAdapter cSeleccion = new OleDbDataAdapter("select * from pro", con);
            DataSet ds = new DataSet();
            cSeleccion.Fill(ds);
            //GridView1.DataSource = ds;
            GridView1.DataBind();
           
        }
    }
}

Exportar de Mysql una base de datros

Para exportar una base de datos:

 mysqldump --opt --user=root --password prueba > prueba.sql

donde el usuario es "root" y la base de datos se llama "prueba"

Importar a mysql una bases de datos

Nos logeamos a mysql como root;
mysql -u root -p
mysql> CREATE DATABASE ejemplodb;

Ahora creamos un usuario y le damos todos los permisos sobre esa base de datos a "usuariodb"

mysql> GRANT ALL PRIVILEGES ON ejemplodb.* TO 'usuariodb'@'localhost' IDENTIFIED BY 'usuariodb';

luego ejecutamos cmd para inyectar la base de datos ejemploQuery.sql
en este caso el archivo ejemploQuery.sql esta en mi escritorio.

>cd /home/ghaspaer/Desktop/
>mysql -u root -p<ejemploQuery.sql

ingresamos la contraseña del mysql y listo!

no olvidemos colocar en  ejemploQuery.sql  "use ejemplodb";

Oracle+.NET+ASP

using System;
using System.Configuration;
using System.Data;
using System.Linq;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.HtmlControls;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Xml.Linq;
using System.Data.OracleClient;

public partial class _Default : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {

    }
    protected void TextBox1_TextChanged(object sender, EventArgs e)
    {

    }
    protected void Button1_Click(object sender, EventArgs e)
    {
        OracleConnection con = new OracleConnection();
        con.ConnectionString = "Data Source=XE; User ID=system;Password=123456;Unicode=True";
        OracleCommand cmd = new OracleCommand();
        cmd.Connection = con;
        cmd.CommandText = "INSERT INTO pro VALUES(:atrib1,:atrib2)";
        cmd.Parameters.Add(":atrib1", OracleType.VarChar, 30).Value = TextBox1.Text;
        cmd.Parameters.Add(":atrib2", OracleType.VarChar, 30).Value = TextBox2.Text;
        int result = 0;
        con.Open();
        result = cmd.ExecuteNonQuery();
        con.Close();
    }
    protected void Button2_Click(object sender, EventArgs e)
    {
        OracleConnection con = new OracleConnection();
        con.ConnectionString = "Data Source=XE;User ID=system;Password=123456;Unicode=True";
        OracleCommand cmd = new OracleCommand();
        cmd.Connection = con;
        cmd.CommandText = "UPDATE pro SET atrib1=:atrib1";
        cmd.Parameters.AddWithValue(":atrib1", TextBox1.Text);
        int result = 0;
        con.Open();
        result = cmd.ExecuteNonQuery();
        con.Close();
    }
    protected void Button3_Click(object sender, EventArgs e)
    {
        OracleConnection con = new OracleConnection();
        con.ConnectionString = "Data Source=XE;User ID=system;Password=123456;Unicode=True";
        OracleCommand cmd = new OracleCommand();
        cmd.Connection = con;
        cmd.CommandText = "delete from pro where codigo=:atrib1";
        cmd.Parameters.AddWithValue(":atrib1", TextBox2.Text);
        int result = 0;
        con.Open();
        result = cmd.ExecuteNonQuery();
        con.Close();
    }
    protected void Button4_Click(object sender, EventArgs e)
    {
        OracleConnection con = new OracleConnection();
        con.ConnectionString = "Data Source=XE;User ID=system;Password=123456;Unicode=True";
        OracleCommand cmd = new OracleCommand();
        cmd.Connection = con;
        OracleDataAdapter cSeleccion = new OracleDataAdapter("select * from pro", con);
        DataSet ds = new DataSet();
        cSeleccion.Fill(ds);
        GridView1.DataSource = ds;
        GridView1.DataBind();
    }
}

Configuration DNS
editamos el archivo $vim /etc/bind/named.conf.default-zones
y agregamos al final lo siguiente:

zone "ghaspaer.org.bo"{
        type master;
        file "db.ghaspaer.org.bo";
};

luego  $vim /var/cache/bind/db.ghaspaer.org.bo
 contendrá lo siguiente:
;
; BIND data file for local loopback interface
;
$TTL    604800
@    IN    SOA    gunche. root.localhost. (
                  3        ; Serial
             604800        ; Refresh
              86400        ; Retry
            2419200        ; Expire
             604800 )    ; Negative Cache TTL
;
@            IN    NS    gunche.        ; NS primario
@            IN    A    127.0.0.1
wiki        IN    A    127.0.0.1

@        IN    AAAA    ::1    ; ipv6

; ----------------------------------------------------;
;             Sitios web clientes                             ;
; ----------------------------------------------------;
conasol                    IN    A    127.0.0.1
colocamos en $vim /etc/hosts
lo siguiente:
192.168.1.10      gunche



colocamos en $vim /etc/resolv.conf
lo siguiente:
nameserver 192.168.1.10

Visual_Estudio+Mysql+C#

using System;
using System.Configuration;
using System.Data;
using System.Linq;
using System.Web;
using System.Web.Security;
using System.Web.UI;
using System.Web.UI.HtmlControls;
using System.Web.UI.WebControls;
using System.Web.UI.WebControls.WebParts;
using System.Xml.Linq;
using MySql.Data.MySqlClient;


public partial class _Default : System.Web.UI.Page
{
    protected void Page_Load(object sender, EventArgs e)
    {
       
    }
    protected void  Button1_Click(object sender, EventArgs e)
    {
        MySqlConnection cn = null;
        String strcn = null;
        strcn = "DataBase=scget; DataSource=localhost; User Id=root; Password=123456";
        cn = new MySqlConnection(strcn);
        cn.Open();
        string CommandText;
        CommandText = "select * from ENTIDAD_T";      
        MySqlDataAdapter cSeleccion = new MySqlDataAdapter(CommandText, cn);
        DataSet ds = new DataSet();
        cSeleccion.Fill(ds);
        GridView1.DataSource = ds;
        GridView1.DataBind();
    }
    protected void Button2_Click(object sender, EventArgs e)
    {
        string CadenaConexion = "DataBase=scget; DataSource=localhost; User Id=root; Password=123456";
        string CadenaActualizacion = "insert into ENTIDAD_T values (" + TextBox1.Text + "," + TextBox2.Text + ")";
        MySqlConnection dbconexion = new MySqlConnection(CadenaConexion);
        MySqlCommand Adicion = new MySqlCommand();
        Adicion.Connection = dbconexion;
        Adicion.CommandText = CadenaActualizacion;
        dbconexion.Open();
        Adicion.ExecuteNonQuery();
        dbconexion.Close();    
    }
    protected void Button3_Click(object sender, EventArgs e)
    {
        string CadenaConexion = "DataBase=scget; DataSource=localhost; User Id=root; Password=123456";
        string CadenaActualizacion = "update ENTIDAD_T set entnombre='" + TextBox2.Text + "' where entidadid='" + TextBox1.Text + "' ";
        MySqlConnection dbconexion = new MySqlConnection(CadenaConexion);
        MySqlCommand Adicion = new MySqlCommand();
        Adicion.Connection = dbconexion;
        Adicion.CommandText = CadenaActualizacion;
        dbconexion.Open();
        Adicion.ExecuteNonQuery();
        dbconexion.Close();
    }
    protected void Button4_Click(object sender, EventArgs e)
    {
        string CadenaConexion = "DataBase=scget; DataSource=localhost; User Id=root; Password=123456";
        string CadenaActualizacion = "delete from ENTIDAD_T where entidadid='" + TextBox1.Text + "' ";
        MySqlConnection dbconexion = new MySqlConnection(CadenaConexion);
        MySqlCommand Adicion = new MySqlCommand();
        Adicion.Connection = dbconexion;
        Adicion.CommandText = CadenaActualizacion;
        dbconexion.Open();
        Adicion.ExecuteNonQuery();
        dbconexion.Close();
    }
}

Postgresql + JDBC

import java.sql.*;
import javax.swing.JOptionPane;
public class Postgres{
    private Connection conexion = null;
    public void estableceConexion()
    {
        if (conexion != null)
            return;
        String url = "Jdbc:postgresql://localhost:5432/MyTest";
        try
        {
           Class.forName("org.postgresql.Driver");
           conexion = DriverManager.getConnection(url,"postgres","gunchelo");
           if (conexion !=null){
               System.out.println("Conexión a base de datos ... Ok");
           }
        } catch (Exception e) {
            System.out.println("Problema al establecer la Conexión a la base de datos 1 ");
        }
    }
         public ResultSet dameNombre()
    {
        ResultSet rs = null;
        Statement s = null;
        try
        {
            s = conexion.createStatement();
            rs = s.executeQuery("SELECT * FROM  libros");
           
        }catch (Exception e)
        {
            System.out.println("Problema al consultar la base de datos 1 ");
        }
        return rs;
    }
public void cierraConexion()
    {
        try
        {
            conexion.close();
        }catch(Exception e)
        {
            System.out.println("Problema para cerrar la Conexión a la base de datos ");
        }
    }

    public static void main (String [] args) throws SQLException
    {
        Postgres x = new Postgres() ;
        ResultSet rs = null;
        String cadena="";
        x.estableceConexion();
        rs = x.dameNombre();
        try{
        while (rs.next())
        {
            cadena += rs.getString (1) + "," + rs.getString(2)+"\n";
        }
        JOptionPane.showMessageDialog(null, cadena, "libros",1);
        } catch(Exception e)
        {
            System.out.println("Problema al imprimir la base de datos ");
        }
        x.cierraConexion();
    }

}

Mysql + JDBC

import java.sql.*;
import javax.swing.JOptionPane;

public class Mysql {

    private Connection conexion = null;

    public void estableceConexion() {
        if (conexion != null) {
            return;
        }
        //String url = "Jdbc:mysql://localhost:3306/";
        try {
            Class.forName("com.mysql.jdbc.Driver");
            //Class.forName("com.mysql.Driver");
            conexion = DriverManager.getConnection("jdbc:mysql://localhost/libro", "usuario", "usuario");
            if (conexion != null) {
                System.out.println("Conexión a base de datos ... Ok");
            }
        } catch (Exception e) {
            System.out.println("1Problema al establecer la Conexión a la base de datos 1");
        }
    }

    public ResultSet dameNombre() {
        ResultSet rs = null;
        Statement s = null;
        try {
            s = conexion.createStatement();
            rs = s.executeQuery("SELECT * FROM  nt");
        } catch (Exception e) {
            System.out.println("1Problema al consultar la base de datos 1 ");
        }
        return rs;
    }

    public void cierraConexion() {
        try {
            conexion.close();
        } catch (Exception e) {
            System.out.println("1Problema para cerrar la Conexión a la base de datos ");
        }
    }

    public static void main(String[] args) throws SQLException {
        Mysql x = new Mysql();
        ResultSet rs = null;
        String cadena = "";

        x.estableceConexion();
        rs = x.dameNombre();
        try {
            while (rs.next()) {
                    cadena += rs.getString(1) + " , " + rs.getString(2) + "\n";
            }

            JOptionPane.showMessageDialog(null, cadena, "trabajadores", 1);
        } catch (Exception e) {
            System.out.println("1Problema al imprimir la base de datos ");
        }
        x.cierraConexion();
    }
}

#aptitude install postgresql-9.1 postgresql-contrib-9.1
#aptitude install pgadmin3
1.-cambiar contra postgres
passwd postgres
2.-cambiar contraseña usuario postgres
su postgres
postgres@squezee:/home/ghaspaer$psql
postgres=#_
alter user postgres with password 'newpass';
ALTER ROLE
luego podemos entrar con:
postgres@squezee:/home/ghaspaer$psql -U postgres -W
postgres=#_
vim /etc/postgresql/9.1/main/postgresql.conf
fsync = on
#listen_addresses='localhost'
listen_addresses='*'
postgres@squezee:/home/ghaspaer$ createdb MyTest
postgres@squezee:/home/ghaspaer$ psql MyTest
psql (9.1.0)
Digite «help» para obtener ayuda.

MyTest=#
MyTest-# CREATE TABLE libros (id_libro int,nombre varchar)
MyTest=# INSERT INTO libros VALUES (1,'gunchelo');
MyTest=# SELECT * FROM libros;
id_libro | nombre
----------+----------
1 | gunchelo
(1 fila)
/etc/postgresql/9.1/main/pg_hba.conf
dropuser sce
local all all md5 ident
para crear usuarios como usario:postgresql
postgres@squezee:/etc/postgresql/9.1/main$ createuser sce --pwprompt
Ingrese la contraseña para el nuevo rol:
Ingrésela nuevamente:
¿Será el nuevo rol un superusuario? (s/n) n
¿Debe permitírsele al rol la creación de bases de datos? (s/n) n
¿Debe permitírsele al rol la creación de otros roles? (s/n) n
postgres@squezee:/etc/postgresql/9.1/main$ createuser sce --pwprompt
Ingrese la contraseña para el nuevo rol:
Ingrésela nuevamente:
¿Será el nuevo rol un superusuario? (s/n) n
¿Debe permitírsele al rol la creación de bases de datos? (s/n) n
¿Debe permitírsele al rol la creación de otros roles? (s/n) n
postgres@squezee:/etc/postgresql/9.1/main$ psql MyTest
psql (9.1.0)
Digite «help» para obtener ayuda.
MyTest=# GRANT ALL ON libros TO sce;
GRANT
MyTest=# \q
postgres@squezee:/etc/postgresql/9.1/main$ psql -U sce -W MyTest
Contraseña para usuario sce:
psql: FATAL: la autentificaci?n Peer fall? para el usuario <>
postgres@squezee:/etc/postgresql/9.1/main$ psql -U sce -W MyTest
Contraseña para usuario sce:
psql: FATAL: la autentificaci?n Peer fall? para el usuario <>
postgres@squezee:/etc/postgresql/9.1/main$ exit
ghaspaer@squezee:~$ psql -U sce -W MyTest
Contraseña para usuario sce:
psql: FATAL: la autentificaci?n Peer fall? para el usuario <