Det jag förstår kan jag svara på, skapa en temporer variabel som du döper till något i stil med priorMemberId, med startvärdet "". Sen nederst i din loop sätter du medlemsid:t, överst ka du ju jämföra ditt värde i priorMemberId med det i ditt recordset
jag har sida som visar allt som finns i en tabell. I denna tabell förekommer samma medlemsid på flera ställer. Nu vill jag att all info som har medlemsid 1 ska visas i en tabell på hemsidan och allt som har medlemsid 2 ska visas i en tabell osv.
Tydligare?
Men hur skapar man en sådan variabel? Det är det jag inte kan.
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "Select * from tabell ORDER BY medlemsid"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
%>
<%
If RecSet.EOF THEN
%>
Finns ingen info
<% else %>
<%
Dim color
color="99cc99"
Do Until RecSet.EOF
%>
<Table>
<tr>
<td>
<%= recset("fornamn") %>
<% Alla = RecSet.RecordCount %>
</td>
</tr>
</table>
<%
RecSet.MOVENEXT
If color="99cc99" then
color="FFFFFF"
else
color="99cc99"
end if
LOOP
RecSet.Close
%>
Din kod saknar det mesta i logikväg och jag fattar inte alls vad du egentligen vill men vi försöker med denna otestade kod.
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "Select * from tabell ORDER BY medlemsid"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
if RecSet.eof then
response.write("Ingen info tillgänglig")
else
dim bgCol, tmpId
tmpId = -1
do until RecSet.eof
if bgCol = "#9C9" then bgCol = "" else bgCol = "#9C9"
if tmpId = RecSet("medlemsid") then
' samma tabell
response.write("<tr bgcolor='" & bgCol & "'><td>" & RecSet("fornamn") & "</td></tr>")
else
' ny tabell
if not tmpId = -1 then response.write("</table>")
response.write("<table>")
response.write("<tr bgcolor='" & bgCol & "'><td>" & RecSet("fornamn") & "</td></tr>")
tmpId = RecSet("medlemsid")
end if
RecSet.MoveNext
Loop
response.write("</table>")
end if
RecSet.Close : Set RecSet = nothing
%>