Discussion :

[Marie_7]

Bonsoir,
J'ai
-une table access contenant 3 colonnes id, Année et nb
- un form contenant un bouton qui permet d'afficher dans le label le nombre des jours de congé restants sachant que chaque personne(id) a le droit d'avoir 30 jours de congé par ans et que les jours restants pour chauque année seront ajoutés à l'année prochaine(30+nombre de jours restants)
par exemple si un ouvrier a eu seulement 17 jours de congé en 2013 alors en 2014 il aura 43-Somme(nb) jours
si non 30-Somme(nb) (cette condition marche correctement)
SUM(nb) : fait la somme des congés obtenus dans cet année

Code :

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

1
2
3
4
5
6
7
8
9
 
cn.Open()
        Dim ol As New OleDb.OleDbDataAdapter("select SUM(nb) from tab1 where id= '" & TextBox1.Text & "' and Année='" & TextBox2.Text & "' ", cn)
        Dim ds As New DataSet
        ol.Fill(ds)
        Dim re As Object() = ds.Tables(0).Rows(0).ItemArray
        Dim n As Double = 30 - re(0).ToString()
        Label1.Text = n
        cn.Close()

merci d'avance

[Kropernic]

Je ne suis p-e pas bien réveillé mais je discerne mal quelle est la question ou le problème pour lequel tu cherches notre aide.

[Jabbal'H]

Ca me pique les yeux de voir çà

Code :

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

1
2
 
Dim n As Double = 30 - re(0).ToString()

Même si dans ce cas, on est sur qu'il s'agisse bien d'un numérique.

Sinon j'ai pas vu non plus de point d’interrogation dans son post.

[_Ez3kiel]

Egalement je vois pas l'utilité de charger un DataSet avec un oleDbAdapter, de stocker la 1ére ligne du DataSet en array d'Object, de faire un calcul en se basant sur la 1ére ligne d'Array, alors qu'au final tu fais une requête pour un résultat unique car tu poses une contrainte sur l'ID ...

[Jabbal'H]

Ah oui j'avais même pas fait attention à çà, c'est quoi l’intérêt d'avoir une contrainte sur l'ID ET sur une date ??
L'ID semble avoir un sens fonctionnel

Code :

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

select SUM(nb) from tab1 where id= '" & TextBox1.Text & "' and Année='" & TextBox2.Text & "' "

Et je viens de voir autre chose, le nom de la colonne "Année" ==> "é" !!!

[Marie_7]

Bonjour
J'essaye d'expliquer un peu plus
j'ai une tableau en acces contenant ceci
------------------
id |Année |nb |
1 |2012 |4 |
2 |2013 |10 |
2 |2013 |7 |
1 |2014 |15 |
2 |2014 |8 |
Le code ci sessus marche correctement: par exemple, En tapant 2 dans le textBox1 et 2013 dans le textBox2 (Cet ouvrier a eu un congé de 10 jours puis un congé de 7 jours) et en appuiant sur le bouton on aura 13 jours restants(c'est à dire 30-(10+7) Mais j'ai besoin maintenant qu'à la fin de chaque année les jours restants seront ajoutés à l'année prochaine par exemple dans le cas de l'ouvrier n2 en 2014 il doit avoir 43 jours de congés (c'est à dire 30+13) et en appuiant sur le bouton il doit afficher 35 jours restants (c'est à dire 43-8)

[Kropernic]

Bonjour
J'essaye d'expliquer un peu plus
j'ai une tableau en acces contenant ceci
------------------
id |Année |nb |
1 |2012 |4 |
2 |2013 |10 |
2 |2013 |7 |
1 |2014 |15 |
2 |2014 |8 |
Le code ci sessus marche correctement: par exemple, En tapant 2 dans le textBox1 et 2013 dans le textBox2 (Cet ouvrier a eu un congé de 10 jours puis un congé de 7 jours) et en appuiant sur le bouton on aura 13 jours restants(c'est à dire 30-(10+7) Mais j'ai besoin maintenant qu'à la fin de chaque année les jours restants seront ajoutés à l'année prochaine par exemple dans le cas de l'ouvrier n2 en 2014 il doit avoir 43 jours de congés (c'est à dire 30+13) et en appuiant sur le bouton il doit afficher 35 jours restants (c'est à dire 43-8)

Pour ma part, ce calcul doit se faire directement au moment de la requête SQL.

[Marie_7]

Pour ma part, ce calcul doit se faire directement au moment de la requête SQL.

oui mais je n'ai pas arrivé à faire le test de l'année

[Kropernic]

oui mais je n'ai pas arrivé à faire le test de l'année

Je ferais quelque chose comme ceci :

Code sql :

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

1
2
3
4
5
6
7
8
 
SELECT
        SUM(NB) + ISNULL((SELECT 30-SUM(NB) FROM TAB1 WHERE ID = @ID AND ANNEE = @ANNEE-1),0)
FROM
        TAB1
WHERE
        ID = @ID
    AND ANNEE = @ANNEE

N.B. : Il s'agit de code en t-sql (pour sql server) donc il faudra p-e faire quelques adaptations pour cela fonctionne en Access.

Je n'ai pas testé (car j'ai écrit la requête directement dans la réponse à la discussion) mais ça te donne l'idée.

Il y a des manières plus "jolies" d'écrire la requête mais j'ignore les possibilités offertes par access alors j'ai fait dans le bête et méchant (c'est-à-dire la sous-requête dans le select)

[rv26t]

Bonjour,

As-tu étudié comment faire conceptuellement avant de te lancer dans la programmation ?
Il pourrait y avoir une colonne reliquat, qui serait mise à jour début janvier (le 1er janvier en traitement automatique), cela te simplifierait la suite. Non ?

[Jabbal'H]

Sans parler de la clé primaire qui ne doit pas exister sur la table présenté, ou alors mieux vaut éviter de poser deux fois le même nombre de jour de congé la même année!