Create table delphi 10.2 - sql server

abde83 - Modifié le 20 mai 2020 à 20:33
jacofee Messages postés 12 Date d'inscription mercredi 12 août 2020 Statut Membre Dernière intervention 16 août 2020 - 12 août 2020 à 17:18
Bonjour,
Je veux créer un tableau manuel dans Delphi
J'ai une erreur, mais je ne sais pas où il est. Veuillez trouver quelqu'un pour m'aider, merci beaucoup à l'avance
/////////////////////
DM.ADOQuery1.SQL.Clear;
     with DM.ADOQuery1.SQL do
     begin
        Add('USE ' + NomAlias + ';');
        Add('create table H_Art(');
     Add('reference varchar(15) not null,');
     Add('Type varchar(10) not null,');
     Add('Designation varchar(80),');
     Add('Raison varchar(40),');
       Add('CONSTRAINT H_Art PRIMARY KEY (Reference,N_piece,Type)');
      try
        DM.ADOQuery1.ExecSQL;
        ShowMessage('Table Created HIS_ARTICLES' );
      except
       ShowMessage('Table Not Created HIS_ARTICLES');
      end;
     end;

2 réponses

Correct ... il y a une légère erreur
///////////////////////////////////
DM.ADOQuery1.SQL.Clear;
     with DM.ADOQuery1.SQL do
     begin
        Add('USE ' + NomAlias + ';');
        Add('create table H_Art(');
     Add('reference varchar(15) not null,');
     Add('Type varchar(10) not null,');
     Add('Designation varchar(80),');
     Add('Raison varchar(40),');
        Add('CONSTRAINT F_H_Art PRIMARY KEY (Reference, N_piece, Type)');
      try
        DM.ADOQuery1.ExecSQL;
        ShowMessage('Table Created H_ARTICLES' );
      except
       ShowMessage('Table Not Created H_ARTICLES'));
      end;
     end;
0
jacofee Messages postés 12 Date d'inscription mercredi 12 août 2020 Statut Membre Dernière intervention 16 août 2020 1
12 août 2020 à 17:18
Bonjour,

Il manque des éléments pour répondre à votre question. En particulier le message d'erreur retourné par le système lorsque vous exécutez votre code.
Malgré tout, je constate que vous essayez de créer une clé primaire comprenant une colonne N_Piece ne figurant pas dans la définition de la table. Cela ne peut pas bien se passer.

Cordialement,
0
Rejoignez-nous