vil ikek scrolle
hejsajeg har et table som skal scrolle hvis det bliver for stort..men af en eller anden årsag vil den ikke
kode.:
<fieldset>
<legend>Produkter i <%=session("hprodukt")%> gruppen </legend>
<table border="1" width="98%">
<%
Source = "db/" & Session("ID") & "/" & Session("ID") & ".mdb"
Set Conn = Server.createobject("ADODB.Connection")
conn.open "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & server.mappath(source)
Set RS = Server.createObject("ADODB.Recordset")
SQL = " SELECT tbl_produkter.varenr,tbl_produkter.beskrivelse,tbl_produkter.kategori,tbl_produkter.pris"
SQL = SQL & ",tbl_produkter.enhed,tbl_produkter.enhedtype,tbl_katagorier.katagori_ID,tbl_katagorier.kategori_navn"
SQL = SQL & " FROM tbl_produkter INNER JOIN tbl_katagorier ON tbl_produkter.kategori = tbl_katagorier.katagori_ID"
SQL = SQL & " WHERE tbl_katagorier.kategori_navn ='" & Session("hprodukt") & "'"
SQL = SQL & " ORDER BY tbl_produkter.varenr DESC"
RS.open SQL,Conn
%>
<% if not rs.eof then %>
<tr>
<td width="10%">
Vare Nr.
</td>
<td width="20%">
Vare Kategori
</td>
<td width="44%">
Vare navn
</td>
<td width="8%">
Vare Pris
</td>
<td width="7%">
Enheder
</td>
<td width="11%">
Enheds Type
</td>
</tr>
</table>
<div style="overflow:auto; height:90%; margin:0px 0px 0px 0px;">
<table border="1" width="98%" height="180">
<% do until rs.eof %>
<tr>
<td width="10%">
<%=rs("varenr")%>
</td>
<td width="20%">
<%=rs("kategori_navn")%>
</td>
<td width="44%">
<%=rs("beskrivelse")%>
</td>
<td width="8%">
<%=rs("pris")%>
</td>
<td width="7%">
<%=rs("enhed")%>
</td>
<td width="11%">
<%=rs("enhedtype")%>
</td>
</tr>
<% rs.movenext %>
<% loop %>
<% end if %>
</table>
</div>
</fieldset>
