Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)
-   -   Error al insertar registro en Access (https://www.clubdelphi.com/foros/showthread.php?t=43467)

paco_galo 11-05-2007 21:00:49

Error al insertar registro en Access
 
Hola
otra vez dando lata....

Resulta que estoy trabajando con una base de datos creada en Access 2003.
Yo estoy trabajando en Builder 6 y para usar mi Base de Datos cree un alias en BDE Administrator pero cuando quiero insertar un nuevo elemento a travez de un DBEdit inserta un nuevo registro pero me manda un error, en donde dice lo siguiente:

ODBC Microsoft Access Ha intentado asignar el valor NULL a una variable que no es un tipo de datos.

POR QUE?? QUE ESTOY HACIENDO MAL???

El codigo que estoy utilizando es este:

if(Ba->Caption=="Agregar")
{ Ba->Caption="Guardar";
DBApe->Text="";
DBApe->SetFocus();
DMAgenda->TCApellid->Append();
}
else
{ Ba->Caption="Agregar";
DMAgenda->TCApellid->Insert();
DMAgenda->TCApellid->Post();
}

esto dentro del evento clic de un bitButton

Gracias.

Caral 11-05-2007 21:03:13

Hola
Para entenderlo un poco mejor acuerdate de usar las etiquetas.
Código Delphi [-]
if(Ba->Caption=="Agregar")
{ Ba->Caption="Guardar";
DBApe->Text="";
DBApe->SetFocus();
DMAgenda->TCApellid->Append();
}
else
{ Ba->Caption="Agregar";
DMAgenda->TCApellid->Insert();
DMAgenda->TCApellid->Post();
}
saludos

Caral 11-05-2007 21:04:36

Hola
No entiendo que tiene que ver este codigo con tu pregunta?
Saludos

paco_galo 11-05-2007 21:07:56

Cita:

Empezado por Caral
Hola
No entiendo que tiene que ver este codigo con tu pregunta?
Saludos

Lo que pasa es que me manda el error que expuse antes al darle clik al boton en donde tengo ese codigo.

No se por que me manda el error despues de haber insertado el registro????

:confused: :confused:

Caral 11-05-2007 21:12:33

Hola paco_galo
Perdona mi ignorancia, sigo sin entender el codigo.
Vallamos por partes:
Cual es el nombre del campo?
Que es Ba ?
Que hace -> en la ejecucion?
Por que usar y que tiene que ver el caption en esto?
No se pregunto?
Saludos

paco_galo 11-05-2007 21:18:19

Utilizo este codigo en un boton para hacer que funcione en dos formas diferentes dependiendo del contenido del caption. Mi boton tiene como Name Ba "Altas", y quiero que al darle el primer clik en este boton me añada un registro en blanco con Append() , para luego editarlo y guardarlo con Post().

Haber si me logras comprender un poquito... y disculpapor la insistencia y claro, la molestia.

Caral 11-05-2007 21:27:20

Hola
Aqui estoy metido en camisa de once varas.
No conozco builder pero en delphi seria algo asi:
Código Delphi [-]
  if (Ba.Caption = 'Agregar' then)
    DBApe.Text= ' ';
    DBApe.SetFocus();
    DMAgenda.TCApellid.Edit();
  end
  else
 DMAgenda.TCApellid.Insert();
 DMAgenda.TCApellid.Post();
  end;
saludos

Saiyan 12-09-2007 00:34:04

mi pregunta tiene algo que ver con esto..

pero tengo DEMASIADOS problemas para usar el ADOCOMMAND para hacer INSERTs en Access...

hay alguna manera que ande BIEN?

ya probe mediante Parameters e ir dándole con ParamsByName...
Poniendo el COmmandText en la propiedad del componente..
Pasandole el CommandTex por codigo (Adocommand.Commandtext:='bla bla';)...
Configurando los tipos en el editor de parámetros...
Poniendole Unknown a todos...
SIn ponerle nada.. etc

y me da "Error en Sintaxis de INSERT INTO" !!!!!!!!!!!!!!1

y no esta mal ,porque en Access ejecuto la consula y lo hace...

Código SQL [-]
INSERT INTO Tabla (col2, col3, col4) VALUES (valor2,valor3,valor4)

con quotedstr los strings, sin quotedstr los numericos, etc etc etc etc...

lo unico qe vislumbré es que con la forma

Código SQL [-]
INSERT INTO Tabla VALUES (valor2,valor3,valor4)

no da problemas... pero no quiero cargar todos los campos.. y ahi es cuando me da error..

como se manea de manera practica los INSERTS??

Delphi 7 y Access


Gracias!


La franja horaria es GMT +2. Ahora son las 10:03:05.

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