Importer des données à partir d'Excel

Je veux importer des données à partir d'Excel dans une base de données Paradox sur Delphi 7.

Comment puis-je le faire à l'aide de Delphi?

  • Il n'y a pas de question ici. C'est une déclaration. Désolé, mais je suis obligé de voter pour fermer.
  • Pas besoin de Delphi. Assurez-vous que vous avez le Paradoxe pilotes ODBC installés, puis connectez-vous à eux dans Excel. Fonctionne comme un charme; voir [ici][1] pour plus d'informations sur les différents types de pilotes ODBC, vous pouvez utiliser. --jeroen [1]: dbforums.com/corel-paradox/...
  • +1; vote pour ré-ouvrir. Même avec la question formulée comme une déclaration, je pense qu'il est clair que l'OP veut.
  • +1 vote pour la réouverture. Allez, la question est évidente, alors je l'ai ajouté. Doit-on aider les nouveaux utilisateurs?
  • Lorsque l'affiche n'est pas aller dans la difficulté de bien décrire le problème ou même de demander à cela, il ya une bonne chance que vous ne serez pas aborder le problème réel, ou vous ne serez pas aborder le problème d'une façon que l'affiche désirs. Si l'apanage que vous avez faite à la question aurait en effet été le libellé de la question, l'affiche aurait eu sa réponse à sa première tentative (stackoverflow.com/questions/4957414/...).
  • L'affiche avait amplement l'occasion de clarifier la question.
  • Pas tout le monde utilise l'anglais comme première langue.
  • ce n'est pas grave, l'affiche n'ai pas cherché à modifier la question pour le rendre clair. C'est un utilisateur avec 8 questions existantes. Nous ne parlons pas d'un nouvel utilisateur.
  • alors, comment beaucoup de questions faire un "nouvel utilisateur"? J'ai encore le souhaitez je peut retirer mon réouverture de vote depuis un ♦mod a parlé
  • eh bien, vous avez seulement été ici 40 jours, mais je ne suis pas sûr que je serais de la classe, vous en tant que nouveau avec tout ce que la rep!
  • Au moins on pourrait s'attendre à quelques réactions. Il y a une réponse à la tentative précédente et les deux réponses et des commentaires de celui-ci...

InformationsquelleAutor user578332 | 2011-02-20
  1. 5

    Bien, si vous avez la question étiqueté comme Delphi 7 je suppose que vous avez BDE. Cela vous permettra de faire l'ensemble du processus en Delphi.

    Vous pouvez modifier et utiliser ce code non testé (vous aurez besoin d'ajouter la gestion des exceptions):

    procedure TForm1.Button2Click(Sender: TObject);
var
  Cols: integer;
  Rows: integer;
  IntCellValue: integer;
  Excel, XLSheet: Variant;
  failure: Integer;

begin
  failure:=0;
  try
    Excel:=CreateOleObject('Excel.Application');
  except
    failure:=1;
  end;
  if failure = 0 then
  begin
    Excel.Visible:=False;
    Excel.WorkBooks.Open(<Excell_Filename>);
    XLSheet := Excel.Worksheets[1];
    Cols := XLSheet.UsedRange.Columns.Count;
    Rows := XLSheet.UsedRange.Rows.Count;

    // Value of the 1st Cell
    IntCellValue:=Excel.Cells[1, 1].Value;
    // Iterate Cals/Rows to read the data section in your worksheet
    // and you can write it in Paradox using the BDE by iterating all cells
    // somthing like this pseudo code:

      try            
        Query := TQuery.Create(nil)            
        Query .Databasename := PdxDBName; // must be configured in the BDE
        while Rows > 0
        begin
          while Cols > 0
          begin
            IntCellValue:=Excel.Cells[Cols,Rows].Value;
            Query .SQL.text := // SQLStmt including the IntCellValue
            ExecSQL;
            dec(Cols);               
          end;
          Cols := XLSheet.UsedRange.Columns.Count;
        Dec(Rows);
        end;
      finally
        Query.Free;
      end;

    Excel.Workbooks.Close;
    Excel.Quit;
    Excel:=Unassigned;
  end;
end;
    • J'ai essayé que la lecture d'un fichier xlsx. À la ligne XLSheet := Excel.Les feuilles de calcul[1] il déclenche une exception avec le message "erreur OLE 800A03EC". Des idées pourquoi ce qui se passe?
    InformationsquelleAutor CloudyMarble
  2. 4

    Qu'en CSV à partir d'Excel, puis importer le fichier CSV dans le Paradoxe de la DB?
    Vous pouvez également essayer d'exportation XML à partir d'Excel, puis de charger le XML dans Padadox DB par programmation.

    • Cela sent comme une conjecture.
    InformationsquelleAutor mozillanerd
  3. 2

    Cet outil SMImport dit qu'il peut le faire. Alors qu'ils veulent de 50$, vous pouvez télécharger une version d'essai gratuite.

    InformationsquelleAutor DOK
  4. 2

    Utiliser le Fournisseur ole db et ADO composant Delphi 7 pour atteindre cet objectif.
    Il devrait être simple à faire, et vous pouvez travailler avec Excel interrogation via des requêtes SQL.

    Utiliser le TADO composant pour obtenir les données, puis utiliser BDE composants comme TQuery pour importer les données de la table Paradox.

    • S'il vous plaît ne pas ajouter "accroches" pour vos réponses, il y a un endroit sur votre profil (que vous avez découverts) pour mettre votre URL si les gens sont intéressés.
    InformationsquelleAutor Senthil Kumar B