J# UNIDAD 5: INTRODUCION A LAS BASES DE DATOS

TEMA 13: EDICION DE REGISTROS

Editar registros significa cambiar el contenido de algunos de los campos o columnas por nueva informacion o para corregir algun error de captura original o para agregar alguna columna que no existia por modificacion de la tabla o la base de datos.

PARA ESTE CASO SE USA LA INSTRUCCION SQL UPDATE (YA ESTUDIARON EL TUTORIAL DE SQL)

Prog25.aspx

<%@ Page Inherits="System.Web.UI.MobileControls.MobilePage"
Language=VJ# %>
<%@ Register TagPrefix="mobile"
Namespace="System.Web.UI.MobileControls"
Assembly="System.Web.Mobile"%>
<%@ Import Namespace="System" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<B>EDICION</B>
<mobile:Form runat=server Paginate=true>
CLAVE EDITAR.:<mobile:TEXTBOX SIZE=3 ID=CLAVE runat=server />
<mobile:Command runat=server OnClick=BUSCAR Text=EDITAR />
NOMBRE:<mobile:TEXTBOX SIZE=10 ID=NOMBRE runat=server />
EDAD..:<mobile:TEXTBOX SIZE=3 ID=EDAD runat=server />
<mobile:Command runat=server OnClick=GRABAR Text=GRABAR />
<mobile:Label runat=server id=RESULTADO />
</mobile:Form>
<script runat=server>
// creando y cargando coneccion, adpater, dataset como variables globales
OleDbConnection coneccion;
DataSet tabla;
OleDbDataAdapter canal;
OleDbCommand orden;
String q;
void BUSCAR(Object sender, EventArgs e)
{
coneccion=new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\progfacil\\lauro\\mibase.mdb");
String q="select * from mitabla where clave = @CLAVE";
canal=new OleDbDataAdapter(q, coneccion);
canal.get_SelectCommand().get_Parameters().Add(new OleDbParameter("@CLAVE", OleDbType.Integer));
canal.get_SelectCommand().get_Parameters().get_Item("@CLAVE").set_Value(CLAVE.get_Text());
// creando el dataset y cargandolo
DataSet tabla= new DataSet();
canal.Fill(tabla, "mitabla");
// cargando el resultado
int cren=tabla.get_Tables().get_Item("mitabla").get_Rows().get_Count();
NOMBRE.set_Text(Convert.ToString(tabla.get_Tables().get_Item("mitabla").get_Rows().get_Item(cren-1).get_Item(1)));
EDAD.set_Text(Convert.ToString(tabla.get_Tables().get_Item("mitabla").get_Rows().get_Item(cren-1).get_Item(2)));
}
void GRABAR(Object sender, EventArgs e)
{
//abriendo coneccion y COMMAND(A LO FLOJO)
coneccion=new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\progfacil\\lauro\\mibase.mdb");
// un problema de UPDATE de sql
q = "UPDATE mitabla SET clave= @CLAVE, nombre= @NOMBRE, edad = @EDAD where clave= @CLAVE";
orden = new OleDbCommand(q, coneccion);
// cargando y convirtiendo parametros
orden.get_Parameters().Add(new OleDbParameter("@CLAVE", OleDbType.Integer));
orden.get_Parameters().get_Item("@CLAVE").set_Value(CLAVE.get_Text());
orden.get_Parameters().Add(new OleDbParameter("@NOMBRE", OleDbType.VarWChar, 20));
orden.get_Parameters().get_Item("@NOMBRE").set_Value(NOMBRE.get_Text());
orden.get_Parameters().Add(new OleDbParameter("@EDAD", OleDbType.Integer));
orden.get_Parameters().get_Item("@EDAD").set_Value(EDAD.get_Text());
// mandando actualizacion a la base de datos
orden.get_Connection().Open();
orden.ExecuteNonQuery();
orden.get_Connection().Close();
//avisando operacion
RESULTADO.set_Text("REGISTRO ACTUALIZADO");
CLAVE.set_Text("");
NOMBRE.set_Text("");
EDAD.set_Text("");
}
</SCRIPT>

Solo se combinaron los programas de busqueda e inserccion pero con sql update veamos la corrida completa:

Prog25.aspx

image511.jpg

image512.jpg

image513.jpg

TAREAS PROGRAMACION J# MOBILE

1.- construir aspx's de edicion para sus tablas y bases de datos

Politica de Privacidad