Hvor skal jeg placere min <% i = i + 1 %>
Her er min kode:<% Response.Buffer = true %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Disper oversigt</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="robots" content="nofollow, noindex">
</head>
<body>
<p> <font face="Verdana, Arial, Helvetica, sans-serif" color="#000000" size="-1">
<%
strconnect="Driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.Mappath("../Indlaeg/HELPDESK.mdb")
SET DbObj=Server.CreateObject ("ADODB.Connection")
DbObj.Open strconnect
SET tabel=DbObj.Execute("select * from Helpdesk order by Dato DESC")
%>
</font><br>
<applet code="advnewsscroll.class" width="600" height="150">
<param name="info" value="Applet by Gokhan Dagli,www.appletcollection.com">
<param name="regcode" value="">
<param name="input_text" value="from_parameters">
<param name="text_file" value="">
<param name="scroll_mode" value="scroll">
<param name="bgimage" value="">
<param name="image_xposition" value="135">
<param name="image_yposition" value="160">
<param name="bgcolor" value="FFFFCC">
<param name="title_color" value="000000">
<param name="text_color" value="000000">
<param name="highlight_title_color" value="000000">
<param name="highlight_text_color" value="000000">
<param name="title_align" value="left">
<param name="text_align" value="left">
<param name="title_font_type" value="Arial">
<param name="title_font_size" value="12">
<param name="title_font_style" value="1">
<param name="text_font_type" value="Arial">
<param name="text_font_size" value="11">
<param name="text_font_style" value="0">
<param name="title_underline" value="no">
<param name="scroll_delay" value="20">
<param name="pause" value="2000">
<param name="border_thickness" value="1">
<param name="border_color" value="555555">
<param name="left_margin" value="10">
<param name="top_margin" value="10">
<param name="right_margin" value="10">
<param name="bottom_margin" value="10">
<param name="vertical_space" value="20">
<param name="title_linespace" value="0">
<param name="text_linespace" value="1">
<%
If Not (tabel.BOF Or tabel.EOF) Then
Do While Not tabel.EOF
%>
<%
dim i
i = 1
%>
<param name="title<%=i%>" value="<%=tabel("Overskrift")%> <%=i%>- (<%=tabel("Dato")%>)">
<param name="text<%=i%>" value="<%=tabel("Tekst")%>">
<% tabel.movenext %>
<% loop %>
<% i = i + 1 %>
<% else%>
<% end if%>
<% tabel.close%>
<% DbObj.close%>
</applet>
<p>
</body>
</html>
Problemet er at den kun henter den en føreste post i databasen.
HJÆLP
