Søg
Avatar billede mekaniker Nybegynder
06. oktober 2002 - 15:47 Der er 12 kommentarer og
1 løsning

Hjælp til array

Jeg har brug for at lægge nogle vægte sammen, dette havde jeg tænkt mig at bruge et array til.

Systemet virker nogenlunde som en webshop, hvor jeg lister nogle ingredienser op og vægten på disse, hvordan lægger jeg disse værdier i et array og lægger dem sammen så jeg får en totalvægt.

Antallet af ingredienser kan variere, alt efter hvad man vælger og antallet af hver ingrediens kan også varier efter om man vælger at få 2 af en ting og 3 af en anden.

Jeg ved faktisk intet om array's, så jeg ved ikke engang om det er den rigtige måde at gøre det på.

Er der nogle der kan hjælpe.
Avatar billede medions Nybegynder
06. oktober 2002 - 15:49 #1
Hvis du nu fx har:

lngIngredienser = "123,123,543,732,2134,6423"
arrIng = Split(lngIngredienser,",")

intResult = 0
For i = 0 To UBound(arrIng)
  intResult = intResult + arrIng(i)
Next

Response.Write(intResult)

//>Rune
Avatar billede mekaniker Nybegynder
06. oktober 2002 - 15:51 #2
ok den tror jeg nok jeg er med på, men hvordn fylder jeg værdierne ind i array'et
Avatar billede medions Nybegynder
06. oktober 2002 - 15:56 #3
Har du dataerne nu?

//>Rune
Avatar billede oasen Nybegynder
06. oktober 2002 - 15:57 #4
Hvis du har en række variable:

var1 = "banan"
var2 = "hvedemel"
var3 = "grapefrugt"

- kan du sammenstykke dit array således:

Liste = var1 & "#" & var2 & "#" & var3
Arr_Liste = Split(Liste, "#")
Avatar billede medions Nybegynder
06. oktober 2002 - 15:58 #5
Hvis du trækker dem ud fra en DB. så kan du gøre sådan her:

lngIngredienser = ""
While objRs.EOF
  lngIngredienser = lngIngredienser & "," & objRs("felt")
objRs.MoveNext()
Wend

arrIng = Split(lngIngredienser,",")

intResult = 0
For i = 0 To UBound(arrIng)
  intResult = intResult + arrIng(i)
Next

//>Rune
Avatar billede oasen Nybegynder
06. oktober 2002 - 15:58 #6
http://www.html.dk/tutorials/asp/lektion8.asp
Avatar billede mekaniker Nybegynder
06. oktober 2002 - 16:27 #7
Hvis jeg prøver at skrive mit array ud med denne linie
Response.Write total
Får jeg dette: ,247,245,237,229

men jeg får en fejl, ved sammenlægningen

arrIng = Split(total,",")

intResult = 0
For i = 0 To UBound(arrIng)
  intResult = intResult + arrIng(i)
Next
response.write intresult

Type mismatch: 'intResult'
Avatar billede medions Nybegynder
06. oktober 2002 - 16:33 #8
Så skriv:

lngIngredienser = ""
While objRs.EOF
  lngIngredienser = lngIngredienser & "," & objRs("felt")
objRs.MoveNext()
Wend

intLength = Len(lngIngredienser)
lngIngredienser = Right(lngIngredienser,intLength -1)

arrIng = Split(total,",")

intResult = 0
For i = 0 To UBound(arrIng)
  intResult = intResult + arrIng(i)
Next

//>Rune
Avatar billede mekaniker Nybegynder
06. oktober 2002 - 17:13 #9
Tak for hjælpen.
Avatar billede medions Nybegynder
06. oktober 2002 - 17:19 #10
Anytime...
Thx 4 Poinz

//>Rune
Avatar billede oasen Nybegynder
06. oktober 2002 - 17:27 #11
Undskyld jeg forsøgte at hjælpe...
Avatar billede medions Nybegynder
06. oktober 2002 - 17:32 #12
oasen> ?

//>Rune
Avatar billede oasen Nybegynder
19. oktober 2002 - 01:36 #13
Nåh... det er da helt okay, hvis han ikke kan bruge mit svar. Men jeg synes, det virker flabet bare at afvise uden en begrundelse.
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 ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
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
07/1022:52 Google beskeder har/havde en bug, så den sendte tilfældige gamle beskeder gemt indeni nye beskeder efter skifte til ny Samsungtelefon via Samsung Smart Switch Af KennethLykke i Apps til Android
05/1010:31 Min IPAD vil ikke oplade. Af Nørdnot i Mac
04/1018:04 Findes der et "Papir-kurv" symbol, man kan sætte på Firefox og Google Chrome ? (For oven) Af Ikke-ekspert i Browsere
03/1012:14 Ang udskrift Canon mb5050 Af made18 i Printere
02/1021:29 Vedr. Windows 11 version 26H2 Af ErikHg i Fri debat
White papers
Flere white papers »