---

Nej NG

Jeg skal lave en liste over nogle server og de skal indsættes i
en tabel således at dem der er i rackskab 1 bliver listet under
hinanden, reckskab 2 ved siden af OSV, men hvordan. Dette får
kolonne 2 til at skrive de samme ting flere gange.

Jeg tror at problemet er at jeg ikke får adskilte mine
forespøgelser rigtigt.



Claus


<%
' Dataforbindelse
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("server.mdb")
Conn.Open DSN

strSQL = "Select * from Serverliste WHERE Rackskab = '101'"
Set rs1 = Conn.Execute(strSQL)

strSQL = "Select * from Serverliste WHERE Rackskab = '102'"
Set rs2 = Conn.Execute(strSQL)

Do While Not rs1.EOF
   'Server Navn
   strNavn = rs1("Servernavn")

      
'Udskriv
%>

<table border="1" cellpadding="0" cellspacing="0"
style="border-collapse: collapse" bordercolor="#111111"
width="100%" id="AutoNumber1">
<tr>
<td width="20%"><%= rs1("Servernavn") %> (<%= rs1("Kontrakt")
%>)</td>
<td width="20%"><%= rs2("Servernavn") %> (<%= rs2("Kontrakt")
%>)</td>
<td width="20%">&nbsp;</td>
<td width="20%">&nbsp;</td>
<td width="20%">&nbsp;</td>
</tr>
</table>
<%
   rs1.MoveNext


Loop

Conn.Close
Set Conn = Nothing
%>




--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

---

Claus skrev:

> Do While Not rs1.EOF
> 'Server Navn
> strNavn = rs1("Servernavn")

Hvad skal du bruge strNavn til?

> <td width="20%"><%= rs1("Servernavn") %> (<%= rs1("Kontrakt")
> %>)</td>
> <td width="20%"><%= rs2("Servernavn") %> (<%= rs2("Kontrakt")

Det er usikkert at udskrive fra rs2 når du ikke ved om der er
poster i den (du har alene tjekket for rs1.EOF).


> rs1.MoveNext

Her rykker du rs1 en post frem - men du rykker ikke rs2 frem.
Derfor udskrives den samme post fra rs2 hele tiden.

Du kan indsætte rs2.movenext - så rykker du videre begge steder.
Men det vil give fejl hvis der er flere poster i rs1 end i rs2 (og
hvis der er flere poster i rs2 end i rs1, så bliver de sidste
poster fra rs2 ikke udskrevet).
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

---

> > Do While Not rs1.EOF
> > 'Server Navn
> > strNavn = rs1("Servernavn")
>
> Hvad skal du bruge strNavn til?

det skulle ikke have været med, det var noget jeg prøvede.


> Du kan indsætte rs2.movenext - så rykker du videre begge steder.
> Men det vil give fejl hvis der er flere poster i rs1 end i rs2 (og
> hvis der er flere poster i rs2 end i rs1, så bliver de sidste
> poster fra rs2 ikke udskrevet).

jep det har jeg også prøvet og får samme resultat.

Hvad kan så være en løsning, kan jeg lave et udtræk på alt og så
sorter det i tabellerne bagefter.

Claus

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials