cs_alicia26
Messages postés65Date d'inscriptionlundi 21 mai 2007StatutMembreDernière intervention 7 juillet 2009
-
24 sept. 2008 à 11:36
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 2012
-
24 sept. 2008 à 14:26
Bonjour,
voici un code qui liste un ensemble de données provenant d'une table.
Seul problème,les données sont comme concaténées.
J'arrive pas à insérer un espace par exemple entre le champ et le second champ.
Dim sSelectSQL5 As String
sSelectSQL5 = "select NomFamille,Prénom from Employes where Email='" & Label3.Text & "'"
'Make the OleDbCommand objectNomFamille, Prénom
Dim cmdSelect5 As New Data.OleDb.OleDbCommand(sSelectSQL5, cnAccess)
Dim drEmp5 As Data.OleDb.OleDbDataReader, sbResults5 As New StringBuilder()
drEmp5 = cmdSelect5.ExecuteReader()
Do While drEmp5.Read()
sbResults5.Append(drEmp5.GetString(0))
sbResults5.Append(drEmp5.GetString(1))
Loop
Label5.Text = sbResults5.ToString()