GetRows til variabel

Hej... Jeg skal trække nogen keywords ud fra databasen. Det drejer sig om "keyword" og "keywordid". Det er hhv. byer og dertilhørende link - i stil med:

København, main.asp?query=1,
Århus, main.asp?query=2,
Odense, main.asp?query=3,
osv...

Nedenstående kode trækker dataene ud som de står ovenfor. Det jeg ønsker er, at dataene skal kunne smides ind i flg. variabler:

erstattekst = Split("København,Århus,Odense", ",")
ertstatmed = Split("<a href='main.asp?query=1'>,<a href='main.asp?query=2'>,<a href='main.asp?query=3'>", ",")

Dataene skal altså splittes op og smides i variablerne...


'--- HENT KEYWORDS

Set RS = server.createobject ("ADODB.recordset")
SQL = "SELECT * FROM keywords"
ConnString= "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("database.mdb")
RS.open SQL, ConnString, 1

If  rs.eof then
  response.write "INGEN POSTER"
  response.end
end if


alldata=rs.getrows

numcols=ubound(alldata,1)
numrows=ubound(alldata,2)
FOR rowcounter= 0 TO numrows
  response.write ""
  FOR colcounter=0 to numcols
      thisfield=alldata(colcounter,rowcounter)
      if isnull(thisfield) then
        thisfield=shownull
      end if
      if trim(thisfield)="" then
        thisfield=showblank
      end if
      response.write ""
      response.write " " & thisfield & ","
      response.write ""
  NEXT
  response.write "<br>"
NEXT