Hvorfor virker det her ikke?

tyder på at rs eller rss ikke er instansieret som et recordset?

den skal jeg lige have på almindelig dansk, og helst en løsning på problemet

hvilken linie kommer fejlen på?

hov undskyld, det er linien: if rs.eof = TRUE then strRSSlut = TRUE else rs.movenext

rs er ikke et recordset. Jeg kan ikke give dig en komplet løsning på problemet uden hele dit script.

det får du lige det er ikke så langt:

<%
sAlphabet = "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,x,y,z,æ,ø,å"
bogstav = Split(sAlphabet,",")
strtaeller = 0

response.write "<TABLE width='100%'>"
response.write "<tr>"
response.write "<td>Efterskolenavn</tp><tp>Efterskolenavn</tp>"


for i = 0 to 27
strSQL = "SELECT * FROM efterskoler WHERE LEFT(navn,1) = '" & bogstav(strTaeller) & "' ORDER BY navn ASC"
rs = conn.execute(strSQL)
strTaeller = strTaeller + 1

strSQL = "SELECT * FROM efterskoler WHERE LEFT(navn,1) = '" & bogstav(strTaeller) & "' ORDER BY navn ASC"
rss = conn.execute(strSQL)
strTaeller = strTaeller + 1

do
    if strRSSlut = TRUE then response.write "<tp></tp>" else response.write "<tp>" & rs("navn") & "</tp>"
    if strRSSSlut = TRUE then response.write "<tp></tp>" else response.write "<tp>" & rss("navn") & "</tp>"
   
    if rs.eof = TRUE then strRSSlut = TRUE else rs.movenext
    if rss.eof = TRUE then strRSSSlut = TRUE else rss.movenext
   
    if strRSSlut and strRSSSlut = TRUE then strSlut = TRUE

loop while not strSlut = TRUE

strRSSlut = FALSE
strRSSSlut = FALSE
strSlut = FALSE
next
%>

<%
sAlphabet = "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,x,y,z,æ,ø,å"
bogstav = Split(sAlphabet,",")
strtaeller = 0

response.write "<TABLE width='100%'>"
response.write "<tr>"
response.write "<td>Efterskolenavn</tp><tp>Efterskolenavn</tp>"


strDSN="<DSNsti til din database her>"

Set conn = Server.CreateObject("ADODB.Connection")
conn.open strDSN
Set rs = Server.CreateObject("ADODB.Connection")
Set rss = Server.CreateObject("ADODB.Connection")
rs.activeconnection=conn
rss.activeconnection=conn


for i = 0 to 27
strSQL = "SELECT * FROM efterskoler WHERE LEFT(navn,1) = '" & bogstav(strTaeller) & "' ORDER BY navn ASC"
rs.open strSQL
strTaeller = strTaeller + 1

strSQL = "SELECT * FROM efterskoler WHERE LEFT(navn,1) = '" & bogstav(strTaeller) & "' ORDER BY navn ASC"
rss.open strSQL
strTaeller = strTaeller + 1

do
    if strRSSlut then response.write "<tp></tp>" else response.write "<tp>" & rs("navn") & "</tp>"
    if strRSSSlut then response.write "<tp></tp>" else response.write "<tp>" & rss("navn") & "</tp>"
   
    if rs.eof then strRSSlut = TRUE else rs.movenext
    if rss.eof then strRSSSlut = TRUE else rss.movenext
   
    if strRSSlut and strRSSSlut then strSlut = TRUE

loop while not strSlut

strRSSlut = FALSE
strRSSSlut = FALSE
strSlut = FALSE
next

rs.close
rss.close
conn.close
set rs=nothing
set rss=nothing
set conn=nothing

%>

hele stykket med:

strDSN="<DSNsti til din database her>"

Set conn = Server.CreateObject("ADODB.Connection")
conn.open strDSN
Set rs = Server.CreateObject("ADODB.Connection")
Set rss = Server.CreateObject("ADODB.Connection")
rs.activeconnection=conn
rss.activeconnection=conn

og

rs.close
rss.close
conn.close
set rs=nothing
set rss=nothing
set conn=nothing

er includeret i den side, som den stump kode er inkluderet i...

jeg fatter det nemli ikke, for jeg kan godt udskrive data fra rs og rss, men rs.eof virker ikke :(

Er det mig der er dum eller...........

skal <tp> ikke være <td> ?

jow det har du ret i...

er du sikker på at dine IF sætninger er rigtige?
  if rs.eof then strRSSlut = TRUE else rs.movenext
    if rss.eof then strRSSSlut = TRUE else rss.movenext
   
    if strRSSlut and strRSSSlut then strSlut = TRUE

Jeg mener:
If betingelse then
        do this
end if

If betingelse then
      do this
else
      do that
end if

hossein --> det forstod jeg ikke...

hossein --> nej de er rigtige...

jeg får udskrevet den første record med a og den første med b, men så sker der heller ikke mere...

en database forbindelse er nok, tilgængeld kan man lave 1 eller mange "Recordset", så brug/åben kun en af dem:
Set conn = Server.CreateObject("ADODB.Connection")
conn.open strDSN
Set rs = Server.CreateObject("ADODB.Connection")
Set rss = Server.CreateObject("ADODB.Connection")

men kan det overhovedet lade sig gøre at skrive if rs.EOF = true then?
kan det gøres på en anden måde?
Kan man ikke løbe rs igennem og tælle recordsne og lave en løkke ud fra det tal?

ellers kunne man vel smide det hele ind i et array, er der nogen der kan komme med en stump kode til det?

1- nej, men << If rs.eof then >> kan godt ladesig gøre
2- Jeg ved ikke helt præcis hvad forgår i din kodning. Men loop en recordset, luk den. Åben en anden recordset, luk den. Luk connection.
3- Forstod jeg ikke?
Kan man ikke løbe rs igennem >> Ja, det kan man
tælle recordsne >> Ja, det kan man du bruger fx rs.recordcount
lave en løkke ud fra det tal >>  ??

det er fordi jeg gerne vil lave en tabel, hvor der i første celle skal være alle efterskoler med a, i cellen ved siden af b, under af skal c så komme, under b skal d være osv.
Men jeg prøver lig med recordcount, så kan jeg jo bare tælle hvor mange recordst der er, og så lave noget i stil med: for a = 0 to rs.recordcount, men problemet er jo at der ikke er lige mange record i rs og rss...

ok, du har brug for en array, også skal du have outpittet i koloner ved siden af hinanden, kig på disse besvarelser:
http://www.eksperten.dk/spm/319546

og her:
Kig her:
http://www.eksperten.dk/spm/299353
http://www.eksperten.dk/spm/249535
http://www.eksperten.dk/spm/273763

jeg har fundet fejlen: den lå i den linie der hed:
rs = conn.execute(SQL) den skulle have heddet SET rs = conn.execute(SQL)