Exercice :
On souhaite créer sous Visual Basic DOTNET, une application Desktop permettant d’enregistrer les logiciels installés ou mis à niveau en indiquant la date d’installation, le type d’installation, la version et en cas de besoin une remarque.
Toutes ces données sont modélisées par le modèle relationnel suivant :
Écrire le code de la procédure « Afficher_Liste » permettant d’afficher la liste des installations,
effectuées entre deux dates passées en paramètre, dans un objet DataGridView nommé « DGVListe».
Voici un aperçu de l’objet « DGVListe » :
Solution 1:
Sub Afficher_Liste(ByVal Du As Date, ByVal Au As Date)
dim req as String
req="select Num_Installation as [N° Installation], DateInstallation as [Date Installation], NumPost as [N° Poste], Marque, Modele as [Modèle], Libellé as [Libellé Logiciel], Propriétaire, Version, Remarque from installation i, poste p, logiciel l where i.NumPoste=p.NumPoste and i.codeLogiciel=l.CodeLogiciel and
DateInstallation between Du and Au"
dim cmd as new SqlCommand(req,con)
Dim rd as SqlDataReader=cmd.ExecuteReader()
Dim T As new DataTable
T.load(rd)
rd.close()
DGVListe.DataSource=T
End Sub