Ver Mensaje Individual
  #1  
Antiguo 07-11-2006
Avatar de Max_E.
Max_E. Max_E. is offline
Miembro
 
Registrado: sep 2006
Posts: 90
Reputación: 18
Max_E. Va por buen camino
desde excel al archivo DB

hola a todos :

una de las tantas preguntas que le hice al foro fue como llegar mis datos de un archivo DB a un archivo excel por medio de un Table la cual me explicaron muy bien y pude lograr lo pedido, pues ahora mi pregunta es como llevo los datos del archivo excel al archivo DB ya sea para modificar el archivo DB o aumentar una nueva fila (por medio de un query o un table)

claro esta que en el archivo excel tengo la misma cantidad de columnas que campos en el archivo DB

algo mas o menos asi:

los datos estas dentro de la matriz [(B,2),(D,n)] en excel
en la casilla A1 pongo el numero de datos n (filas) por eso empieza desde 2,2

Código SQL [-]
Excel.Workbooks.Open('ubicacion del Archivo excel');
Ndat:=excel.cells[1,1].value;  

for i:=2 to Nda +1 t do
begin
nom:=excel.cells[i,2].value;
var1:=excel.cells[i,3].value;
var2:=excel.cells[i,4].value;

query1.sql.text := Format('update nombreDB set campo1 = %s, campo2 = %s where nombre = %s',[Inttostr(var1), Inttostr(var2), QuotedStr(nom)]);
query1.Execsql;

end;

el caso es que no se cual seria los codigos y ''como aria para incorporar un nuevo nombre que esta en el archivo excel y no esta en el archivo DB '' que es mi mayor problema.


gracias por la ayuda a todos.....
Responder Con Cita