Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MS SQL Server
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-09-2007
SilviaM SilviaM is offline
Registrado
 
Registrado: sep 2007
Posts: 1
Poder: 0
SilviaM Va por buen camino
"Como Actualizar tablas de SQL Server en delphi!!"

Hola a todos "Por favor" Ayuda

Tengo un formulario donde ingreso nuevos clientes de un almacen estoy trabajando en ADOConnection,ADOtable, AdoStoredProc,DataSource y un DBNavigator que lo utilizo para recorrer la tabla, me deja ingresar todo los datos correctamente pero al momento de guardar los cambios no se actualiza la tabla en delphi pero si en SQL..

Como puedo hacer para que se actualicen las tablas en tiempo de ejecución y no tenga que cerrar el programa para que se actualicen

De ante mano muchas gracias por su ayuda
Responder Con Cita
  #2  
Antiguo 30-09-2007
Luis F. Orjuela Luis F. Orjuela is offline
Miembro
 
Registrado: may 2003
Ubicación: Bogotá - Colombia
Posts: 68
Poder: 21
Luis F. Orjuela Va por buen camino
Un saludo desde BOGOTA COLOMBIA

No es necesario cerrar el programa, tan sólo con cerrar y abir nuevamente tu tabla de va a mostrar los nuevos datos que haz ingresado....

....
....
AdoTable1.Close;
AdoTable1.Open;
....
.....


Suerte
__________________
Ing. LUIS FERNANDO ORJUELA
BOGOTA - COLOMBIA
Responder Con Cita
  #3  
Antiguo 16-10-2007
luchifer luchifer is offline
No confirmado
 
Registrado: jul 2007
Ubicación: Santa Cruz - Bolivia
Posts: 50
Poder: 0
luchifer Va por buen camino
Respondiendo a la actualizacion en SQl server

Es bastante comodo utilizar el Tadotable sin embargo me ocaciono varios problemas de actulizacion al menos con grandes volumenes de informacion por eso te recomiendo usar tAdosql para las diferentes consultas con una rutina de actualizacion en tablas similar a la siguiente:

dmodulo.basedatos.BeginTrans;
try
consulta:='insert into lcos_for (codpro, tipo, codins, cant_mae, desins, por_ins, cant_ins, uman, precio, valorbs)'
+'values ('+car+cb_produc.KeyValue+car+','
+ car+cb_tipo.KeyValue+car+','
+ car+wcodpro.Text+car+','
+ wcantmae.Text+','
+ car+wdescri.Text+car+','
+ floattostr(wporcen)+','
+ wcant.Text+','
+ car+dbuman.Caption+car+','
+ wprecbs.Text+','
+ wvalbs.Text+')';
DModulo.QConsulta.Close;
DModulo.QConsulta.sql.Clear;
DModulo.QConsulta.sql.add(consulta);
DModulo.QConsulta.ExecSQL;
Dmodulo.basedatos.CommitTrans;
Except
DModulo.BaseDatos.RollbackTrans;
showMessage('Los Datos no se gravaron...'+#13+'Revise los campos...');
exit;
end;
Responder Con Cita
  #4  
Antiguo 16-10-2007
Avatar de nuk3zito
nuk3zito nuk3zito is offline
Miembro
 
Registrado: ago 2003
Ubicación: "Z" Land
Posts: 244
Poder: 21
nuk3zito Va por buen camino
TADOQuery

Cita:
Empezado por luchifer Ver Mensaje
Es bastante comodo utilizar el Tadotable sin embargo me ocaciono varios problemas de actulizacion al menos con grandes volumenes de informacion por eso te recomiendo usar tAdosql para las diferentes consultas con una rutina de actualizacion en tablas similar a la siguiente:

dmodulo.basedatos.BeginTrans;
try
consulta:='insert into lcos_for (codpro, tipo, codins, cant_mae, desins, por_ins, cant_ins, uman, precio, valorbs)'
+'values ('+car+cb_produc.KeyValue+car+','
+ car+cb_tipo.KeyValue+car+','
+ car+wcodpro.Text+car+','
+ wcantmae.Text+','
+ car+wdescri.Text+car+','
+ floattostr(wporcen)+','
+ wcant.Text+','
+ car+dbuman.Caption+car+','
+ wprecbs.Text+','
+ wvalbs.Text+')';
DModulo.QConsulta.Close;
DModulo.QConsulta.sql.Clear;
DModulo.QConsulta.sql.add(consulta);
DModulo.QConsulta.ExecSQL;
Dmodulo.basedatos.CommitTrans;
Except
DModulo.BaseDatos.RollbackTrans;
showMessage('Los Datos no se gravaron...'+#13+'Revise los campos...');
exit;
end;
luchifer,
Querrás decir TADOQuery!!! y muy por el contrario... yo lo considero bastante engorroso (nada cómodo a menos que vengas de programar en Clipper o FoxPro)

Silvia,
Por otro lado, el Refresh en una tabla también se puede realizar para "refrescar" o actualizar la información.
Código Delphi [-]
AdoTable1.Refresh;

Sin embargo, como dice luchifer, a la postre te darás cuenta que resulta mucho más cómodo trabajar con TADOQuery.

En mi caso en particular, yo utilizo TADODataSet cuando trabajo con una tabla con los métodos Append (o Insert), Edit o Delete (por cuestión de orden) y solo uso los TADOQuery para ejecutar ciertas instrucciones directamente en SQL Server. Pero es igual de válido usar TADOQuery para todo.
__________________
Tiempo y ocasión acontecen a todos!
Responder Con Cita
  #5  
Antiguo 17-10-2007
luchifer luchifer is offline
No confirmado
 
Registrado: jul 2007
Ubicación: Santa Cruz - Bolivia
Posts: 50
Poder: 0
luchifer Va por buen camino
Me parece muy interesante

Como te diste cuenta que programe bastantes años en Clipper principalmente.
Te pido un favor, su pudieses pasarme una rutina pequeña como modelo de actualizacion de tablas te quedaria muy agradecido.
Responder Con Cita
  #6  
Antiguo 17-10-2007
Avatar de nuk3zito
nuk3zito nuk3zito is offline
Miembro
 
Registrado: ago 2003
Ubicación: "Z" Land
Posts: 244
Poder: 21
nuk3zito Va por buen camino
Catálogo de personas

luchifer, ¿te refieres a... un ejemplo de un catálogo o ABC (no se como le llamen en tu país)?

De ser así, tengo un ejemplo sencillo de un catálogo de personas que he utilizado para dar cursos express, pero te lo estaría enviando hasta mañana a primeras horas.

Solo confírmame si eso te serviría.

Saludos.
__________________
Tiempo y ocasión acontecen a todos!
Responder Con Cita
  #7  
Antiguo 17-10-2007
luchifer luchifer is offline
No confirmado
 
Registrado: jul 2007
Ubicación: Santa Cruz - Bolivia
Posts: 50
Poder: 0
luchifer Va por buen camino
Si me servira

Me interesa conocer ese codigo para inclusive tener mayores referencias de programación.

Gracias de antemano.

Por si acaso, la direccion de mi correo electronico es

luiferper@hotmail.com
lf_perezg@yahoo.es


Vivo en Santa Cruz, Bolivia
Responder Con Cita
  #8  
Antiguo 17-10-2007
Avatar de nuk3zito
nuk3zito nuk3zito is offline
Miembro
 
Registrado: ago 2003
Ubicación: "Z" Land
Posts: 244
Poder: 21
nuk3zito Va por buen camino
enviado!

Cita:
Empezado por luchifer Ver Mensaje
Me interesa conocer ese codigo para inclusive tener mayores referencias de programación.

Gracias de antemano.

Por si acaso, la direccion de mi correo electronico es

luiferper@hotmail.com
lf_perezg@yahoo.es


Vivo en Santa Cruz, Bolivia
Te envié por correo un código sencillo y digerible. Espero te sirva.

Saludos
__________________
Tiempo y ocasión acontecen a todos!
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Como "parsear" un fichero HTML con Delphi cartmanrules Varios 3 28-09-2007 08:59:42
Como hacer que se vea "Si" en vez de "TRUE" en un DBGrid lu9eui C++ Builder 2 07-08-2007 05:03:13
Necesito llamar a métodos de clases "hija" desde su clase "padre" Flecha OOP 17 20-04-2007 01:03:53
como "actualizar" una unidad de red ing_alsaac Varios 3 22-10-2003 08:54:23


La franja horaria es GMT +2. Ahora son las 04:08:29.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi