Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 12-05-2011
elturu15 elturu15 is offline
Miembro
NULL
 
Registrado: abr 2011
Posts: 37
Poder: 0
elturu15 Va por buen camino
Insertar en Access

Hola Tengoun gran problema...hice un proyecto con Access y ADOquery y todo bien pero ahorale tengo que agregar Alta de Usuarios. Para esto creo una Table en Access llamada Usuarios donde tiene un campo NombreUser : Texto y Pas : Texto.
Y el problema es que cuando realizo el proseso de incertar, que es el mismo que utilize anteriormente y ninca me trajo problemas, me Salta un Error que dice:

" El parametro [Campo.-nombre-user] no tiene un Valor Predeterminado "...

Pq me sale este esrror si nunca me salio antes y Otra cosa...solo pasa cuano ingreso letras!!!

el codigo que uso es el siguiente
Código Delphi [-]
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
     ADOQuery1.SQL.Text:='SELECT * FROM operadores WHERE (nombre = '+ edit1.Text +') order by nombre;';
     ADOQuery1.Open;
     if (ADOQuery1.Eof) then
         begin
           ADOQuery1.Close;
           ADOQuery1.SQL.Clear;
           ADOQuery1.SQL.Text:='INSERT INTO operadores (nombre, contra, nivel) VALUES ( '
           + edit1.Text  + ' , ' + '''' + edit2.Text  + '''' + ' , ' + '''' + edit3.Text  + '''' + ');';
           ADOQuery1.ExecSQL;
           Showmessage('¡Empleado Ingresada!');
         end
       else
         ShowMessage('ERROR, Ya Existe'
);


que algien me ayude ja!
Responder Con Cita
  #2  
Antiguo 12-05-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Código Delphi [-]
ADOQuery1.SQL.Text:='SELECT * FROM operadores WHERE (nombre = '+ QuotedStr(edit1.Text) +') order by nombre';

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
  #3  
Antiguo 12-05-2011
Avatar de oscarac
[oscarac] oscarac is offline
Miembro Premium
 
Registrado: sep 2006
Ubicación: Lima - Perú
Posts: 2.010
Poder: 20
oscarac Va por buen camino
si quieres encerrar algo entre comillas usa mejor quotedstr
se ve un poco mas ordenado, no he podido revisar si los campos corresponden debido a las muchas comillas que tienes

QuotedStr(Edit1.Text)


otra recomendacion que puede ayudarte en el futuro es que a los edits le coloques nombres que puedas identificar facilmente, edit1 no me dice mucho pero si le colocaras por ejemplo

edtNombreTrabajador
edtContra
edtNivel


Edito :
debo ser mas rapido.. el maestro Ecfisa se me adelanto
__________________
Dulce Regalo que Satanas manda para mi.....
Responder Con Cita
Respuesta



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
Error al insertar registro en Access paco_galo Tablas planas 7 12-09-2007 00:34:04
Insertar Imagen en Registro de Access Saiyan Conexión con bases de datos 7 22-08-2007 17:27:52
problema al insertar en bd access manoley23 SQL 12 20-07-2006 14:16:31
Error al insertar registros en Access Moises22 Conexión con bases de datos 2 09-01-2006 14:36:25
Insertar una imagen en una DB de Access cone220 Gráficos 0 05-02-2004 13:24:32


La franja horaria es GMT +2. Ahora son las 01:29:40.


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