class_skriv = array(y)
x = 1
classkoll = "SELECT class FROM spells WHERE spell_name = '"& spellname &"'"
set record=databas.execute (classkoll)
do while record.eof <> true
classbyte = "SELECT classes_name FROM classes where classes_id = "& record.fields("class") &""
set record1=databas.execute (classbyte)
class_skriv(x) = record1.fields("classes_name") & ", "
x = x + 1
record.movenext
loop
felmeddelande:
Subscript out of range: 'x'
på raden med
class_skriv(x) = record1.fields("classes_name") & ", "
Jag förstår inte riktigt vad du håller på med. Det finns färdiga metoder för att skapa en array/stäng som innehåller alla poster i ett recordset. Du kan söka på getrows och getstring.
Sen så räcker det med en select-fråga om du använder en join.
sql = "select classes_name from classes
inner join spells where spell_name = '" & spellname & "'"