Das ASP-Array ist ein relativ einfach zu verwendender Container zum Laden großer Datenmengen.
1. Array definieren
Es gibt zwei Möglichkeiten: DIM und REDIM.
DIM definiert ein Array mit festen Nummern und Datentypen. REDIM kann verschiedene Datentypen definieren und auch Daten definieren, deren Anzahl nicht festgelegt ist. Vergleichen Sie die folgenden Beispiele. Beispiele, die alle legal sind:
Programmcode
Dimmen Sie mein Array (5,2)
Redim myarray(5,2)
Beispiele, bei denen Ersteres falsch und Letzteres legal ist:
Programmcode
n=10
Dimme mein Array(n)
Redim myarray(n,2)
Darüber hinaus kann REDIM auch Arrays unbestimmter Typen definieren, wie zum Beispiel:
Programmcode
Redim myarray(10)
2. Anzahl der Arrays
Der beim Definieren eines Arrays mit DIM oder REDIM angegebene Index stellt den maximal zulässigen Index beim Zugriff auf das Array dar, nicht jedoch die Anzahl der Arrays. Tatsächlich ist die Anzahl der eindimensionalen Arrays immer gleich (maximaler Index + 1), und der Zugriff erfolgt einzeln, beginnend bei 0 bis zum Index.
Zum Beispiel:
Programmcode
Dimmen Sie mein Array (5)
Es gibt 6 definierte Array-Elemente, nämlich:
Inhalte zitieren
meinArray(0), meinArray(1), meinArray(2), meinArray(3), meinArray(4), meinArray(5)
Ein weiteres Beispiel:
Programmcode
Redimieren Sie dieses Array (2,5)
Tatsächlich ist ein zweidimensionales Array von (2+1)*(5+1)=1 8 definiert.
Können wir in diesem Fall ein Array mit nur einem Element eindeutig definieren? Die Antwort lautet: Nein.
Wie bereits erwähnt,
Programmcode
Redimieren Sie dieses Array(1)
Das definierte Array hat tatsächlich (1+1) Array-Elemente, sieht aber so aus:
Programmcode
Redimieren Sie dieses Array(0)
Die Syntax ist falsch. Daher können Sie kein Array mit nur einem Array-Element definieren. Tatsächlich handelt es sich bei dem oben Erwähnten lediglich um den Standardstatus. Tatsächlich können Sie beim Definieren eines Arrays die Anzahl der Arrays und sogar die Start- und Endnummern der Indizes definieren, indem Sie den Anfang und das Ende der Indizes definieren. Zum Beispiel:
Programmcode
Redim dieses Array (1980 bis 1990)
Es wird ein Array mit 11 Elementen mit Indizes von 1980 bis 1990 definiert.
3. Über die UBOUND-Funktion
UBOUND gibt den maximalen Index eines eindimensionalen Arrays zurück, nicht die Anzahl der Elemente. Zum Beispiel:
Programmcode
Dim Myarray(5)
,Also
Programmcode
UBOUND(Myarray)
Der zurückgegebene Wert ist 5, nicht 6. UBOUND kann auch auf zweidimensionale Arrays angewendet werden. Bei Anwendung auf ein zweidimensionales Array wird der Maximalwert des ersten Index zurückgegeben.
Zum Beispiel:
Programmcode
Dim Myarray(6,3)
, Also
Programmcode
UBOUND(Myarray)
Der zurückgegebene Wert ist 6, nicht 7, geschweige denn 18 (6*3=18).
Um den Maximalwert des zweiten Index zurückzugeben, verwenden Sie:
Programmcode
UBOUND(Myarray,2)
.
UBOUND entspricht eine weitere Funktion: LBOUND, die den minimalen Index des Arrays zurückgibt. Ähnlich wie UBOUND gibt LBOUND(Myarray,2) den Mindestwert des zweiten Index des Arrays MYARRAY zurück. Genauer gesagt beträgt die Anzahl der Elemente des eindimensionalen Arrays Myarray:
Programmcode
UBOUND(Myarray)-LBOUND(Myarray)+1
, und die Anzahl der Elemente des zweidimensionalen Arrays beträgt:
Programmcode
(UBOUND(Myarray)-LBOUND(Myarray)+1)*(UBOUND(Myarray,2)-LBOUND(Myarray,2)+1)
http://www.knowsky.com/
Mehrdimensionale Arrays und so weiter.
4. Definition des Arrays
Programmcode
DimMyArray
MeinArray = Array(1,5,123,12,98)
Erweiterbares Array
Programmcode
DimMyArray()
für i = 0 bis 10
ReDim PReserve MyArray(i)
MyArray(i)=i
nächste
Teilt eine Zeichenfolge und gibt ein Array von Teilungsergebnissen zurück
Programmcode
DimMyArray
MyArray = Split(tempcnt,chr(13)&chr(10))
Für I = Lbound(MyArray) zu Ubound(MyArray)
Response.Write MyArray(I) & <br>
Nächste
5. Array-Sortierfunktion
Programmcode
Funktion Sort(ary)
KeepChecking = TRUE
Tun bis KeepChecking = FALSE
KeepChecking = FALSE
Für I = 0 bis UBound(ary)
Wenn I = UBound(ary), dann Exit For
Wenn ary(I) > ary(I+1) Dann
FirstValue = ary(I)
SecondValue = ary(I+1)
ary(I) = SecondValue
ary(I+1) = Erster Wert
KeepChecking = TRUE
Ende wenn
Nächste
Schleife
Sortieren = ary
Funktion beenden
Anwendungsbeispiel für die Array-Sortierfunktion
Programmcode
DimMyArray
MeinArray = Array(1,5,123,12,98)
MyArray = Sort(MyArray)
Für I = Lbound(MyArray) zu Ubound(MyArray)
Response.Write MyArray(I) & <br>
Nächste
6. Verwenden Sie Arrays in Anwendung und Sitzung
Programmcode
Anwendungssperre
Anwendung(StoredArray) = MyArray
Anwendung.Entsperren
LocalArray = Anwendung(StoredArray)
Array in der Anwendung überschreiben
Programmcode
Anwendungssperre
Anwendung(StoredArray) = LocalArray
Anwendung.Entsperren
Die Sitzungsnutzung ist dieselbe wie die der Anwendung
7. Importieren Sie Daten aus der Datenbank in das Array
Diese Methode wird von mir häufig bei der Funktionsintegration von Code verwendet.
Programmcode
DimMyArray
Holen Sie sich alle Datensätze
MyArray = RS.GetRows
Holen Sie sich die ersten 10 Datensätze
MyArray = RS.GetRows(10)
Für Zeile = 0 To UBound(MyArray, 2)
Für col = 0 To UBound(MyArray, 1)
Response.Write (col, row) & <br>
Nächste
Nächste