Søg
Avatar billede axelgaard Nybegynder
28. april 2002 - 00:17 Der er 4 kommentarer og
1 løsning

tælle ting

Hej

Jeg har en kolonne i en database med nogle tal jeg vil have lagt sammen...

Jeg har selv lavet noget...:
Set db = CreateObject("ADODB.Connection")
db.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & App.Path & "\solvarme.mdb"

sSQL = "Select from Måledata where tidsbunkt = dato"
db.Execute sSQL

db.Close
Set db = Nothing


Hvis jeg har en værdi der hedder "totalværdi", så gemmer jeg f.eks. record1 + "totalværdi" som "totalværdi", også record2 + "totalværdi" osv, som så giver mig den samlede værdi af kolonnen ik?

Hvis ja hvordan laver man det i VB6?
Avatar billede ocp Nybegynder
28. april 2002 - 01:50 #1
Det kan ikke betale sig at lave det i VB, du skal blot ændre sSQL til:

sSQL = "Select sum(FeltITabel) from Måledata where tidsbunkt = dato"
Avatar billede axelgaard Nybegynder
28. april 2002 - 10:57 #2
Jeg laver et program i VB som skal tælle alle de tal sammen der står i en kolonne. Det er en Solvarme-styring, hvor VB programmet udregner den tilførte effekt og gemmer det i DB´en. Jeg vil senere kunne udlæse, hvor meget energi man har sparet fra fx. dato1 til dato2... derfor skal jeg kunne regne det hele sammen og bare noget af det sammen.
Avatar billede ocp Nybegynder
28. april 2002 - 15:25 #3
Hvad så med dette?

sSQL = "Select sum(FeltITabel) from Måledata where tidsbunkt between '2002/01/01' and '2002/04/30'"

eller, hvis det ikke virker i Access (Jeg er mest vant til SQL Server):

sSQL = "Select sum(FeltITabel) from Måledata where tidsbunkt => '2002/01/01' and tidsbunkt <= '2002/04/30'"
Avatar billede axelgaard Nybegynder
28. april 2002 - 17:36 #4
Okay... hvordan får jeg det så det overført til VB. Fx i en label eller variabel (ell. andet)?
Avatar billede ocp Nybegynder
28. april 2002 - 21:57 #5
dim rs

set rs = db.execute(sSQL)

label1.caption = rs.fields(0).value
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
22/0821:38 webui_forge_cu121_torch231 med AMD Grafikkort. Af jonpet i Andet software
22/0820:06 email adresse Af Malm i Forslag til ændringer
22/0819:54 problem med google crome Af Malm i Andet software
22/0809:36 Alternativ holder til to skærme... Af Don G i Skærme
20/0815:01 Samsung smart TV Af postpeter@outlook.dk i Fri debat
White papers
Flere white papers »