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 Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 18-07-2007
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Poder: 23
BlueSteel Va por buen camino
Talking Como hacer un Select, Insert, Update, Delete en SQL Server

Hola foreros...

Por disposiciones de mi empresa, lo que antes trabajaba con Interbase, tengo que hacerlo con SQLServer 2000.

Con respecto a lo anterior, he buscado en el foro, pero no he encontrado (o no supe buscar bien ), las sentencias para realizar dichos procedimientos...

por lo cual pondre las sentencias que utilizaba yo en Interbase 6, y si pueden indicarme como hacer lo mismo pero con SQLServer...

Las conexiones las estoy realizando co ADO, utilizando un TADOConnection y TADOQuery...

Otra consulta.. con Interbase utilizaba las Transaction... hay algun componente ADO que las reemplace ... y es necesario ???

Proceso para Seleccionar
Código Delphi [-]
IBQ_Edit.Close;
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Select * From "Proveedor" Order By "Pro_Rut"');
IBQ_Edit.Open;

Proceso para Insertar
Código Delphi [-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Insert Into "Proveedor" ("Pro_Rut","Pro_Razon","Pro_Direccion","Pro_Poblacion","Pro_Comuna","Pro_Fono","Pro_Fax")');
IBQ_Edit.SQL.Add('Values (:P1, :P2, :P3, :P4, :P5, :P6, :P7)');
IBQ_Edit.Params[0].AsString := vRut.Text;
IBQ_Edit.Params[1].AsString := vRaz.Text;
IBQ_Edit.Params[2].AsString := vDir.Text;
IBQ_Edit.Params[3].AsString := vPob.Text;
IBQ_Edit.Params[4].AsString := vCom.Text;
IBQ_Edit.Params[5].AsString := vTel.Text;
IBQ_Edit.Params[6].AsString := vFax.Text;
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;

Proceso para Actualizar
Código Delphi [-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Update "Proveedor" Set "Pro_Razon"=:Var1, "Pro_Direccion"=:Var2, "Pro_Poblacion"=:Var3, "Pro_Comuna"=:Var4, "Pro_Fono"=:Var5, "Pro_Fax"=:Var6');
IBQ_Edit.SQL.Add('Where "Pro_Rut"=:Var7');
IBQ_Edit.Params[0].AsString := sRaz.Text;
IBQ_Edit.Params[1].AsString := sDir.Text;
IBQ_Edit.Params[2].AsString := sPob.Text;
IBQ_Edit.Params[3].AsString := sCom.Text;
IBQ_Edit.Params[4].AsString := sTel.Text;
IBQ_Edit.Params[5].AsString := sFax.Text;
IBQ_Edit.Params[6].AsString := sRut.Text;
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;

Proceso para eliminar
Código Delphi [-]
IBQ_Edit.SQL.Clear;
IBQ_Edit.SQL.Add('Delete From "Proveedor" Where "Pro_Rut"=:Var1');
IBQ_Edit.Params[0].AsString := Rut.Text;
IBQ_Edit.ExecSQL;
IBT_Edit.Commit;

Bueno amigos... espero me puedan ayudar... y orientarme como realizar estos procesos o en donde buscar... gracias...
__________________
BlueSteel

Última edición por BlueSteel fecha: 18-07-2007 a las 21:24:51.
Responder Con Cita
 



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
Hacer un insert o un update en un campo array David Firebird e Interbase 4 27-04-2007 19:14:13
Insert, Update, Delete+MySQL+Zeos+Master/Detail BlackDaemon MySQL 4 03-04-2007 12:04:07
Por que el DBLookupoComboBox no se mueve con insert y delete David Conexión con bases de datos 1 19-07-2006 17:05:34
Trigger Before (Insert,update,delete)? estebanx MS SQL Server 2 25-05-2006 15:58:19
Como crear una sentencia SQL (Insert, update y delete) sitrico Conexión con bases de datos 1 14-10-2004 00:02:42


La franja horaria es GMT +2. Ahora son las 03:19:02.


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