Discussion :

[titocv723]

J'ai un problème avec ce morceau de code qui est censé me mettre la valeur d'une requete SQL dans le champ [nb serveurs] de mon formulaire ouvert
Le logiciel m'affiche l'erreur suivante: Erreur de compilation, fonction ou variable attendue.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub Nb_serveurs_Click()
 
Dim SQL As String
SQL = "SELECT Sum(Serveur.[Nombre de serveur de ce type] FROM Serveur GROUP BY Serveur.[Code Basicat], Serveur.G00R00 HAVING ((Serveur.[Code Basicat])=ME![Code basicat]) AND ((Serveur.G00R00)=ME![G00R00])"
Me![Nb serveurs] = DoCmd.RunSQL(SQL)
 
End Sub