Rebonjour le forum
J'ai écrit la ligne suivante devrait me permettre de compter le nombre d'enregistrements distincts selon un critère.
StrArticle est défini par la valeur d'une textbox.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 strSQLNombreEnregistrements = "SELECT DISTINCT qry_PrixGenerale.SKU, qry_PrixGenerale.Description FROM qry_PrixGenerale " _ & "WHERE qry_PrixGenerale.SKU LIKE """ & strArticle & "*"";"
Je voudrais ensuite passer cette variable par la fonction suivante.
Et là, j'ai une erreur "Either BOF or EOF is true, or the current record has been deleted". Soit.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Function ComptageNombreEnregistrements(strSQLNombreEnregistrements As String) As Long rst.Open strSQLNombreEnregistrements, cnc, adOpenKeyset, adLockBatchOptimistic rst.MoveLast ComptageNombreEnregistrements = rst.RecordCount rst.Close End Function
Là où je suis perdu, c'est que quand je debug.print strSQLNombreEnregistrements, j'ai par exemple:
Code sql : Sélectionner tout - Visualiser dans une fenêtre à part SELECT DISTINCT qry_PrixGenerale.SKU, qry_PrixGenerale.Description FROM qry_PrixGenerale WHERE qry_PrixGenerale.SKU LIKE "1621*";
Et quand je copie cette ligne dans le QBE, je n'ai aucun problème...
Partager