Speichern von Variablen in ein Array

[Frank aus Ulm]

Hi, hallo Tom2

Dim strListe
...
For x = myidnr1 To myidnr2
  strListe = strListe & x & " "
Next
Response.Write(strListe)

wozu erst noch eine Variable strListe erfinden ... war "liste" selbst nicht gut genug ??? ;-)

Dim i
Dim arrListe(10) 'Wert anpassen! Ev. dynamische Arrays verwenden

i = 0
For x = myidnr1 To myidnr2
  arrListe(i) = x
  i = i + 1
Next
Das sollte so eigentlich funktionieren.

oder kürzer:

for x = myidnr1 to myidnr2
  arrListe((x-myidnr1)) = x
next

'funzt bei mir problemlos

TEE OFF!

Tschau, tschüß,
Frank