Section courante

A propos

Section administrative du site

N.B. Il va de soit qu'à cette étape, vous avez déjà installé la base de données SQL Server!

Ensuite, en supposant que vous avez une base de données nommé «mybasededonnees_db» dans votre base de données SQL Server Express avec la table «cdmworkgroup» ayant le contenu suivante:

Cin WorkGroupId Name_EN Name_FR Description Status CreateDate CreateUserId LastUpdate UpdateUserId
000 0000023901 Coder Développement Groupe de programmeur effectuant de la recherche et développement (R&D). A 2006/03/09 SYSADM 2006/03/09 SYSADM
000 0000023902 Maintenance Maintenance Groupe maintenant les divers services réseaux, implantant les développements, maintenant l'état actuel du matériel et administrant les accès. A 2006/03/09 SYSADM 2006/03/09 SYSADM
000 0000023903 Direction Direction Direction Groupe de travail s'occupant des divers orientations à prendre sur les projets et les produits. I 2006/03/09 SYSADM 2006/03/09 SYSADM
075 0000000068 Test Teste Groupe désigné pour le contrôle de la Qualité A 2006/03/09 STREMBLAY 2006/03/09 STREMBLAY

Grâce à ce petit programme et les paramètres de compilation suivant:

chrome showtablesqlserver.pas /ref:$(Framework)\System.dll /ref:$(Framework)\System.Data.dll

vous pourrez afficher la table «cdmworkgroup» vers la console:

NameSpace showtablesqlserver;

INTERFACE

Uses 
 System, System.Text, System.Data;

type
  Prog = class
    class method Main(Args: array of String);
  end;

IMPLEMENTATION

class method Prog.Main(Args: array of String);
Var
 conn:System.Data.SqlClient.SqlConnection;
 stmt:System.Data.SqlClient.SqlCommand;
 RS:System.Data.SqlClient.SqlDataReader;
begin
 conn:=New System.Data.SqlClient.SqlConnection('Data Source=(local)\SQLEXPRESS;Initial Catalog=mybasededonnees_db;Integrated Security=True');
 conn.Open();
 stmt:=New System.Data.SqlClient.SqlCommand('SELECT WorkGroupId,Name_EN,Name_FR FROM cdmworkgroup', conn);
 RS:=stmt.ExecuteReader();
 While RS.Read() DO Begin
  Console.WriteLine(RS.GetString(2));
 End;
 conn.Close();
end;

END.

Ensuite, vous devriez voir afficher un résultat ressemblant à celui-ci:

Développement
Maintenance
Direction
Teste


Dernière mise à jour : Dimanche, le 17 février 2008