Summere
Hvordan får jeg denne til å summere riktig?<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="496">
<%
Do While Not adoRs.EOF
If Kat <> adoRs("BAvdeling") Then
kat = adoRs("BAvdeling")
TotSum = TotSum + strPremie
strPremie = adoRs("Premie")
If adoRs("Premie") = "TOM" Then
strPremie = "0"
End if
%>
<tr>
<td bgcolor="#000066" align="center" width="276" colspan="4">
<p align="left"><b>
<font face="Arial" color="#FFFFFF">
<% =adoRs("BAvdeling") %></font></b></td>
<td bgcolor="#000066" align="center" width="85">
</td>
<td bgcolor="#000066" align="center" width="65">
</td>
<td bgcolor="#000066" align="center" width="70">
</td>
</tr>
<tr>
<td bgcolor="#F5E6CB" align="center" width="70">
<b>
<font size="2" face="Arial">
Reg.nr.</font><font face="Arial"> </font></b></td>
<td bgcolor="#F5E6CB" align="center" width="136" colspan="2">
<b>
<font size="2" face="Arial">
Fabrikat</font><font face="Arial"> </font></b></td>
<td bgcolor="#F5E6CB" align="center" width="70">
<b>
<font size="2" face="Arial">
Type</font><font face="Arial"> </font></b></td>
<td bgcolor="#F5E6CB" align="center" width="85">
<b>
<font size="2" face="Arial">
Dekning</font><font face="Arial"> </font></b></td>
<td bgcolor="#F5E6CB" align="center" width="65">
<b>
<font size="2" face="Arial">
Premie</font><font face="Arial"> </font></b></td>
<td bgcolor="#F5E6CB" align="center" width="70">
<b>
<font face="Arial" size="2">
Info/adm.</font><font face="Arial"> </font></b></td>
</tr>
<%
end if
%>
<tr>
<td align="center" width="70" colspan="2">
<font face="Arial" size="2"><%=adoRs("RegNr")%></font></td>
<td align="left" width="136">
<font face="Arial" size="2"><%=adoRs("Fabrikat")%></font></td>
<td align="center" width="70">
<font face="Arial" size="2"><%=adoRs("Type")%></font></td>
<td align="center" width="85">
<font size="2" face="Arial"><%=adoRs("Dekning")%></font></td>
<td align="center" width="65">
<font size="2" face="Arial"><%=adoRs("Premie")%></font></td>
<td align="center" width="70">
<a href="java script:displayWindow('info_bil-ADM.asp?BilID=<%=adoRs("Bilid")%>',410,380)">
<img border="0" src="img/info.gif" hspace="2" width="19" height="19" vspace="2" alt="Klikk for mer info (eget vindu)"></a><a href="ks-vbred.asp?BilID=<%=adoRs("Bilid")%>"><img border="0" src="img/rediger.gif" hspace="2" width="17" height="19" vspace="2" alt="Klikk her for å redigere kjøretøyet"></a><a href="#" onclick="SlettBil(<%=adoRs("BilId")%>);"><img border="0" src="img/fjern.gif" hspace="2" width="19" height="19" vspace="2" alt="Klikk her for å slette kjøretøyet"></a></td>
</tr>
<%
totsum = strPremie + totsum
adoRs.MoveNext
Loop
%>
<tr>
<td align="center" width="206" colspan="3">
<p align="left"><b>
<font size="2" face="Arial">Totalsum premie på alle</font></b></td>
<td align="center" width="70">
</td>
<td align="center" width="85">
</td>
<td align="center" width="65">
<font size="2" face="Arial"><b><%=totSum%></b></font></td>
<td align="center" width="70">
</td>
</tr>
</table>
