Bueno el codigo es:
Código :
var databaseFile:String = "agenda.mdb";
var databasePassword:String = "";
var path:String = mdm.Application.path+databaseFile;
mdm.Database.MSAccess.connect(databaseFile, databasePassword);
var success = mdm.Database.MSAccess.success();
if (success == false) {
var msg:String = "srror";
mdm.Dialogs.prompt(msg);
return;
}
function consulta() {
theDataGrid.removeAll();
var sqlString:String = "SELECT id,fecha,desde,para,cargo,plazo,contenido,observaciones,numero FROM memis order by id asc";
mdm.Database.MSAccess.select(sqlString);
var error:Boolean = (mdm.Database.MSAccess.error() == "true");
if (error) {
var msg:String = "Ha ocurrido un error en la consulta!";
mdm.Dialogs.prompt(msg);
return;
}
var dataSet:Array = mdm.Database.MSAccess.getData();
var datos:Object;
var newItemsArray:Array = new Array();
for (var i = 0; i<dataSet.length; i++) {
datos = {};
datos.Id = parseInt(dataSet[i][0]);
datos.Fecha = dataSet[i][1];
datos.Desde = dataSet[i][2];
datos.Para = dataSet[i][3];
datos.Cargo = dataSet[i][4];
datos.Plazo = dataSet[i][5];
datos.Contenido = dataSet[i][6];
datos.Observaciones = dataSet[i][7];
datos.Numero = dataSet[i][8];
newItemsArray.push(datos);
}
theDataGrid.dataProvider = newItemsArray;
}
function layoutGUI():Void {
// Montamos el encabezado del datagrid
theDataGrid.columnNames = ["Id", "Fecha", "Desde", "Para", "Cargo", "Plazo", "Contenido", "Observaciones", "Numero"];
var gridWidth:Number = theDataGrid.width;
theDataGrid.getColumnAt(0).width = 0.05*gridWidth;
theDataGrid.getColumnAt(0).headerText = "Id:";
theDataGrid.getColumnAt(1).width = 0.15*gridWidth;
theDataGrid.getColumnAt(1).headerText = "Fecha:";
theDataGrid.getColumnAt(2).width = 0.15*gridWidth;
theDataGrid.getColumnAt(2).headerText = "Desde:";
theDataGrid.getColumnAt(3).width = 0.25*gridWidth;
theDataGrid.getColumnAt(3).headerText = "Para:";
theDataGrid.getColumnAt(4).width = 0.15*gridWidth;
theDataGrid.getColumnAt(4).headerText = "Cargo:";
theDataGrid.getColumnAt(5).width = 0.20*gridWidth;
theDataGrid.getColumnAt(5).headerText = "Plazo:";
theDataGrid.getColumnAt(6).width = 0.150*gridWidth;
theDataGrid.getColumnAt(6).headerText = "Contenido";
theDataGrid.getColumnAt(7).width = 0.150*gridWidth;
theDataGrid.getColumnAt(7).headerText = "Observaciones:";
theDataGrid.getColumnAt(8).width = 0.15*gridWidth;
theDataGrid.getColumnAt(8).headerText = "Numero:";
theDataGrid.setStyle("alternatingRowColors", [0xFFFFFF, 0xF9FCFD]);
}
bot_borrar.onRelease = function() {
LineaGrid = theDataGrid.selectedIndex;
if (LineaGrid != undefined) {
var sqlString:String = "DELETE FROM memis where id="+theDataGrid.getItemAt(LineaGrid).ID;
mdm.Database.MSAccess.runQuery(sqlString);
theDataGrid.removeItemAt(LineaGrid);
consulta();
}
};
theDataGrid.addEventListener("change", editar);
function editar(Obj) {
bot_editar.enabled = true;
DatosGrid = Obj.target.selectedItem;
fecha_txt.text = DatosGrid.Fecha;
desde_txt.text = DatosGrid.Desde;
para_txt.text = DatosGrid.Para;
cargo_txt.text = DatosGrid.Cargo;
plazo_txt.text = DatosGrid.Plazo;
contenido_txt.text = DatosGrid.Contenido;
observaciones_txt.text = DatosGrid.Observaciones;
numero_txt.text = DatosGrid.Numero;
}
bot_editar.enabled = false;
layoutGUI();
consulta();
stop();
no se si el codigo que tengo en el datagrid esta afectando a este codigo y es:
Código :
onClipEvent (enterFrame) {
if (Key.isDown(Key.LEFT)) {
this._x -= 50;
}
if (Key.isDown(Key.RIGHT)) {
this._x += 50;
}
}
on (load) {
this.vScrollPolicy = "auto";
this.hScrollPolicy = "auto";
this.setStyle("fontSize", 10);
this.setStyle("headerColor", 0x0E8FC7);
this.setStyle("alternatingRowColors", [0xFFFFFF, 0xF9FCFD]);
}