Bonjour,
essaie
Dim adp As New SqlDataAdapter("SELECT n_dossier, nom_prenom, date_naiss, lieu_naissance, sexe, sit_familiale, grp_sanguin, type_malade from T_patient where [date_naiss] between "& string.format('{0:dd/mm/yyyy}' and '{1:dd/mm/yyyy}'", date1.value.tostring, date2.value.tostring), con)
pour vérifier la requête :
1 2
| dim SCmd as string
scmd = "SELECT n_dossier, nom_prenom, date_naiss, lieu_naissance, sexe, sit_familiale, grp_sanguin, type_malade from T_patient where [date_naiss] between "& string.format('{0:dd/mm/yyyy}' and '{1:dd/mm/yyyy}'", date1.value.tostring, date2.value.tostring)" |
Tu peux aussi créer le texte dans la fenêtre exécution
Récupère le texte dans le débugger et teste la requête dans ton éditeur sql.
Bon boulot Jean
Partager