loop i udtræk fra db
Jeg skal bruge flg. i et loop:<tr>
<td width="60"><font face="Verdana" size="1"><% Response.Write rs("Butik") %></font></td>
<td width="80"><font face="Verdana" size="1"><% Response.Write rs("Medarbejder") %></font></td>
<td width="40"><font face="Verdana" size="1"><% Response.Write rs("Fra") %></font></td>
<td width="40"><font face="Verdana" size="1"><% Response.Write rs("Til") %></font></td>
<td width="40"><font face="Verdana" size="1">
<input type="text" name="Total" size="8" style="font-family: Verdana; font-size: 10px; color: #000000; border-style: solid; border-width: 0px; background-color: #FFFFFF" value="<% Response.Write rs("Total") %>"></font></td>
<td><font face="Verdana" size="1"><% Response.Write rs("Bemærkning") %></font></td>
</tr>
<tr>
<td colspan="6" bgcolor="#000000" height="1"></td>
</tr>
Her er hele koden:
<% Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("/fpdb/Medarbejder.mdb") %>
<% strSQL = "Select * From " & Request.querystring("Tabel") &" Where Medarbejder='" & Request("Medarbejder") &"'"
Set rs = Conn.Execute(strSQL)%>
<html>
<head>
<title>Arbejdstimer</title>
</head>
<body>
<table border="0">
<tr>
<td width="360" colspan="4"><b>
<font color="#99ccff" face="Trebuchet MS" size="2">▪ </font>
<font face="Verdana" size="2">Total Oversigt</font></b></td>
</tr>
<tr>
<td width="110" bgcolor="#000000"><b>
<font size="1" face="Verdana" color="#FFFFFF">Total Antal Timer:</font></b></td>
<td width="110" bgcolor="#000000"><b>
<font size="1" face="Verdana" color="#FFFFFF">For Medarbejder:</font></b></td>
<td width="70" bgcolor="#000000"><b>
<font size="1" face="Verdana" color="#FFFFFF">Fra D.:</font></b></td>
<td width="70" bgcolor="#000000"><b>
<font size="1" face="Verdana" color="#FFFFFF">Til D.:</font></b></td>
</tr>
<tr>
<td width="110">
<input type="text" name="TotalTimer" size="15" style="font-family: Verdana; font-size: 10px; color: #000000; border-style: solid; border-width: 0px; background-color: #FFFFFF"></td>
<td width="110"><font face="Verdana" size="1"><% Response.Write rs("Medarbejder") %></font></td>
<td width="70">
<input type="text" name="FraD" size="10" style="font-family: Verdana; font-size: 10px; color: #000000; border-style: solid; border-width: 0px; "></td>
<td width="70">
<input type="text" name="TilD" size="10" style="font-family: Verdana; font-size: 10px; color: #000000; border-style: solid; border-width: 0px; "></td>
</tr>
<tr>
<td width="360" colspan="4" bgcolor="#000000" height="1"></td>
</tr>
</table>
<br>
<table border="0" width="100%">
<tr>
<td colspan="6"><b><font color="#99ccff" face="Trebuchet MS" size="2">▪
</font><font face="Verdana" size="2">Oversigt</font></b></td>
</tr>
<tr>
<td width="60" bgcolor="#000000"><b>
<font face="Verdana" size="1" color="#FFFFFF">Butik</font></b></td>
<td width="80" bgcolor="#000000"><b>
<font face="Verdana" size="1" color="#FFFFFF">Medarbejder</font></b></td>
<td width="40" bgcolor="#000000"><b>
<font face="Verdana" size="1" color="#FFFFFF">Fra</font></b></td>
<td width="40" bgcolor="#000000"><b>
<font face="Verdana" size="1" color="#FFFFFF">Til</font></b></td>
<td width="40" bgcolor="#000000"><b>
<font face="Verdana" size="1" color="#FFFFFF">Total</font></b></td>
<td bgcolor="#000000"><b><font face="Verdana" size="1" color="#FFFFFF">Bemærkning</font></b></td>
</tr>
<tr>
<td width="60"><font face="Verdana" size="1"><% Response.Write rs("Butik") %></font></td>
<td width="80"><font face="Verdana" size="1"><% Response.Write rs("Medarbejder") %></font></td>
<td width="40"><font face="Verdana" size="1"><% Response.Write rs("Fra") %></font></td>
<td width="40"><font face="Verdana" size="1"><% Response.Write rs("Til") %></font></td>
<td width="40"><font face="Verdana" size="1">
<input type="text" name="Total" size="8" style="font-family: Verdana; font-size: 10px; color: #000000; border-style: solid; border-width: 0px; background-color: #FFFFFF" value="<% Response.Write rs("Total") %>"></font></td>
<td><font face="Verdana" size="1"><% Response.Write rs("Bemærkning") %></font></td>
</tr>
<tr>
<td colspan="6" bgcolor="#000000" height="1"></td>
</tr>
</table>
<p>
</p>
</body>
</html>
