---

Hej NG,

Hvordan vender man et array i ASP med VB script, altså således at de sidste
værdier kommer først? Jeg har søgt Google tynd efter en funktion i stil med
PHP's array_reverse() men har ikke haft noget held.
Er der en venlig sjæl der kan hjælpe

Mikkel Small

---

Mikkel Small wrote:
> Hvordan vender man et array i ASP med VB script, altså således at de sidste
> værdier kommer først? Jeg har søgt Google tynd efter en funktion i stil med
> PHP's array_reverse() men har ikke haft noget held.
> Er der en venlig sjæl der kan hjælpe

Jeg tror ikke der findes en funktion, der kan gøre det, men du kan nemt
kode det selv.
1) Enten opretter du et nyt array med samme længde og flytter
elementerne hver for sig.
2) Eller også bytter du om på elementerne i det array du allerede har.

Jeg tror 1) vil være nemmest at implementere...

mvh Torben

---

> 1) Enten opretter du et nyt array med samme længde og flytter
> elementerne hver for sig.
> Jeg tror 1) vil være nemmest at implementere...

Kan jeg få dig til at give mig et eksempel? Det behøver ikke være komplet
kode, bare en kort gennemgang af hvordan det gøres bedst. Jeg er lidt i
tvivl om hvordan VB arbejder med arrays.

Mikkel

---

Mikkel Small wrote:
>>1) Enten opretter du et nyt array med samme længde og flytter
>>elementerne hver for sig.
>>Jeg tror 1) vil være nemmest at implementere...
>
>
> Kan jeg få dig til at give mig et eksempel? Det behøver ikke være komplet
> kode, bare en kort gennemgang af hvordan det gøres bedst. Jeg er lidt i
> tvivl om hvordan VB arbejder med arrays.

Jeg er også lidt i tvivl, men here goes:
1) Man opretter en array af længde 10 med
Dim myArray(10)
eller
ReDim myArray(10)
2) Hvis vi i forvejen ikke ved hvor lang arrayet er, så skal '10'
herover være en variabel. Det må man vist kun i tilfældet med ReDim, så
det bruger vi.
3) Vi opretter et array af samme længde som det oprindelige
(vi kalder det oprindelige for myArray1)
laengde = UBound(myArray1)
ReDim myArray2(laengde)
hvor UBound angiver længden af arrayet (egentlig er det det største
index i arrayet, men jeg antager arrayet starter med element nr 1, og så
er det det samme)
4) Vi flytter elementerne en efter en:
For i = 1 To laengde
myArray2(i) = myArray1(laengde - i + 1)
Next

Håber det fungerer nogenlunde - det er ikke testet :)

Torben

---

"> Kan jeg få dig til at give mig et eksempel? Det behøver ikke være komplet
> kode, bare en kort gennemgang af hvordan det gøres bedst. Jeg er lidt i
> tvivl om hvordan VB arbejder med arrays.

prøv ar se her:

http://activedeveloper.dk/julekalender/julegaver/bubble.asp

Mette

---

> prøv ar se her:
>
> http://activedeveloper.dk/julekalender/julegaver/bubble.asp

Tak skal I have begge to! Jeg prøvede med Torbens eksempel og det virkede
fint :) Har dog bookmarket ovenstående link til senere brug.

---

mette wrote:
>> Kan jeg få dig til at give mig et eksempel? Det behøver ikke være komplet
>
>>kode, bare en kort gennemgang af hvordan det gøres bedst. Jeg er lidt i
>>tvivl om hvordan VB arbejder med arrays.
>
> prøv ar se her:
>
> http://activedeveloper.dk/julekalender/julegaver/bubble.asp

Ikke fordi der er noget i vejen med linket, men der efterspørges en
simpel vending af arrayet og ikke en sortering :)

Torben