8 svar · 280 visningar · startad av webbSAJTEN
Tjenare!
Jag har en databas som jag vill lista ID och namn ifrån.
Det första ID't är 20 och sen går det neråt så antalet poster ställer inte som ni säkert förstår. Det är 20 mer!
Jag vill skriva ut hur många pester som finns exakt, alltså ID minus 20. Jag har prövat:
<%
Dim antal
antal = cint(RS("ID")) - 20
%>
<%="antal"%>
men den vill inte fungera.
Jag får felmess:
error '80020009'
/visa_anvandare.asp, line 53
och på rad 53 finns: antal = cint(RS("ID")) - 20
Vad är felet?
Det är allt jag får..
<% Set Connect = Server.CreateObject("Adodb.Connection")
Connect.Open strCon
%>
<% SQL = "SELECT ID, user, reggad, bor FROM anv ORDER BY id"
Set RS = Connect.Execute(SQL) %>
<%
Do until RS.EOF
nummer = nummer + 1
If nummer Mod 2 = 0 then
color = "#627788"
Else
color = "#6D8496"
End If
%>
<table width="800" border="0" bgcolor="<%=color%>">
<tr>
<td width="18"><b><%=RS("ID")%></b></td>
<td width="122"><%=RS("user")%></td>
<td width="165" nowrap><%=RS("reggad")%></td>
<td width="477"><%=RS("bor")%></td>
</tr>
</table>
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<% RS.movenext
loop
%>
<%
Dim antal
antal = cint("0"& RS("ID")) - 20
%>
<%=antal%>
Det är koden...
Om du försöker komma åt värdet efter loopen så är ditt recordset EOF. Lägg koden före/i loopen istället.
Men är det inte bättre att räkna ordentligt?
hur ska det stå om man ska räknar ordentligt??
Istället för att du har
Dim antal
antal = cint("0"& RS("ID")) - 20
%>
<%=antal%>
Så byter du det till
SQL = "SELECT COUNT(*) FROM anv"
Set RS = Connect.Execute(SQL)
Response.Write RS(0)
RS.Close
Set RS = Nothing
%>