Bonjour,
ce que je veux faire est a peu pret la meme chose que le lien ci contre :
http://access.developpez.com/sources/?page=Requete
Sauf que je suis sous MS-sql server.
Est ce possible?
Et si oui, a quel endroit dois je mettre cette fonction :
Merci pour votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Pour cela, il vous faut placer ce code dans un module : Public Function RecupParticipant(Projet As Long) As String Dim res As DAO.Recordset Dim SQL As String 'Selectionne les participant du projet SQL = "SELECT NomParticipant FROM Tbl_Projet WHERE Projet=" & Projet Set res = CurrentDb.OpenRecordset(SQL) 'Concatene les différents enregistrement While Not res.EOF RecupParticipant = RecupParticipant & res.Fields(0).Value & " " res.MoveNext Wend 'Enleve le dernier espace RecupParticipant = Left(RecupParticipant, Len(RecupParticipant) - 1) 'libere la mémoire Set res = Nothing End Function
Partager