I denne artikel vil jeg vise hvilke muligheder et array giver.
Et array er en samling af data, der er tilføjet bestemte pladser. Feks.
-----------------------------------------------------
| Jens | Ole | Peter | Anders | Joakim | Ib |
-----------------------------------------------------
Det er lettere at holde styr på dine data i et array, fremfor at erklære variabler hver gang.
Desuden giver et array også flere muligheder i form af: hvor stort er dit array, du kan loope igennem alle pladserne, m.m..
Bemærk: når vi arbejder med et array er det normalt at første plads (Jens) ligger i posision 0, Ole i 1, Peter i 2.....
Opret et array
Når du skal oprette et tomt array, kan det gøres på følgende måder:
<%
'Vi opretter et array med 6 tomme pladser
Dim arrMitArray(5)
%>
Hælde data i et array
Når vi skal hælde data i vores array, kan det gøres på forskellige måder.
<%
'Nu hælder vi data manuelt ind i vores array
arrMitArray(0) = "Jens"
arrMitArray(1) = "Ole"
arrMitArray(2) = "Peter"
arrMitArray(3) = "Anders"
arrMitArray(4) = "Joakim"
arrMitArray(5) = "Ib"
%>
Vi kunne også havde gjort den på denne måde, hvis vi ikke i forvejen havde reseveret 6 pladser.
<%
'Nu hælder en tekststreng ind vores array
Dim arrMitArray
arrMitArray = Array("Jens", "Ole", "Peter", "Anders", "Joakim", "Ib")
'Det kunne også gøres på følgende måde med "split"
Dim arrMitArray
Dim Navne
Navne = "Jens, Ole, Peter, Anders, Joakim, Ib"
arrMitArray = Split(Navne,",")
'Det split-funktionen gør er, at opdele enstreng i enkelte poster.
'Her angiver vi det skal være hver gang den støder på et komma.
%>
Læse fra array
Der er forskellige måder, hvorpå du kan hente data ud fra dit array.
<%
' Den hurtigste måde er med funktionen "join".
' Dens funktion er at samle alle pladser til én streng
Response.Write Join(arrMitArray,"<br>")
'Du kan også hente bestemte pladser
Response.Write arrMitArray(3)
'Eller du kan "loope" gennem alle pladser
Dim i
For i = 0 To 5
Response.Write arrMitArray(i) & "<br>"
Next
%>
Oplysninger om dit array
Nogle gange kan det være en fordel at vide, hvor mange pladser der er i et array, dette klares med funktionen "Ubound"
<%
'Med Ubound sikrer du dig, at du får skrevet samtlige pladser ud
Dim i
For i = 0 To Ubound(arrMitArray)
Response.Write arrMitArray(i) & "<br>"
Next
%>
Udvidelse af dit array
Hvis du har behov for at oprette flere pladser i et allerede defineret array, kan det gøres på følgende måder
<%
' Vi "redimmer" for at definere størrelse om på ny. BEMÆRK, alle data slettes
Redim arrMitArray(6)
'For at bibeholde dine data kan du benytte argumentet "preserve"
Redim Preserve arrMitArray(6)
%>
Jeg har skrevet en efterfølger til denne artikel på: http://www.eksperten.dk/ (...)
