/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Access database, ASP. Tabellen rykker læng~
Fra : Poul Bonde


Dato : 10-02-03 17:06

Hej, er der nogen som kan løse mit problem!

Når der kun er 1 linie som overføres fra Access DB, er der et
passende mellemrum mellem de 2 tabeller. Men jo flere linier som
overføres, desto større afstand bliver der mellem de 2 tabeller,

hvad er der galt???
/Poul

<% @LANGUAGE = VBScript %>
<%
Response.Expires = 0
Dim connstr
connstr = "DRIVER={Microsoft Access Driver (*.mdb)}; "
connstr = connstr & "DBQ=" & Server.MapPath
("/cgi-bin/BNS-database.mdb")
session.timeout = 30
Set conn = Server.createObject("ADODB.Connection")
sql = "SELECT * FROM bygning WHERE (Forkortelse='HTÅ')" 'and
(Udstyr like '%PCM%'))"
dim rs
set rs = Server.CreateObject ("ADODB.Recordset")
rs.activeconnection = connstr
rs.CursorType = adOpenForwardOnly
rs.Open sql
On Error Resume Next
rs.MoveFirst
%>

<html>
<head></head>

<BODY>
<TABLE border="1">
<TR>
<TD><font face="arial,helvetica" size="3" color="#336690"
width="100%">
      1. Indvendigt eftersyn. Se efter evt.
skader.<BR>
      2. Vandindtrængen, fugt.<BR>
      3. Rengøring af gulv.<BR>
      4. Fjernelse af spindelvæv og støv.<BR>
      5. Bemærkninger.</font>
   </TD>
</TR>
</TABLE>

!!!!!!!!!!!!!!!!HER ER MIT PROBLEM???!!!!!!!!!!!!!

<table border="1" cellpadding="3" bordercolor="#336690"
width="100%">
   <TR>
      <th align="left">Dato</th>
      <th align="left">Initialer</th>
      <th align="left">1.</th>
      <th align="left">2.</th>
      <th align="left">3.</th>
      <th align="left">4.</th>
      <th align="left">5.</th>
   </tr>
   <tr><%while not rs.eof%>
      <td><%Response.Write rs("dato")%></td>
      <td><%Response.Write rs("Initialer")%></td>
      <td><%Response.Write rs("Indvendigt eftersyn, skader") %></td>
      <td><%Response.Write rs("Vandindtrængen, fugt")%></td>
      <td><%Response.Write rs("Rengøring af gulv") %></td>
      <td><%Response.Write rs("Fjernelse af spindelvæv og støv")
%></td>
      <td><%Response.Write rs("Bemærkninger1")%></td><BR>
   </tr>
<%
      RS.MoveNext
   Wend
%>
</Table>
<%
RS.close
Conn.close
Set RS = Nothing
Set Conn = Nothing
%>
</body>
</html>


--
Danmarks største specialiserede IT jobdatabase
- Udelukkende med IT- og internetrelaterede jobs
- Opret en profil og lad drømmejobbet finde dig
KLIK HER! => http://www.html.dk/job

 
 
Jens Gyldenkærne Cla~ (10-02-2003)
Kommentar
Fra : Jens Gyldenkærne Cla~


Dato : 10-02-03 21:46

Poul Bonde skrev:

> hvad er der galt???

Herunder er der et problem

> <tr><%while not rs.eof%>

[klip - diverse response-linjer]

> </tr>
> <%
> RS.MoveNext

Du får kun udskrevet ét tr-element (table row), uanset hvor mange
rækker der skal være i tabellen. Til gengæld afslutter du med </tr>
for hver post i postsættet. Flyt <tr> ind i løkken (på den anden
side af <% while not rs.eof %>), og se om det hjælper.

Hvis der stadig er noget galt, så prøv at udkommentere "On Error
Resume Next".
--
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

Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste