Discussion :

[py86acces]

Bonsoir a tous
Etant novice dans la matière, je vous de demande de l'aide
J'essaye de faire une base de stock sur l'exemple: gestion-de-stock de claudeleloup
Voici le code que je voudrais modifier

Code :

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

1
2
3
4
Public Function SortiesADate(Article As Long, DateAng As Date) As Single
 SortiesADate = Nz(DSum("sortieQuant", "tSorties", _
                  "format(SortieDate,""yyyymmdd"")<=" & Format(DateAng, "yyyymmdd") & " and tArticlesFK=" & Article), 0)
End Function

Ma question est:
Dans ma table puis je mettre tArticlesFK comme type de donnée en texte court en non en numérique
Car le code marche qu'avec le type de données numerique

J'ai essayer de mettre

Code :

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

Article As String

et tArticlesFK de ma table en texte court et j'ai un message d'erreur sur type de donnée

Ma raison est que si je dois insérer une lettre, comment faire?
Une Idée
Merci

[tee_grandbois]

bonsoir,
ton explication est un peu confuse.
Actuellement, quel est le type de ton champ tArticlesFK ?
si il est de type texte, il faut en tenir compte dans le code et mettre des apostrophes ou des guillemets dans la partie WhereCondition:

Code :

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

1
2
3
4
Public Function SortiesADate(Article As String, DateAng As Date) As Single
 SortiesADate = Nz(DSum("sortieQuant", "tSorties", _
                  "format(SortieDate,""yyyymmdd"")<=" & Format(DateAng, "yyyymmdd") & " and tArticlesFK='" & Article & "'"), 0)
End Function

[py86acces]

Bonjour
Merci ça marche

Pour être plus clair, mon champ tArticlesFK est du texte court et le code ne fonctionnait qu'avec un champ numérique.
je voulais avoir la liberté de mélanger lettres et nombres pour tArticlesFK pour la compréhension a la lecture.


Milles excuses pour mon premier charabia.


merci et bon Week end