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, vous pourrez afficher la table «cdmworkgroup» vers la console:
MODULE showtablesqlserver;
IMPORT System, System.Data;
VAR
conn:System.Data.SqlClient.SqlConnection;
stmt:System.Data.SqlClient.SqlCommand;
RS:System.Data.SqlClient.SqlDataReader;
BEGIN
NEW(conn,"Data Source=(local)\\SQLEXPRESS;Initial Catalog=mybasededonnees_db;Integrated Security=True");
conn.Open();
NEW(stmt,"SELECT WorkGroupId,Name_EN,Name_FR FROM cdmworkgroup", conn);
RS:=stmt.ExecuteReader{():System.Data.SqlClient.SqlDataReader}();
WHILE RS.Read() DO
WRITELN(RS.GetString(2));
END;
conn.Close();
END showtablesqlserver.
Ensuite, vous devriez voir afficher un résultat ressemblant à celui-ci:
DéveloppementMaintenance
Direction
Teste
Dernière mise à jour : Samedi, le 2 février 2008