Jetzt brauch ich mal Hilfe:
Ich erzeuge ein Recordset und lese mir die Anzahl der Datens�tze aus:
Set REC=Server.CreateObject("ADODB.Recordset")
REC.Open strSQL, DBS, adUseClient
Anzahl = REC.Recordcount
Falls mehr als 0 Datens�tze vorhanden sind, erzeuge ich ein Array und
best�cke es �ber die Abfrage:
If Anzahl > 0 Then
Dim arrArtikel(Anzahl)
counter = 0
Do While Not REC.EOF
intArtikel = CInt(REC("pkArtikel"))
arrArtikel(counter) = intArtikel
REC.MoveNext
counter = counter + 1
Loop
End If
Das Script kracht an der Stelle, wo das Array dimensioniert werden soll:
Dim arrArtikel(Anzahl)
Die Fehlermeldung sieht wie folgt aus:
Ganzzahlige Konstante erwartet
/frontend/RubrikDyn.asp, line 99
Dim arrArtikel(Anzahl)
---------------^
Ich habe auch schon versucht, die Datentypen zu konvertieren:
Anzahl = CInt(Anzahl)
Anzahl = CByte(Anzahl)
Anzahl = Cvar(Anzahl)
Nun meine Frage: Wie mu� die Variable aussehen, mit der ich die Gr��e
eines Arrays festlegen kann?
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
