Fråga : Summa, om från ta fram databas

Alla hälsningar,

I skulle något liknande för att ha summan allra att fodra som har denna kriteriumbröl:
oRST2.Filter = ”Période = ”” & ComDateDisponible.Text & ”” & Description_du_produit = ””& Des_prod.Text &”” ”dessa 2 kriterier för

If finns, den ska tar summan av ror och satte resultatet i min textbox: txtQtedejaassigne.text.

How kan jag göra denna behar?

Thanks again > för 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
" codeBody " " "" för <> för >If Des_prod.Text för class= " för "" därefter oRST2.Filter = ”Période = ”” & ComDateDisponible.Text & ”” & Description_du_produit = ””& Des_prod.Text &”” ”, Avsluta om Avsluta om
" klar "

Svar : Summa, om från ta fram databas

” Jag ska försök att finna another långt.

Den nedanföra snippeten inspireras av ditt eget kodifierar i ifrågasätta förkroppsligar. Kanske denna är sortera av att kodifiera dig sökte efter?

(°v°)
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

    Dunkel sSQL2 som stränger
    Dunkel oRST2 som ADODB.Recordset
    Dunkel oConnect2 som ADODB.Connection
    
    Uppsättning oRST2 = ny ADODB.Recordset
    Uppsättning oConnect2 = ny ADODB.Connection

    sSQL2 _,
        = ”_ för VALD summa ([Quantité_assignée])”,
        & ”FRÅN [fördelningsemployé]” _,
        & ”VAR Période = ”” & ComDateDisponible.Text & ”” ”_,
        & ”   OCH Description_du_produit = ”” & Des_prod.Text & ”” ”,

    oConnect2.Open ”Provider=Microsoft.ACE.OLEDB.12.0; ” & _,
        ”Data Source=” & Form4.txt BaseDe.Text &”; ”,

    oRST2.Open sSQL2, oConnect2

    MsgBox oRST2.Fields (0). Värdera
Andra lösningar  
 
programming4us programming4us