Si tienes las fuentes podrias editarlo sin ningun problema, otra cosa que podrias hacer es editar el archivo host que esta en "C:\Windows\System32\drivers\etc" y poner
Nuevaip ViejaIp
Nuevaip ViejaIp
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú
String commandString = "INSERT INTO Users (Name, Desk, UpdateTime) VALUES (:Name, :Desk, :UpdateTime)";
using (OracleCommand command = new OracleCommand(commandString, _connection, _transaction))
{
command.Parameters.Add("Name", OracleType.VarChar, 50).Value = strategy;
command.Parameters.Add("Desk", OracleType.VarChar, 50).Value = deskName ?? OracleString.Null;
command.Parameters.Add("UpdateTime", OracleType.DateTime).Value = updated;
command.ExecuteNonQuery();
}
-- Creamos la tabla
CREATE TABLE clientes
(
idcliente INTEGER NOT NULL,
nombre VARCHAR2(100)NOT NULL,
fecha_registro DATE NOT NULL,
CONSTRAINT pk_departamentos PRIMARY KEY(idcliente)
);
/
-- Creamos el packete y definimos los procedimientos-funciones etc.
CREATE OR REPLACE PACKAGE pk_clientes IS
TYPE t_cursor IS REF CURSOR;
PROCEDURE sp_registra(
p_nombre VARCHAR2,
p_fecha_registro DATE
);
PROCEDURE sp_actualiza(
p_idcliente INTEGER,
p_nombre VARCHAR2,
p_fecha_registro DATE
);
PROCEDURE sp_get_lista(
p_resul OUT t_cursor
);
PROCEDURE sp_get_info_cliente(
p_idcliente INTEGER,
p_resul OUT t_cursor
);
END pk_clientes;
/
-- Creamos el cuerpo del packete aqui se implementa los procedimientos-funciones etc.
CREATE OR REPLACE PACKAGE BODY pk_clientes IS
--Procedimiento para Registrar
PROCEDURE sp_registra(
p_nombre VARCHAR2,
p_fecha_registro DATE
)
IS
BEGIN
INSERT INTO clientes(
nombre,
fecha_registro
)VALUES(
p_nombre,
p_fecha_registro
);
COMMIT;
END;
--Procedimiento para Actualizar
PROCEDURE sp_actualiza(
p_idcliente INTEGER,
p_nombre VARCHAR2,
p_fecha_registro DATE
)
IS
BEGIN
UPDATE clientes SET
nombre=p_nombre,
fecha_registro=p_fecha_registro
WHERE
idcliente=p_idcliente;
COMMIT;
END;
--Procedimiento para Listar
PROCEDURE sp_get_lista(
p_resul OUT t_cursor
) IS
BEGIN
OPEN p_resul FOR
SELECT
idcliente,
nombre,
fecha_registro
FROM
clientes;
END;
--Procedimiento para Informacion de un cliente
PROCEDURE sp_get_info_cliente(
p_idcliente INTEGER,
p_resul OUT t_cursor
) IS
BEGIN
OPEN p_resul FOR
SELECT
idcliente,
nombre,
fecha_registro
FROM
clientes
WHERE
idcliente=p_idcliente;
END;
END pk_clientes;
/
-- Secuencia para hacer el campo idcliente autonumerico
CREATE SEQUENCE seq_cliente;
/
CREATE OR REPLACE TRIGGER tr_seq_cliente BEFORE INSERT ON clientes
FOR EACH ROW
BEGIN
SELECT seq_cliente.nextval INTO :new.idcliente FROM dual;
END;
public static void RegistrarCliente(oCliente info)
{
using (OracleConnection oCn = new OracleConnection(App.GetStrConnection()))
{
string proc = string.Empty;
proc = "pk_clientes.sp_registra";
OracleCommand oCmd = new OracleCommand(proc, oCn);
oCmd.CommandType = CommandType.StoredProcedure;
oCmd.Parameters.Add(new OracleParameter("p_nombre", OracleDbType.Varchar2)).Value = info.nombre;
oCmd.Parameters.Add(new OracleParameter("p_fecha_registro", OracleDbType.Date)).Value = info.fecha_registro;
oCn.Open();
try
{
oCmd.ExecuteNonQuery();
}
catch (Exception ex)
{
throw new Exception(ex.Message, ex);
}
}
}