Udtræk fra database

Du kan lave en SQL sætning og lidt kode:

SQL = "select * from tabelnavn order by kolonnenavn"
set rs = Conn.Execute(SQL)
tmp = ""
do while not rs.EOF
  if tmp <> Left(rs("kolonnenavn"),1) then
    tmp = Left(rs("kolonnenavn"),1)
    Response.Write Ucase(tmp) & "<br>"
  end if
  Response.Write rs("kolonnenavn") & "<br>"
  rs.Movenext
loop

hmm.. får man ikke en fejl hvis man bruger rs("kolonnenavn") flere gange?
Jeg mener at man først skal smide indholdet af rs("kolonnenavn") over i en variable, hvis man skal bruge den flere gange..
F.eks.:

dim rstmp

SQL = "select * from tabelnavn order by kolonnenavn"
set rs = Conn.Execute(SQL)
tmp = ""
do while not rs.EOF
rstmp = rs("kolonnenavn")

  if tmp <> Left(rstemp,1) then
    tmp = Left(rstemp,1)
    Response.Write Ucase(tmp) & "<br>"
  end if
  Response.Write rstemp & "<br>"
  rs.Movenext
loop

Sådan en situation løb jeg ind i, for noget tide siden, her på Eksperten. Den mener om Readline funktioner, der læser næste linie, hver gang man bruger Readline.

Normalt er det ikke noget problem.
Det rigtig der kan forekomme en fejl som gør man kun kan bruge kolonnen en gang, og jeg mener fejlen er relateret til hvis man har notat/memo kolonne midt i rækken af kolonne og så man bruger * i select..

Hej begge!
Tusind tak!
eagleeye´s kode virker ikke helt perfekt - resultatet er en stribe <Br> - ellers intet.
Thesurfer´s kode virker fint.
Men da begge er skide gode, skal begge sæføli have nogle points.
Opretter fluks et spørgsmål til eagleeye
TAK!

øh - hvordan gir man point og accepterer et svar??
Der er kun en Udfør-knap

Så skal vi svare før du kan acceptere det ;)
Hvis du vil give os begge to poiunt skal vi lige vendte til thesurfer også svare her..

Et svar er smidt :)

Takker for points.