Como hacer un Select, Insert, Update, Delete en SQL Server

[mamcx]

Pues sin ver mas codigo, Soc_Apellidos esta nulo.

Para saber los tipos de datos es igual... usa la propiedad FieldDefs para obtener la estructura de los campos

[roman]

Empezado por BlueSteel

Código Delphi [-]
AQ_Select.Close;
AQ_Select.SQL.Clear;
AQ_Select.SQL.Add('Insert Into Socio(Soc_Rut, Soc_Nombres, Soc_Apellidos) Values (:vRut.Text, :vNom.Text, :vApe.Text)');
AQ_Select.ExecSQL;

¿Y dónde asignas valores a los parámetros?

// Saludos

[[BlueSteel]]

Shuata... yo pensaba que con

Values (:vRut.Text, :vNom.Text, :vApe.Text)');

estaba solucionado... por que esos son los datos .. si no es así.. como debe ser ???

[[Caral]]

Hola
Supongo que a lo que se refiere Roman es a de donde se sacan esos parametros, para mi no tiene parametros, tiene edits, por lo cual seria asi:

Código Delphi [-]
AQ_Select.Close;
AQ_Select.SQL.Clear;
AQ_Select.SQL.Add('Insert Into Socio(Soc_Rut, Soc_Nombres, Soc_Apellidos) Values (vRut.Text, vNom.Text, vApe.Text)');
AQ_Select.ExecSQL;

En caso de tener parametros no seria .text.
Saludos

[roman]

Me imagino entonces, que vRut, vNom y vApe son Edits que tienes en tu aplicación. Pero SQL no entiende nada de Edits. En tu primer mensaje de este hilo pones una inserción donde sí sustituyes parámetros, por ello no entiendo que aquí los omitas.

// Saludos

[[BlueSteel]]

Roman... tienes toda la razon.. lo que pasa es que con ADO.. .no se como hacerlo?

pero igual toy tratando de ver como se hace...

[roman]

¡Ah! Creo ver por donde va el problema. Es que ADO usa una nomenclatura un poco distinta para acceder a los parámetros. Lo similar a lo que tienes con los componentes IB sería así:

Código Delphi [-]
ADOQuery1.Parameters[0].Value := vRut.Text;

// Saludos

[[BlueSteel]]

Gracias a todos... ahora si me funco...

Código Delphi [-]
AQ_Edit.Close;
AQ_Edit.SQL.Clear;
AQ_Edit.SQL.Add('Insert Into Socio(Soc_Rut, Soc_Nombres, Soc_Apellidos) Values (:vRu, :vNom, :vApe)');
AQ_Edit.Parameters[0].Value :=vRut.Text;
AQ_Edit.Parameters[1].Value :=vNom.Text;
AQ_Edit.Parameters[2].Value :=vApe.Text;
AQ_Edit.ExecSQL;

Ahora, solo por preguntar.. existe una forma más fácil... digo ,. .utilizando un QuoteStr.. o algo por el estilo ???