Página 1 de 5

[Video]Introducccion Mysqlite en AMS

Publicado: 03 Ago 2011 21:54
por rafaxplayer
Buenas compañeros , aqui os dejo este video de introduccion ala implementacion que lleva AMS de Mysqlite , usando una base de datos gratuita de [link]db4free.net[/link] y como proyecto... una agenda de contactos . espero que os sirva de mucha ayuda y cualquier cosa , ya sabéis... aquí andamos ;)

Imagen

HIDE: ON
Hidebb Message Hidden Description


Imagen

Code source del video:

On StartUp:
MySQL = luasql.mysql();
MySQLConnection, err = MySQL:connect('mysqldatabaseraf', 'rafaxplayer', 'amsspecialist', 'db4free.net', '3306');
if not MySQLConnection and err then
   Dialog.Message("error",err);
else
	Dialog.Message("Ok","conexion establecida");
end
On Show de la pagina:
MySQLCursor = MySQLConnection:execute("SELECT * From Agenda")
for i = 1, MySQLCursor:numrows() do
   local ID,Nombre = MySQLCursor:fetch();
   ListBox.AddItem("ListBox1", Nombre, ID);

end
ListBox.SelectItem("ListBox1", 1);
MySQLCursor:close()

new=false;
On Select del listBox:
local nSel = ListBox.GetSelected("ListBox1")
if nSel then
nID = ListBox.GetItemData("ListBox1",nSel[1]);

	MySQLCursor = MySQLConnection:execute("SELECT * From Agenda Where ID =".. nID .."")
	local ID,Nombre,Apellidos,Email,Telefono = MySQLCursor:fetch();
   	Input.SetText("Nombre", Nombre)
	Input.SetText("Apellidos", Apellidos)
	Input.SetText("Email", Email)
	Input.SetText("Telefono", Telefono)
	MySQLCursor:close()
end
new=false;
On Click Boton "Nuevo":
Input.SetText("Apellidos","");
Input.SetText("Email", "");
Input.SetText("Nombre", "");
Input.SetText("Telefono", "");
new = true;
On Click Boton "Guardar":
local Nombre = Input.GetText("Nombre");
local Apellidos = Input.GetText("Apellidos");
local Email = Input.GetText("Email");
local Telefono = Input.GetText("Telefono");
if Nombre ~= "" then
	if new then

		MySQLConnection:execute("INSERT INTO Agenda (ID, Nombre, Apellidos, Email, Telefono) VALUES (NULL, '"..Nombre.."', '"..Apellidos.."','"..Email.."', '"..Telefono.."')")

	else

		MySQLConnection:execute("UPDATE Agenda SET Nombre ='"..Nombre.."',Apellidos ='"..Apellidos.."',Email ='"..Email.."',Telefono ='"..Telefono.."' Where ID ="..nID)
	end
end

ListBox.DeleteItem("ListBox1",  LB_ALLITEMS);
MySQLCursor = MySQLConnection:execute("SELECT * From Agenda")
for i = 1, MySQLCursor:numrows() do
   local ID,Nombre = MySQLCursor:fetch();
    result = ListBox.AddItem("ListBox1", Nombre, ID);

end
MySQLCursor:close()

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 04:06
por Thedary
Esto va para BookMarks! :D

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 04:52
por jashds
esta bueno el video, gracias

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 10:15
por er_mejor
gracias por este gran tutorial rafaxplayer! directo a favoritos.

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 14:45
por nghethihieu
;))

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 20:21
por Ceone
rafaxgay ;) esta chulo!

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Ago 2011 22:15
por xYx_|ThEViPeR|_xYx
gracias por el tuto!

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 05 Ago 2011 03:03
por Pabloko
rafaxgay lol

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 05 Ago 2011 15:21
por sterio_king
thanks alot

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 10 Ago 2011 00:21
por dangngocnguyenit
thanks

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 06 Oct 2011 04:12
por dannylivenow
Muchas gracias, probare este método, saludos a todos los amigos de este foro

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 06 Oct 2011 08:12
por mensajero1
Muy bueno

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 06 Oct 2011 14:39
por erickdj
Imagen

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 08 Oct 2011 16:42
por daynor
Gracias

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 13 Oct 2011 01:45
por Cyberkiller
Muy bueno tengo que descargarlo

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 13 Oct 2011 08:48
por mecivic
Thank you

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 04 Nov 2011 08:43
por quiquemon86
gracias

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 09 Nov 2011 18:32
por riky1986
gracias por toda la ayuda esta muy bueno el tema

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 09 Nov 2011 19:48
por riky1986
Gracias espero que sea lo que nececito

Re: [Video]Introducccion Mysqlite en AMS

Publicado: 09 Nov 2011 20:12
por rafaxplayer
riky no hace falta que hagas cita de todo el post ;)